Hola de nuevo Choclito, no me había fijado que pasaba eso, al parecer es normal ya que no estamos minimizando la aplicación sino ese formulario, para minimizar la aplicación podemos usar estos dos codigos.
Código Delphi
[-]
Application.Minimize;
ShowWindow(Application.Handle, SW_MINIMIZE);
Ahora sería capturar el evento cuando se realiza minimizar, lo que se me ha ocurrido primero es utilizar ApplicationEvent y su evento OnMinimize, pero no me ha funcionado. Capturando el mensaje WM_SYSCOMMAND, si funciona, aquí esta el ejemplo.
Código Delphi
[-]
procedure SYSCOMMAND(var Msg: TMessage); message WM_SYSCOMMAND;
...........
...........
procedure TForm2.SYSCOMMAND(var Msg: TMessage);
begin
if Msg.wParam = SC_MINIMIZE then
ShowWindow(Application.Handle, SW_MINIMIZE)
else
Inherited;
end;
Eso lo pones en tus formularios que no sean el formulario principal. Si hay otra forma, ya nos van corregir los amiguitos.
Me alegra que te estes mejorando
, a mi las motos me asustan la unica vez que subi, me he llevado un susto
, como para que nunca mas suba a una, te comento también que soy amiga no amigo
.
Saluditos