Minimizar forms quando uso showmodal...

Delphi

22/03/2006

Olá, pessoal...

Tenho uma aplicação que possui o Form Principal, onde chamo o Form de Associados, usando showmodal. No Form de Associados tenho um botão que chama um Form de Pesquisa, onde também uso show modal...

O meu problema é o seguinte: quando minimizo a tela de Pesquisa, quero que todas as outras telas minimizem juntamente(a de Associados e a Principal, que estão por trás da tela de Pesquisa), o que hoje não está acontecendo.

Alguém sabe o que devo fazer para que todo o sistema minimize juntamente?

Um abraço...

Susana


Susi

Susi

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

22/03/2006

Chame o
    Application.Minimize
quando minimizar esse form... não testei aqui, estou sem Delphi, mais deve funcionar :wink:


GOSTEI 0
Susi

Susi

22/03/2006

Olá Paull,

Sou novata ainda...
Vc poderia me informar aonde e como vou saber que este form está sendo minimizado?

No aguardo...

Susana
:? :? :?


GOSTEI 0
Susi

Susi

22/03/2006

Olá, pessoal,

A quem possa interessar, consegui resolver da seguinte forma:

Na declaração [color=red:73de63b9aa]private [/color:73de63b9aa]do form coloco:

[color=blue:73de63b9aa]procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;[/color:73de63b9aa]

Depois, crio a procedure:

[color=blue:73de63b9aa]procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType = SC_MINIMIZE) then application.Minimize
else inherited;
end; [/color:73de63b9aa]

Minimiza todos os forms que tiverem abertos...

Susana


GOSTEI 0
POSTAR