Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich (https://www.delphipraxis.net/200370-popupmenu-item-ttask-aktivieren-onclick-nicht-mehr-moeglich.html)

DieDolly 14. Apr 2019 14:33

PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Der Titel ist vielleicht etwas irreführend. Aber es geht im Prinzip darum.
Ich klicke in einem ListView mit der rechten Maustaste auf ein Item, das PopupMenu erscheint.
Im Moment des Klicks auf das Item wird eine Prozedur ausgeführt die bestimmte Einträge im PopupMenu Enabled True oder Enabled False einstellt.
Das klappt bei allen bis auf einen Eintrag. Diesen letzten Eintrag lasse ich über einen TTask schalten. Das funktioniert auch. Aber danach wird kein Klick mehr auf diesen Menueintrag akzeptiert.
Bevor der Task gestartet wird, stelle ich außerhalb des Tasks das Menuitem noch manuell auf False.
Ein Showmessage in der obersten Zeile des Menuitem-Klickevents wird mir nicht angezeigt. Ohne TTask funktioniert das alles.
Das Aufschalten der Menueinträge ist natürlich synchronisiert.
Was läuft hier schief, dass der OnClick auf das PopupMenu-Item danach nicht mehr akzeptiert wird, obwohl das Item auf Enabled True gestellt wurde?

dummzeuch 14. Apr 2019 16:30

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Verstehe ich das richtig:

* Du hast einen TPopupMenu.OnPopup Event
* In dem Du diverse Menu-Einträge enablest
* Bis auf einen, fuer den wird ein Hintergrundthread (TTask) gestartet, der mittels Synchronize dann ggf. diesen enabled
* Letzeres funktioniert nicht.

Meine Vermutung: Nach beenden des Events, wir das Menü bereits angezeigt. Wenn dann der Thread fertig ist, kann das Menü nicht mehr verändert werden.

Teste mal, ob es funktioniert, wenn Du den Code des Threads direkt im OnPopup-Event ausführst.

peterbelow 15. Apr 2019 11:02

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Zitat:

Zitat von DieDolly (Beitrag 1430285)
Der Titel ist vielleicht etwas irreführend. Aber es geht im Prinzip darum.
Ich klicke in einem ListView mit der rechten Maustaste auf ein Item, das PopupMenu erscheint.
Im Moment des Klicks auf das Item wird eine Prozedur ausgeführt die bestimmte Einträge im PopupMenu Enabled True oder Enabled False einstellt.
Das klappt bei allen bis auf einen Eintrag. Diesen letzten Eintrag lasse ich über einen TTask schalten. Das funktioniert auch. Aber danach wird kein Klick mehr auf diesen Menueintrag akzeptiert.
Bevor der Task gestartet wird, stelle ich außerhalb des Tasks das Menuitem noch manuell auf False.
Ein Showmessage in der obersten Zeile des Menuitem-Klickevents wird mir nicht angezeigt. Ohne TTask funktioniert das alles.
Das Aufschalten der Menueinträge ist natürlich synchronisiert.
Was läuft hier schief, dass der OnClick auf das PopupMenu-Item danach nicht mehr akzeptiert wird, obwohl das Item auf Enabled True gestellt wurde?

Schwer zu sagen, die Datenlage ist definitiv unzureichend :?. Machst Du irgendwas mit dem Menu innerhalb des Tasks, das nicht synchronisiert ist?. Die VCL erzeugt halt diverse API Handles erst bei Bedarf, und wenn das außerhalb des main threads passiert ist das Handle dem falschen thread zugeordnet und bekommt dann keine messages zugestellt, weil der thread keine message loop hat.

DieDolly 15. Apr 2019 12:13

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Ich habe einen Test gemacht und mir ist aufgefallen dass wenn ich das MenuItem vor dem TTask auf Enabled False stelle und dann synchronisiert im TTask auf Enabled True der Klick auf das Item danach nicht mehr erkannt wird. Ohne das vorherige außerhalb des Tasks stehende Enabled False funktioniert alles :roll:

Uwe Raabe 15. Apr 2019 13:24

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Zitat:

Zitat von DieDolly (Beitrag 1430333)
Ohne das vorherige außerhalb des Tasks stehende Enabled False funktioniert alles :roll:

Na ja, dann ist das Item ja auch schon von Anfang an Enabled. Wäre schon verwunderlich, wenn es damit nicht funktionieren würde.

DieDolly 15. Apr 2019 14:26

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Zitat:

Zitat von Uwe Raabe (Beitrag 1430343)
Zitat:

Zitat von DieDolly (Beitrag 1430333)
Ohne das vorherige außerhalb des Tasks stehende Enabled False funktioniert alles :roll:

Na ja, dann ist das Item ja auch schon von Anfang an Enabled. Wäre schon verwunderlich, wenn es damit nicht funktionieren würde.

Im TTask schalte ich es synchronisiert erst auf Enabled False und nach erfolgreich durchgeführter Arbeit auf True.

Uwe Raabe 15. Apr 2019 15:14

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Zitat:

Zitat von DieDolly (Beitrag 1430351)
Im TTask schalte ich es synchronisiert erst auf Enabled False und nach erfolgreich durchgeführter Arbeit auf True.

Und dazwischen wird das MenuItem auch als Disabled dargestellt?

Fritzew 15. Apr 2019 15:30

AW: PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
 
Wenn ich das richtig verstehe ist das Popumenü zum Zeitpunkt der gewünschten Änderungen schon sichtbar?
Ich denke mal das kann nicht funktionieren, da Windows für ein Popupmenü eine eigene Messageloop benutzt.
Deshalb kommen keine Messages aus dem Programm da richtig an.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:49 Uhr.

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