Lentitud Firebird

[mjjj]

hola caral... osea me recomiendas cambiarme a zeos?

Que componente puedo utilizar para guardar registros en una tabla... y que sea lo mas rapido posible. Les dejo aqui el codigo que utizo ahora...

Código Delphi [-]
ibdataset1.Close;
ibdataset1.SelectSQL.clear;
ibdataset1.SelectSQL.add('select * from compras');
ibdataset1.SelectSQL.add('where empresa ='+quotedstr(empresa));
ibdataset1.SelectSQL.add('AND noc='+quotedstr(noc));
ibdataset1.open;

if ibdataset1.isempty = false then
BEGIN
 ibdataset1.Edit;
 ibdataset1.FieldByName('fecha').Asdatetime:=strtodate(sedit2.text);
 ibdataset1.FieldByName('oficina').AsString:=scombobox1.text;
 ibdataset1.FieldByName('lugar_desp').AsString:=scombobox2.text;
 ibdataset1.FieldByName('tipo_oc').AsString:=scombobox3.text;
 
AQUI VAN MAS INGRESOS... LA TABLA TIENE 40 CAMPOS, SOLO PUSE ALGUNO A MODE DE EJEMPLO
 
 ibdataset1.post;
form1.IBTransaction1.Commit;

Que tal este codigo para ingresar datos... como puedo mejorarlo para aumentar la velocidad de la transaccion

Saludos