¿BDE con Delphi 10? ¿Y con Community Edition ?

[Javierus]

Empezado por newtron

Estando de acuerdo en que el BDE es "caca" y hay que quitarselo de encima lo antes posible también creo que, dependiendo del código del programa, el cambio a un motor de base de datos SQL puede ser bastante laborioso.
Lo digo porque las operaciones manejando tablas son distintas a las que se hacen con instrucciones SQL

Empezado por newtron

al final acabé por migrar a ElevateDB que si que tiene componentes "ttable" nativos y me servía casi todo el código que tenía para BDE.

Eso es lo que necesito.
¿¿¿No recordarás con qué tipo de problemas te encontraste??? Eso me ayudaría muchísimo

Empezado por newtron

Por otro lado comentarte que yo he estado usando BDE con Delphi 2007 sin grandes problemas

En esa situación estoy yo en este momento: terminando la migración a 2007, con un puñado de clientes ya trabajando sólo con esa versión, mientras el resto están aún con Delphi 5

Lo que no he indicado es que mi empresa tiene exclusivamente 1 aplicación, que nos da de comer desde hace 30 años (Turbo Pascal->Borland Pascal->Delphi 3->Delphi 5->Delphi 2007), y se desarrolla en ella todos los días, por lo que no se puede hacer una "parada técnica" de, p.ej., un mes

[Casimiro Notevi]

Javierus, por lo que conozco de tu caso, te diría que no le tengas miedo a cambiar a Firebird+IBX, por ejemplo, ya que pasando a SQL estarías abierto a usar otros en cualquer momento que decidas cambiar.
Conozco también el caso del compañero newtron y no es que sea mala su elección, es bastante buena (salvo que no es software libre y no se tiene acceso al fuente), pero son elecciones tomadas por diversos motivos en momentos determinados y también influenciados por motivos externos como clientes que se deben continuar asistiendo, continuidad con el código, etc.
El tema de las "TTable" es fácilmente solucionable limitando los registros cuando se conectan a ellas a ninguno o a un número determinado. Está el código fuente del mismo, por lo que no hay problema, se cambia el predeterminado "select * from tabla" por "select * from tabla limit 1" o "select * from tabla where codigo=0", etc.

De todas formas, tomes la solución que sea, aquí estaremos para intentar ayudarte.

Y, obviamente, es necesario desarrollar los cambios sin tocar lo que está funcionando, para poder seguir asistiendo a tus clientes, así que sería una "nueva rama" (o copia/pega ) del proyecto, donde irías haciendo los cambios, para no tocar "el original". Y si se toca algo, eso se pasa al nuevo también.

[[newtron]]

Empezado por Javierus

Eso es lo que necesito.
¿¿¿No recordarás con qué tipo de problemas te encontraste??? Eso me ayudaría muchísimo

Ya lo he comentado. El principal problema es que el código del programa estaba diseñado para trabajar con objetos Ttable y ese código no funciona con bases de datos SQL. Me hice de unos componentes "Ttable" para firebird (no recuerdo el nombre) que eran totalmente compatibles con el código que tenía pero cuando hacía el "open" de la tabla para después poder operar con ella lo que internamente realmente hacía es un "SELECT * FROM..." para cargarla en memoria y después poder hacer "findkey", "edit", etc... y eso se volvía totalmente inoperativo con tablas grandes tuviendo que desechar esa vía.


Mi consejo es que si quieres conservar el código migrando a una base de datos SQL eches un vistazo a la web de ElevateDB que te puede resolver el problema, no lo vas a hacer en un "pispas" pero es factible y te permitirá migrar a una base de datos bastante robusta y cambiando el código fuente lo mínimo. Si es cierto que tiene un coste pero, a mi forma de entender, asumible para las contrapartidas que da.



Cualquier duda me comentas.


Saludos

