Voltar o oculto!!!
Oi Pessoal...
Como faço para voltar a ficar visivel programa que está oculto?
Eu o ocultei com: [color=red:ad6be58a6b]Application.ShowMainForm := False;[/color:ad6be58a6b]
Já tentei assim:
[color=blue:ad6be58a6b]$R *.res}
var
Hwnd: Thandle;
begin
Hwnd := FindWindow (´TfrmSenha´, ´Senha de Acesso´);
if Hwnd = 0 then
Begin
Application.Initialize;
Application.CreateForm(TfrmSenha, frmSenha);
Application.CreateForm(TfrmPrincipal, frmPrincipal);
Application.Run;
end
else
Begin
frmSenha.Show;
end;
end.[/color:ad6be58a6b]
Mas não da certo.
Poderiam me ajudar?
Grato.
Humberto
[color=red:ad6be58a6b]´Tudo posso naquele que me fortalece!!´[/color:ad6be58a6b]
Como faço para voltar a ficar visivel programa que está oculto?
Eu o ocultei com: [color=red:ad6be58a6b]Application.ShowMainForm := False;[/color:ad6be58a6b]
Já tentei assim:
[color=blue:ad6be58a6b]$R *.res}
var
Hwnd: Thandle;
begin
Hwnd := FindWindow (´TfrmSenha´, ´Senha de Acesso´);
if Hwnd = 0 then
Begin
Application.Initialize;
Application.CreateForm(TfrmSenha, frmSenha);
Application.CreateForm(TfrmPrincipal, frmPrincipal);
Application.Run;
end
else
Begin
frmSenha.Show;
end;
end.[/color:ad6be58a6b]
Mas não da certo.
Poderiam me ajudar?
Grato.
Humberto
[color=red:ad6be58a6b]´Tudo posso naquele que me fortalece!!´[/color:ad6be58a6b]
Hcaixeta
Curtidas 0