hello
ich habe diesen code eingebaut, um das Programm im Taskmanager NUR bei den Anwendungen nicht anzuzeigen, wenn ich eine ShowMessage aufrufe, wird die von den 2 Forms verdeckt.
Wie kann ich die Showmessages in den Vordergrund holen?
Delphi-Quellcode:
procedure TForm1.Label8Click(Sender: TObject);
begin
Form2.ShowModal;
end;
procedure TForm1.FormShow(Sender: TObject);
var
hwndOwner: HWnd;
begin
hwndOwner := GetWindow(
Handle, GW_OWNER);
ShowWindow(hwndOwner, SW_HIDE);
// For Windows 2000, additionally call the ShowWindowAsync function:
ShowWindowAsync(hwndOwner, SW_HIDE);
//Form is invisible, too
ShowWindowAsync(Self.Handle, SW_HIDE);
//Form is show
ShowWindowAsync(Self.Handle, SW_SHOW);
end;