Super... vielen Dank!
1. SetWindowLong ... WS_ICONIC ist natürlich ein Mist von mir
2. Durch dein ExStyle greift jetzt SW_HIDE
hab jetzt folgendes (funktioniert auf WinXP bis SBS2011)
Delphi-Quellcode:
procedure TMainForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
Params.Style := WS_CHILD;
Params.ExStyle := Params.ExStyle or WS_EX_TOOLWINDOW;
end;
und
Delphi-Quellcode:
procedure TMainForm.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE);
end;
Das LMDPanelFill1 hat ein Bildchen und das ganze funktioniert einwandfrei (siehe Bildanhang)
Vielen Dank
Erich
Erich Wanker - for life:=1971 to lebensende do begin ..
O
/H\
/ \