Edito: Se me olvidaba comentar que el costo que tiene esta base de datos no es por cada instalación de la misma, lo que se pagan son los componentes que instalas en tu Delphi siendo gratuita la instalación en los clientes del motor de base de datos.

[mamcx]

Puede que tenga la memoria desactualizada, pero el problema de la velocidad con ttables no era tan desastroso:

http://edn.embarcadero.com/article/27790

En el caso de ADO, es posible optimizar muy fácilmente la cosa. Como te digo, he usado tantos motores y lenguajes, que no veo como puedes realmente estar en un problema que haga que valga la pena seguir con BDE.

En general, si usas una solución y optienes un desempeño ABISMAL, entonces algo esta faltando. Yo use mucho ADO en Delphi y no recuerdo haber tenido problemas de desempeño. Hay algunos parámetros que hay que setear para que el componente funcione al estilo TTable...

Pero no tengo Delphi a la mano pa chequear...

[Casimiro Notevi]

Me ha extrañado mucho lo de los problemas comentados con el componente "Table" y yo no recuerdo que fuese tan malo, aunque la última vez que lo usé hace tantos años que ni me acuerdo, así que he hecho una prueba muy simple, apenas he tardado 5 minutos en escribir el proyecto y grabarlo en video.

Solamente quería comprobarme a mí mismo y de paso recordar cómo iba, porque no me gusta contar algo que esté equivocado, quería estar seguro, así que esto es lo que he hecho:

He abierto una vieja máquina virtual con windows XP y delphi 2007, he creado un nuevo proyecto.
De la pestaña Interbase (son los componentes IBX) he añadido un ibdatabase, un ibtransaction y un ibTable.
Lo he conectado a una base de datos firebird 2.5 de una gestión contable que hice hace unos años.
He puesto un dbgrid, un dbnavigator y unos botones para conectar y otro para hacer una búsqueda.
No hay nada de código SQL, ni Query, ni nada de nada, solamente el componente "table".

He añadido (con ibexpert) a una de las tablas 110.000 registros que más los que tenía, suman un total 110.053 registros.
Son poquitos, pero para hacer una prueba creo que valen, y el test lo he grabado en video.

Botón conectar es instantáneo, desconectar igualmente, vuelta a conectar al instante.
Voy al final de la tabla, casi instantáneo. Voy de nuevo al principio, instantáneo.
En el registro 100.000 la descripción es "HOLA", le doy a buscar, que usa un simple locate y se puede ver que es instantáneo.
Avanzo hacia arriba (retrocedo) un poco y edito un registro cambiando su descripción también por "HOLA", es instantáneo, la edición de cualquier registro no tarda absolutamente nada.
Voy de nuevo al principio y le doy a buscar, encuentra el registro editado también instantáneamente.
Desconectar y salir.

Aquí está el video de prueba.
Y aquí está el código fuente, nada de SQL, ni nada de nada.

Código Delphi [-]
unit Unit6;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, DBGrids, DB, IBCustomDataSet, IBTable, IBDatabase, ExtCtrls,
  DBCtrls, StdCtrls;

type
  TForm6 = class(TForm)
    IB1: TIBDatabase;
    TR1: TIBTransaction;
    ibtbl1: TIBTable;
    ds1: TDataSource;
    dbgrd1: TDBGrid;
    dbnvgr1: TDBNavigator;
    pn1: TPanel;
    bt2: TButton;
    bt1: TButton;
    ed1: TEdit;
    bt3: TButton;
    procedure bt1Click(Sender: TObject);
    procedure bt2Click(Sender: TObject);
    procedure bt3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form6: TForm6;

implementation

{$R *.dfm}

procedure TForm6.bt1Click(Sender: TObject);
begin
  ib1.Connected := not(ib1.Connected);
  tr1.Active := ib1.Connected;
  ibtbl1.Active := ib1.Connected;
  ds1.Enabled := ib1.Connected;
  if not(ib1.Connected) then
    bt1.Caption := 'Conectar'
  else
    bt1.Caption := 'Desconectar';
