AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign PopupMenu-Item in TTask aktivieren, OnClick nicht mehr möglich
Thema durchsuchen
Ansicht
Themen-Optionen

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

Ein Thema von DieDolly · begonnen am 14. Apr 2019 · letzter Beitrag vom 15. Apr 2019
Antwort Antwort
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#1

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

  Alt 14. Apr 2019, 15:33
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?
  Mit Zitat antworten Zitat
Benutzerbild von dummzeuch
dummzeuch

Registriert seit: 11. Aug 2012
Ort: Essen
1.604 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

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

  Alt 14. Apr 2019, 17:30
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.
Thomas Mueller
  Mit Zitat antworten Zitat
peterbelow

Registriert seit: 12. Jan 2019
Ort: Hessen
701 Beiträge
 
Delphi 12 Athens
 
#3

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

  Alt 15. Apr 2019, 12:02
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.
Peter Below
  Mit Zitat antworten Zitat
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#4

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

  Alt 15. Apr 2019, 13:13
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
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#5

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

  Alt 15. Apr 2019, 14:24
Ohne das vorherige außerhalb des Tasks stehende Enabled False funktioniert alles
Na ja, dann ist das Item ja auch schon von Anfang an Enabled. Wäre schon verwunderlich, wenn es damit nicht funktionieren würde.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#6

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

  Alt 15. Apr 2019, 15:26
Ohne das vorherige außerhalb des Tasks stehende Enabled False funktioniert alles
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.
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#7

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

  Alt 15. Apr 2019, 16:14
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?
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Fritzew

Registriert seit: 18. Nov 2015
Ort: Kehl
678 Beiträge
 
Delphi 11 Alexandria
 
#8

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

  Alt 15. Apr 2019, 16:30
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.
Fritz Westermann
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:53 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