Array
(
)

Minimizar forms quando uso showmodal...

Susi
   - 22 mar 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


Paullsoftware
   - 22 mar 2006

Chame o
#Código

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


Susi
   - 22 mar 2006

Olá Paull,

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

No aguardo...

Susana
:? :? :?


Susi
   - 27 mar 2006

Olá, pessoal,

A quem possa interessar, consegui resolver da seguinte forma:

Na declaração private do form coloco:

procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;

Depois, crio a procedure:

procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType = SC_MINIMIZE) then application.Minimize
else inherited;
end;

Minimiza todos os forms que tiverem abertos...

Susana