end;

procedure TForm6.bt2Click(Sender: TObject);
begin
  close;
end;

procedure TForm6.bt3Click(Sender: TObject);
begin
  ibtbl1.Locate('NOMBREPROVINCIA',ed1.Text,[]);
end;

end.

[Javierus]

Gracias por la ayuda, Casimiro
Volveré a probarlo, porque que esa prueba la hice hará tres años, y no debo de recordar bien dónde estaba el problema.

En mi caso las pruebas no deberían ser difíciles, dado que nunca utilizo el TTable directamente; usuarios uno propio heredado de TTable, por lo que bastará con encapsular en él el IBXTable. Ya tenía previsto probar el ElevateDB que me recomendó Newtron, así que probaré ambos

Gracias de nuevo a todos; ya informaré de mi experiencia

[Casimiro Notevi]

Sí, prueba el elevatedb, creo que te gustará, va bastante bien también.
Lo único, que no es libre.

[Javierus]

Comprobado: se puede instalar el paquete del BDE y funciona perfectamente
El único problema es que te tienes que buscar la vida para conseguir el paquete del BDE, porque no está en descarga libre

[[newtron]]

Empezado por Casimiro Notevi

...
De la pestaña Interbase (son los componentes IBX) he añadido un ibdatabase, un ibtransaction y un ibTable.

Casimiro, entonces eso es lo que me falló en su día. La persona que me hizo la migración de mis componentes a SQL y que según sus palabras era "el que más sabía de delphi de España" no conocía o no cayó en usar estos componentes y usó unos que no servían y cuando le comenté el problema que había con tablas de muchos registros me dijo textualmente "no hay milagros". Unos cuantos de miles de euros y unos cuantos meses de trabajo tirados a la basura.

De una forma o de otra estoy bastante contento con ElevateDB, hay alguna cosa que creo que con Firebird no podría hacer y que me resulta muy cómoda como el poder usar la base de datos embebida para entornos pequeños de red.

En fin..... estas cosas modernas....

[Casimiro Notevi]

Empezado por newtron

Casimiro, entonces eso es lo que me falló en su día. La persona que me hizo la migración de mis componentes a SQL y que según sus palabras era "el que más sabía de delphi de España" no conocía o no cayó en usar estos componentes y usó unos que no servían y cuando le comenté el problema que había con tablas de muchos registros me dijo textualmente "no hay milagros". Unos cuantos de miles de euros y unos cuantos meses de trabajo tirados a la basura.

De una forma o de otra estoy bastante contento con ElevateDB, hay alguna cosa que creo que con Firebird no podría hacer y que me resulta muy cómoda como el poder usar la base de datos embebida para entornos pequeños de red.

En fin..... estas cosas modernas....

El problema es que "la informática" es un campo tan amplio que no se puede saber todo, algo que nos parece casi imposible resulta que alguien conoce la forma de hacerlo incluso fácil.
El "truco" con el componente Table es tener indexado el campo que se va a usar, y no olvidar traer solo los registros que se necesiten, aunque esto último también vale para cualquier consulta, sea del tipo que sea.

Firebird también va perfecto para entornos pequeños de red, e incluso tiene una versión "embebida" para sistemas locales.

Aparte de eso, elevateDB también está muy bien, es muy completo.

[elguille]

Otra opción es MYSQL o MariaDB (gratuitos) con MYDAC https://www.devart.com/mydac/ de pago, que trae todos los componentes equivalentes de la paleta BDE, yo lo he hecho y funciona perfectamente, naturalmente hay que retocar el codigo pero sin demasiadas complicaciones. Eso si, si abres una tabla de un millon de registros los lleva todos a memoria, pero creo que es asi con cualquier componente que funcione como el TTable.
Devart tambien ha desarrollado https://www.devart.com/dac.html para multiples BD, pero estos no lo he probado.