Sentencia SQL desde Delphi con Cremillas

[Casimiro Noteví]

Bueno, si necesitas un TTable, sólo tienes que usar un TIBDataSet y poner "select * from laTabla", ya tienes un TTable, que eso es lo que hacen todos, como ya sabes.

[[newtron]]

Empezado por Casimiro Notevi

Bueno, si necesitas un TTable, sólo tienes que usar un TIBDataSet y poner "select * from laTabla", ya tienes un TTable, que eso es lo que hacen todos, como ya sabes.

Ya, pero eso con tablas a partir de unos miles de registros no es operativo porque tardaría muchisimo en abrir la tabla, con la base de datos que yo uso la apertura de componentes ttable es inmediato independientemente del número de registros y quiero recordar que pasado esa historia estuve haciendo pruebas con algún componente de pago para firebird y también abrían los ttable de forma inmediata, pero ya era tarde.

[Casimiro Noteví]

Empezado por newtron

Ya, pero eso con tablas a partir de unos miles de registros no es operativo porque tardaría muchisimo en abrir la tabla, con la base de datos que yo uso la apertura de componentes ttable es inmediato independientemente del número de registros y quiero recordar que pasado esa historia estuve haciendo pruebas con algún componente de pago para firebird y también abrían los ttable de forma inmediata, pero ya era tarde.

uummm... creo que no

Abrir la tabla debe ser inmediato con todos, lo que ocurre es que algunos componentes tienen una propiedad para indicar si quieres que cargue todo en memoria o no.
Evidentemente, si tiene que cargarlos todos, por ejemplo, haciendo un 'fetch' (ir al final .last) o contar los registros, será lento cuando tengas muchos registros.
Pero todos trabajan igual, me explico, un componente Table es lo que he comentado antes, un Dataset que su sql pone "select * from tabla". No hay más, ni puede haberlo.
En este hilo se habló sobre ese tema y aquí están los resultados:

Zeos:

Código Delphi [-]
procedure TZAbstractTable.SetTableName(const Value: string);  
begin    
  if FTableName <> Value then    
  begin      
    FTableName := Value;      
    if Value <> '' then        
      SQL.Text := Format('SELECT * FROM %s', [FTableName])      
    else SQL.Text := '';
  end;
end;

IBX:

Código Delphi [-]
SQL := TStringList.Create;
   SQL.Text := 'select ' + {do not localize}
    QuoteIdentifier(DataBase.SQLDialect, FTableName) + '.*, ' {do not localize}
    + 'RDB$DB_KEY as IBX_INTERNAL_DBKEY from ' {do not localize}
    + QuoteIdentifier(DataBase.SQLDialect, FTableName);
  if Filtered and (Filter <> '') then
  begin
    SQL.Text := SQL.Text + ' where ' + Filter; {do not localize}
    bWhereClausePresent := True;

MDO:

Código Delphi [-]
SQL := TStringList.Create;
  SQL.Text := 'select ' + {do not localize}
    QuoteIdentifier(DataBase.SQLDialect, FTableName) + '.*, ' {do not localize}
    + 'RDB$DB_KEY as IBX_INTERNAL_DBKEY from ' {do not localize}
    + QuoteIdentifier(DataBase.SQLDialect, FTableName);
  if Filtered and (Filter <> '') then
  begin
    SQL.Text := SQL.Text + ' where ' + Filter; {do not localize}
    bWhereClausePresent := True;

IBDAC

Código Delphi [-]
select count(*) from table;
select * from table;

[[newtron]]

Pues con la base de datos que yo uso el tema de los ttable funciona exactamente igual que con bases de datos dbf, abres el ttable y directamente puedes pedir un recordcount, irte al final, etc de forma inmediata ya tenga uno o millones de registros. No sé, igual estoy confundido en algo pero funciona de esa forma.

[Casimiro Noteví]

Sí, bueno, para irte al final rápidamente puede tener, por ejemplo, un índice descendente. Pero de todas formas, salvo que sea una tabla muuuy grande y con muuuchos campos, será rápido siempre.
Y, por supuesto, un Ttable es un dataset con un "select *".
Otra cosa que se me ocurre en tu caso es que esa base de datos use técnicas de bases de datos de escritorio, que almacena el tamaño de cada registro y multiplica por la posición del registro que quieres ir y accede directamente a esa posición en la tabla. Pero en ese caso no usaría registros de longitud variable.
En fin, aunque he usado bases de datos dbisam, no conozco elevatedb.

[[newtron]]

Bueno, la verdad es que no sé cómo van las tripas de estas cosas. Lo único que pude comprobar es que con las pruebas que hacía con firebird tardaba bastantes segundos en abrir una tabla de algunos miles de registros y eso me hizo desistir de esa vía, sin embargo con esto es todo igual que con los dbf.

[Casimiro Noteví]

Claro, es que es muy diferente usar unos componentes u otros, no es lo mismo zeos que fibplus, la diferencia en velocidad es bastante significativa.
Pero, de todas formas, ahora mismo yo aplicaría el famoso: "si funciona, no lo toques". Es lo mejor