TTaskbar mit Progress-Anzeige

[Gausi]

Ich versuche gerade, meine bisher benutzte Taskbar-Komponente durch die seit einiger Zeit mitgelieferte TTaskbar zu ersetzen, um die Anzahl der verwendeten 3rd-Party-Komponenten zu reduzieren. Selbst gemaltes Vorschaubild und Taskbar-Buttons funktionieren nach ein paar kleinen Änderungen einwandfrei, aber die Fortschritts-Anzeige will nicht. Zumindest dann nicht, wenn ich zur Laufzeit den VCL-Style wechsle.

Interessanterweise bleibt die Fortschrittsanzeige erhalten, wenn ich entgegen der Anleitung Application.MainFormOnTaskbar := False; setze - nur sind dann nach einem Style-Wechsel die Buttons in der Vorschau weg.

Gibt es eine Möglichkeit, beides zu nutzen, oder ist das ein Bug in der Delphi-Komponente? Minimal-Projekt ist im Anhang (Fortschritt ist an die Trackbar gekoppelt). Ich nutze die Community-Edition in Version 10.3.

[venice2]

Zitat:

oder ist das ein Bug in der Delphi-Komponente?

Nö. Wenn überhaupt dann in den VCL-Styles
Lass sie weg dann geht's doch. Oder?

[Gausi]

Zitat von venice2:

Nö. Wenn überhaupt dann in den VCL-Styles

Kannst du das irgendwie belegen oder näher erläutern, damit ich Ansätze habe, um den Fehler zu beheben oder zu umgehen? Knackpunkt an der Geschichte sind die Fensterhandles, wenn ich das richtig sehe. Bei einer Änderung des Styles werden (müssen?) die Fenster neu erstellt werden. Damit ändern sich auch die Handles, und das scheint Probleme zu machen. Die TTaskbar-Komponente bekommt diese Änderung nicht mit. Ich habe im Code leider noch nicht herausgefunden, warum der eine Teil funktioniert, und der andere nicht, und mit Änderung von MainFormOnTaskbar ist es genau andersrum.

Zitat von venice2:

Lass sie weg dann geht's doch. Oder?

Das ist keine Option.

[venice2]

Zitat:

Kannst du das irgendwie belegen oder näher erläutern, damit ich Ansätze habe, um den Fehler zu beheben oder zu umgehen?

Wenn die Taskbar Komponente innerhalb der IDE (von Delphi selbst) ohne den VCL-Styles funktioniert wie sie soll dann ist sie doch in Ordnung oder nicht?
Was muss man dann belegen?

Es gibt drei Extended Window Styles die Einfluss darauf haben könnten (Und ich denke diese werden von den VCL-Styles verbogen).

WS_EX_APPWINDOW

Zitat:

Forces a top-level window onto the taskbar when the window is visible.

WS_EX_TOOLWINDOW

Zitat:

A tool window does not appear in the taskbar

WS_EX_NOACTIVATE

Zitat:

The window does not appear on the taskbar by default. To force the window to appear on the taskbar, use the WS_EX_APPWINDOW style.

Schaue also was von den VCL-Styles hier verbogen wird.
So wie mir bekannt ist kann der WS_EX_TOOLWINDOW Extended Window Styles nur geändert werden wenn das Fenster bzw. die Anwendung neu gestartet wird.
Musst halt mal testen.

Zitat von Gausi:

Zitat von venice2:

Lass sie weg dann geht's doch. Oder?

Das ist keine Option.

Habe nicht gesagt du sollst sie weglassen sondern in deinem Example mal ausschalten ob die TaskBar (Progressbar\Buttons) ohne funktioniert.
Wenn ja dann liegt es an den VCL-Styles.

Mein Vorschlag wäre die Taskbar Komponente dynamisch zu erstellen.
Denn die welche auf deiner Form liegt ist beim wechsel auf einen anderen VCL-Style nicht mehr gültig. (Das Interface ITaskBarList3 wird beim wechsel auf ein anderes HWND (Fenster zerstört))

[himitsu]

Jupp, beim Wechsel des VCL-Styles wird das HWND des Fensters neu generiert und dabei gehen dann derartige Registrierungen verloren.
Betrifft z.B. auch einige Drag&Drop-Komponenten.

