Moin, nochmal,
hatte gerade noch einen Zufallstreffer: Man kann auch Nicht-Hauptformulare auf StayOnTop bringen.
1. Hauptformular auf Stay-onTop setzen
2 Unterfomular auf StayOnTop setzen
3 Im Unterformular unseren
WinApi aufruf durchführen
Delphi-Quellcode:
procedure TForm2.FormShow(Sender: TObject);
begin
SetWindowPos(
Handle, HWND_TOPMOST, Left,Top, Width,Height, SWP_NOACTIVATE
or SWP_NOMOVE
or SWP_NOSIZE);
end;
So habe ich jetzt auch meinen Splash-Screen auf StayOn top bis ich Ihn nach drei Sekunden
per Timer schließen lasse.
Schönen Anbend noch... // Martin
