Ver Mensaje Individual
  #2  
Antiguo 16-05-2008
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Reputación: 30
jhonny Va camino a la famajhonny Va camino a la fama
Prueba haciendo un llamado al método Refresh de ese formulario, dentro del Ciclo y nos cuentas:

Código Delphi [-]
 
procedure TfrmPrincipal.btnImportarClick(Sender: TObject);
var
  e: TfrmEspera;
begin
  dm.Table1.First;
  e:= TfrmEspera.Create(self);
  i:= 0;
  e.Show;
  e.Enabled:= True;
  while i < (dm.Table1.RecordCount) do
  begin
      .
      // Código de ingreso de datos
      .
      dm.Table1.Next;
      i:= i + 1;
      e.Refresh;
  end;
  dm.cdsDestino.ApplyUpdates(0);
  e.Enabled:= False;
  e.Close;
  e.Free;
end;
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita