Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.164 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Thumbnail-Preview: Screenshot von Hauptform anzeigen

  Alt 6. Jan 2019, 12:35
@EWeiss,

danke für deine Bemühungen!
Leider funktioniert das nicht. Es liegt an GetWindowDC(GetDesktopWindow); und da habe ich keine Alternativen gefunden.

Inzwischen habe ich zumindest einen Workaround gefunden.

Delphi-Quellcode:
procedure Tfrm_OpenFileDialog.FormClose(Sender: TObject; var Action: TCloseAction);
...
  frm_OpenFileDialog.Hide; // "Unterform" unsichtbar machen...
  frm_Main.Hide;
  Sleep(10);
  frm_Main.Visible := True;
end;
Wenn man also die *Hauptform* beim Schließen einer "Unter"-Form kurz "unsichtbar" macht und dann "sofort" wieder sichtbar, dann zeigt die Windows API GetWindowDC(GetDesktopWindow) auch nur noch die Hauptform ohne die zuvor geöffnete "Unter"-Form an.
Natürlich ist das nicht schön, da das Programm kurz "flackert", aber eine andere Lösung kann ich momentan nicht finden.
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)

Geändert von juergen ( 6. Jan 2019 um 13:07 Uhr)
  Mit Zitat antworten Zitat