Fórum Minimizar Aplicação #180310
06/09/2003
0
Tenho 2 forms. O principal chama o segundo através do ShowModal.
Acontece que quando minimizo o segundo form, o form principal fica na tela atrapalhando o acesso à area de trabalho do windows.
Gostaria de saber se há algum evento (do tipo como o OnClose) do form em que possa por um comando como ´Application.Minimize´ quando a janela do segundo form for minimizada para que a aplicação toda seja minimizada ???
Ou... Alguém tiver alguma outra solução ???
Rubensgalvanijr
Curtir tópico
+ 0Posts
06/09/2003
Aristodemo
...
procedure WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType = SC_MINIMIZE) then ...
end;
Espero ter ajudado.
Abraços...
Gostei + 0
08/09/2003
Rubensgalvanijr
mas não funcionou (ou não soube usar corretamente).
se alguém tiver outro comando ou solução, por favor me enviem.
Gostei + 0
12/09/2003
Rubensgalvanijr
Gostei + 0
12/09/2003
Rubensgalvanijr
:?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?:
Gostei + 0
12/09/2003
Nigro
Gostei + 0
12/09/2003
Rubensgalvanijr
O usuário não pode ter acesso ao Form Principal quando o segundo estiver ativo...
Gostei + 0
12/09/2003
Cebikyn
Gostei + 0
13/09/2003
Rubensgalvanijr
tá dificil de solucionar esse problema.
apesar de não ser tão importante, já tá me dando dor de cabeça.
alguém mais tem alguma ideia :?: :?: :?:
Gostei + 0
13/09/2003
Cebikyn
Na seção [b:a3623bb10e]private[/b:a3623bb10e], do segundo [i:a3623bb10e]form[/i:a3623bb10e], declare:
type
TForm2 = class(TForm)
...
private
// Declare isto:
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
{ Private declarations }
public
{ Public declarations }
end;Depois, em [b:a3623bb10e]implementation[/b:a3623bb10e], implemente:
procedure TForm2.WMSysCommand(var Msg: TWMSysCommand); begin case Msg.CmdType of SC_MINIMIZE: Application.Minimize; else inherited; end; end;
Gostei + 0
13/09/2003
Sistemald
[b:df102e11dc]form1.visible:= False;
form2.showmodal;[/b:df102e11dc]
No evento [b:df102e11dc]OnClose[/b:df102e11dc] do Form2 use o seguinte:
[b:df102e11dc]form1.visible:= True;[/b:df102e11dc]
Gostei + 0
13/09/2003
Dacunha
qualquer duvida te mando por e-mail, vc instala e usa.
dacunha2@ig.com.br
Gostei + 0
15/09/2003
Rubensgalvanijr
agora meu problema esta resolvido.
[b:ce594fea7a]Aristodemo[/b:ce594fea7a], peço desculpas. sou iniciante e não entendi sua explicação direito.
[b:ce594fea7a]cebikyn[/b:ce594fea7a], valeu pela explicação. agora o código funcionou corretamente.
[b:ce594fea7a]sistemald[/b:ce594fea7a], sua dica tb funciona perfeitamente.
agradeço a todos pela cooperação.
Gostei + 0
15/09/2003
Nildo
Você pode usar ele.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)