Versuch mal probehalber nach dem Umstellen die TTaskbar-Komponente zu löschen und neu zu erstellen ... geht es dann wieder?
Du könntest dich vermutlich hier auch ins TWinControl.CreateWnd bzw. CreateHandle der Form reinhängen und dort darauf reagieren.




Bezüglich dem MainFormOnTaskbar, da stimmt auch irgendwie garnichts mehr.
https://www.delphipraxis.net/205177-...rt-10-4-a.html

Und ich hatte auch die TJumpList nicht zusammen mit TTaskbar zum Laufen bekommen.

[venice2]

Zitat von himitsu:

Jupp, beim Wechsel des VCL-Styles wird das HWND des Fensters neu generiert und dabei gehen dannderartige Registrierungen verloren.

Versuch mal probehalber nach dem Umstellen die TTaskbar-Komponente zu löschen und neu zu erstellen ... geht es dann wieder?



Und bezüglich dem MainFormOnTaskbar, da stimmt auch irgendwie garnichts mehr.
https://www.delphipraxis.net/205177-...rt-10-4-a.html

Sagte ich schon!
Ja! das Fenster Handle wird jedesmal neu generiert.
Dynamisches erstellen der Kompo sollte das Problem eigentlich beheben.

Zitat:

Und ich hatte auch die TJumpList nicht zusammen mit TTaskbar zum Laufen bekommen.

Prüfe mal ob du die Freigabe dafür erstellt hast. (Win10) (Personalisieren\Taskleiste)

[himitsu]

Naja, "beheben" würde es das Problem, wenn die Komponente von selbst drauf reagiert.

Das Wechseln des Styles ist ja nicht das einzige Ereignis, welches die HWNDs neu erstellt, bzw. freigab.
Da reicht seit Jahrzehnten schon das Ändern von FormStyle, AlphaBlend oder anderen noch viel hamloseren Dingen, wie mit'm RDP neu verbinden.


Badges: Jupp, ist aktiv.
Firefox, Explorer und selbst Notepad können es.

[venice2]

Zitat:

Naja, "beheben" würde es das Problem, wenn die Komponente von selbst drauf reagiert.

Das Wechseln des Styles ist ja nicht das einzige Ereignis, welches die HWNDs neu erstellt, bzw. freigab.
Da reicht seit Jahrzehnten schon das Ändern von FormStyle, AlphaBlend oder anderen noch viel hamloseren Dingen, wie mit'm RDP neu verbinden.

Jup. Traurig genug.
Für mich persönlich sind die Styles ein NOGO aber jedem das seine.

Hier ist meine .odl (Object Definition Language)
Daraus kann man seine TypeLib erstellen dann benötigt man keine Komponente. (Ok für VB, sollte aber für Delphi schnell umzuschreiben sein, c++ syntax)

[TurboMagic]

Zitat von himitsu:

Jupp, beim Wechsel des VCL-Styles wird das HWND des Fensters neu generiert und dabei gehen dann derartige Registrierungen verloren.
Betrifft z.B. auch einige Drag&Drop-Komponenten.

Ist das schon in QP gemeldet, damit es Mal hoffentlich
eine Lösung gibt?

[Gausi]

Danke für die Antworten! Das mit dem dynamischen Erstellen der TTaskbar nach dem Style-Wechsel klappt.

Gibt noch ein paar kleine Fallstricke dabei:

• Nach dem Create und dem Erstellen aller Buttons etc. muss man noch ein newTaskBar.Initialize; einfügen
• Das gibt aber eine Exception, weil dann das (neue) Fenster zunächst noch unsichtbar ist (bzw. nicht komplett neu erzeugt?), also fügt man ein vor dem Erstellen der Taskbar ein Application.ProcessMessages ein, oder arbeitet mit einem Timer, oder sendet sich selbst ne Message oder sonst irgendwas in der Art.

Mit der Lösung kann ich gut leben. Scheint soweit zu klappen, zumindest in dem Testprojekt.

Und jetzt verstehe ich auch die Aussage, dass der Bug wohl auf Seite der Styles liegt. Der StyleManager kümmert sich darum, dass das Fenster und alles drumherum neu erstellt wird, also müsste das auch für diese Komponente gelten. Tut er aber allem Anschein nach nicht (oder nicht vollständig).
Eine andere Möglichkeit wäre ja auch, dass die TTaskbar-Komponente auf den Stylewechsel reagieren könnte bzw. irgendwie mit wechselnden Handles klar kommen müsste. Dann wäre der Bug dort zu suchen gewesen.