Ver Mensaje Individual
  #4  
Antiguo 31-05-2004
Avatar de tcp_ip_es
tcp_ip_es tcp_ip_es is offline
No confirmado
 
Registrado: ago 2003
Ubicación: Madrid
Posts: 635
Reputación: 0
tcp_ip_es Va por buen camino
otra manera es tratar el nuevo form como si fuera un splash y mientras se esta mostrando bloquear los controles desde el que lo llamas:

Código Delphi [-]
procedure TForm1.BotonProcesoCargaClick(Sender: TObject);
PanelFormulario.enabled:=false;
  FSplash := TFSplash.Create(application);
  FSplash.Show;
  FSplash.Update;

// Aqui iría el proceso de carga

  FSplash.Hide;
  FSplash.Free;
PanelFormulario.enabled:=true;

Espero que te sirva, Saludos Tony
Responder Con Cita