Hallo liebe Delphi Freunde,
ich habe Ähnliches schon woanders gepostet, aber hier ist wohl mehr los in der Bude.
Habe einen tollen Screensaver kreiert. Der einzige Schwachpunkt: Die Miniatur Vorschau im Einstellungsfenster klappt nicht. Die Vorschau soll lediglich das Firmenlogo zeigen.
Zuletzt habe ich folgendes probiert:
Delphi-Quellcode:
If ParamStr(1) = '/p' Then begin
ParentWnd:= _StrToInt(ParamStr(2)); // _StrToInt ist oben definierte Funktion mit Val(...)
Windows.GetWindowRect(ParentWnd, WndRect);
Form5.WindowHandle:= ParentWnd; //geht nicht
// Form5.Top:= WndRect.Top;
// Form5.Left:=WndRect.Left;
// Form5.Width:=152;
// Form5.Height:=112;
Form5.Image2.Visible:=true;
UpdateWindow(ParentWnd);
Refresh;
Was ich bis dato hinbekommen habe ist ein Formular das genau in das Preview Fenster hinein passt und auch an dieser Stelle des Einstellungsdialoges erscheint: ABER als seperates Window.
Viele Versuche (auch mit Canvas.Create, TBitmap.Create) führten zwar zu fehlerfreiem Compilieren jedoch blieb der Preview Bereich schwarz.
Vielen Dank für Tipps