Ver Mensaje Individual
  #12  
Antiguo 27-01-2010
Avatar de Red_Leon
Red_Leon Red_Leon is offline
Miembro
 
Registrado: oct 2007
Ubicación: Castilla la Mancha
Posts: 27
Reputación: 0
Red_Leon Va por buen camino
Cita:
Empezado por rgstuamigo Ver Mensaje
Segun veo puede que el problema vaya por el Timer que tienes corriendo en tu formulario de espera, para lo cual seria muy provechoso si mostraras el código que tienes en el evento OnTimer de tu Timer..
Aqui va el código

Código Delphi [-]

procedure TForm_Espera.Timer_CambioTimer(Sender: TObject);
begin
  {Aumento del progreso de la 'ProgressBar_Espera'}
  self.ProgressBar_Espera.StepIt;
  {Se comprueba si ha llegado al límite superior}
  if(self.ProgressBar_Espera.Position=self.ProgressBar_Espera.Max) then
  begin
    {Reseteo de la posición de la 'ProgressBar_Espera'}
    self.ProgressBar_Espera.Position:=self.ProgressBar_Espera.Min;
  end;
end;

De momento utilizo el .Create y .Free con el formulario y me va perfecto, pero todavia no he tenido tiempo de porque con .Close no se cerraba, me ha sido más rápido realizar el cambio que ver el porque.
Responder Con Cita