Nachtrag:
Nun leider funktioniert ein befehl immer noch nicht in meiner Anwendung!*heul*
Delphi-Quellcode:
//..und zurück:
SetWindowLong(
Handle, GWL_HWNDPARENT, Application.Handle);
hier was ich habe: Form2 wird mit Form2.Show; geöffnet und ist auf
fsStayOnTopeingestellt ,und sollte es auch bleiben.
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
if Form1.Visible = False
then
begin
Form1.Visible := True
[color=#ff002a]
//..und zurück:
SetWindowLong(
Handle, GWL_HWNDPARENT, Application.Handle);[/color]
end
else
Form1.Hide;
//OnDesktop..
SetWindowLong(
Handle, GWL_HWNDPARENT, 0);
end;
Hat jemand einen Rat für mich?