Cita:
Si el compilador detecta que alguna parte del código no se ejecuta nunca
|
mas extraño aun, o no entiendo en que aspecto esa optimización es aplicada. Porque esa parte del código siempre debe ejecutarse.....
El código en cuestión es para pasar datos en Paradox a tablas de FB 1.5.2 (no pude con el IBPump cuando éstas tienen diferente nombre, probé de variadas maneras). Opté hacerlo por código, y de paso me queda.
Lo curioso es que andar anda, o sea, se ejecuta la línea.
Código:
procedure Tfpasaje.Button1Click(Sender: TObject);
begin
application.MessageBox('Transferencia....', 'Esperar..',MB_OK);
dm.IBDB.Connected := True;
dm.cdsTablaIB.Active := True; // Aqui pongo breakpoint.
dm.tblBde.Active := True;
dm.cdsTablaPdox.Active := True;
while not dm.cdsTablaPdox.Eof do
begin
dm.cdsTablaIB.Insert; // Aqui pongo breakpoint.
Saludos, rochi