Minimizar....

[craven]

Hola amigos. Me gustaria minimizar mi aplicación mientras ésta realiza varios cálculos. Si empleo el método Application.Minimize, los cálculos se detienen hasta que vuelta a restaurar la ventana. Por otro lado, si empleo TForm.WindowState := wsMinimized, la ventana se mininmiza en un lateral de la pantalla, pero no baja a la barra de tareas. ¿Cómo podría hacer para que se minimizara en la barra de tareas y continúe funcionando mientras tanto? Gracias por la ayuda.

[__cadetill]

prueba con Hide y Visible


procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
Hide;
WindowState := wsMinimized;
for i := 1 to 1000000000 do
begin
end;
Visible := true;
end;

[roman]

¿Cómo está eso de que los cálculos se detienen? ¿Podrías dar un ejemplo del tipo de cálculos?

Acabo de probar un ciclo similar al de cadetill poniendo Application.Minimize y Application.Restore antes y después del ciclo y funciona normalmente.

Como este ciclo no representa realmente cálculos complicados abrí el ejemplo de threads que incluye Delphi en donde se ejecutan simultáeamente tres algoritmos de ordenación. Añadí Application.Minimize al momento de iniciar la ordenación y Application.Restore al término de ésta y todo funcionó sin problemas.

// Saludos

[craven]

La verdad es que no se por qué no funcionaba, porque estabe bien hecho, pero en fin... De repente lo volví a escribir y ahora funciona. Lo que tenia que hacerse mientras estaba minimizado era un bucle con una serie de cálculos matemáticos. Pero ya funciona. Gracias por vuestra ayuda. Un saludo.