Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Modales Fenster und Propgressbar (https://www.delphipraxis.net/215537-modales-fenster-und-propgressbar.html)

Edelfix 24. Jul 2024 09:46

Modales Fenster und Propgressbar
 
Hallo,

folgende Situation:

Ich möchte ein Modales Fenster anzeigen und erst nach dem das Fenster sichtbar ist eine große Excel Datei laden (mit Inhalt für das Fenster).

Aktuell ist das Fenster nicht sichtbar aber die Datei wird im "onShow" Event schon geladen.

Für den User sieht es aber aus als ob nichts passiert obwohl er den Button "Fenster anzeigen" geklickt hat.

Lässt sich das ohne Thread und Timer lösen?

jaenicke 24. Jul 2024 10:09

AW: Modales Fenster und Propgressbar
 
Du kannst das zwar in OnActivate packen, aber das ändert nichts daran, dass dein Fenster einfriert, wenn du den Hauptthread blockierst. Das kann man mit Application.ProcessMessages abmildern, wenn du das während der Verarbeitung immer wieder aufrufst, aber eine schöne Lösung ist das nicht.

Längere Aktionen gehören in Threads...

Papaschlumpf73 24. Jul 2024 10:19

AW: Modales Fenster und Propgressbar
 
Für sowas benutze ich einfach das OnPaint-Ereignis des Formulars. Der erste Eintrag in der Paint-Procedure muss dann aber

Delphi-Quellcode:
MeineForm.OnPaint:=NIL;
sein, sonst wird die proc alle paar Millisekunden aufgerufen.

jaenicke 24. Jul 2024 16:13

AW: Modales Fenster und Propgressbar
 
Zitat:

Zitat von Papaschlumpf73 (Beitrag 1539152)
Für sowas benutze ich einfach das OnPaint-Ereignis des Formular.

Damit blockierst du aber die WM_PAINT Nachricht. Das ist keine gute Idee. Wenn man schon so etwas ohne Threads macht, dann wenigstens im OnActivate, per sich selbst geschickter Nachricht oder per Timer...

Papaschlumpf73 24. Jul 2024 17:03

AW: Modales Fenster und Propgressbar
 
Zitat:

Zitat von jaenicke (Beitrag 1539171)
Zitat:

Zitat von Papaschlumpf73 (Beitrag 1539152)
Für sowas benutze ich einfach das OnPaint-Ereignis des Formular.

Damit blockierst du aber die WM_PAINT Nachricht. Das ist keine gute Idee. Wenn man schon so etwas ohne Threads macht, dann wenigstens im OnActivate, per sich selbst geschickter Nachricht oder per Timer...

Ja, aber sollte doch einfach sein - siehe Post #1. Eine Alternative wäre auch noch, eine Variable z.B. ExcelLadevorgangGestartet bei OnPaint auszuwerten. Wenn false, dann auf true setzen und Excel-Datei laden; wenn true dann gar nichts machen.

Papaschlumpf73 24. Jul 2024 17:33

AW: Modales Fenster und Propgressbar
 
Mir ist gerade aufgefallen, dass ich diese Variante auch nur verwende, wenn die Ausführung des Codes ganz schnell geht. Ohne Thread wird sich das wohl kaum richtig gut umsetzen lassen. Da hat jaenicke schon recht.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:32 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz