Delphi-PRAXiS
Seite 1 von 2  1 2      

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/)
-   -   Delphi TTntListView - OnMouseUp nicht bei Rechtsklick? (https://www.delphipraxis.net/100740-ttntlistview-onmouseup-nicht-bei-rechtsklick.html)

xZise 3. Okt 2007 09:44


TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Ich habe folgendes Problem mit der TTntListView:
Und zwar wenn man rechts auf die ListView klickt, dann wird das OnMouseUp-Ereignis nicht aufgerufen. Nur Mitte/Links ?!

Warum :) ?

MfG
xZise

xZise 4. Okt 2007 15:49

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Benutzt niemand TntListView?

OldGrumpy 4. Okt 2007 21:32

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Ohne das jetzt direkt mit der Komponente ausprobiert zu haben... hast Du ein Popup-Menu zugewiesen? Ich hab letztens (ich glaube es war beim StringGrid) festgestellt, dass der OnMouseUp-Event beim rechten Mausbutton erst kommt wenn das Popupmenu wieder zu ist. Allerdings gings mir da um was anderes so dass ich nicht die Zeit investiert hab um zu schauen ob das jetzt der MouseUp vom Rechtsklick oder der MouseUp von der Auswahl des Popupmenuitems war... (ich brauchte einen Event vor dem Popup und hab dann MouseDown verwendet)

Vielleicht hilft Dir das weiter :)

raiguen 4. Okt 2007 21:52

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Doch.. ICH :lol:
Kann Dein Prob nicht nachvollziehen :gruebel: . Hab mal kurz folgendes getestet und es funktioniert einwandfrei:
Delphi-Quellcode:
procedure TfrmANYDAC_DemoForm1.TntListView1MouseUp(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
   if Button = mbLeft then ShowMessage('MouseUp linke Maustaste');
   if Button = mbMiddle then ShowMessage('MouseUp mittlere Maustaste');
   if Button = mbRight then ShowMessage('Mouseup rechte Maustaste');
end;
//EDIT: OldGrumpy hat richtig 'geraten' *grins* : sobald ein PopupMenu zugewiesen wird, dann funzt das Ganze nicht mehr bei rechter Maustaste :(

xZise 5. Okt 2007 20:36

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Entschuldigung, aber das war es leider nicht!
Mitte/Links erkennt er und sagt dann auch, dass PopupMenu = nil ist ?!

OldGrumpy 5. Okt 2007 20:43

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Dann bitte mal etwas Code :)

xZise 5. Okt 2007 20:45

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Wovon?

OldGrumpy 5. Okt 2007 22:34

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Taktaky, bist Du das? ;) Na wovon denn wohl? raiguen hat da oben Code präsentiert der bei ihm problemlos geht (bei mir übrigens auch), vielleicht kannste mal ein Miniprojekt bauen das demonstriert, was bei Dir nicht geht? Eigenständig denken kostet wohl extra, hm? *grummel*

Alternativ könntest Du auch meine Kristallkugel reparieren :mrgreen:

(Antworten 2$. Antwort passend zur Frage $5. Richtige Antwort $10.)

//EDIT: Auch im dritten Anlauf noch nen Tippfehler übersehen *sigh*

xZise 6. Okt 2007 08:35

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Entschuldigung dass du dich so darüber entrüstet:
Zitat:

Zitat von xZise
Und zwar wenn man rechts auf die ListView klickt, dann wird das OnMouseUp-Ereignis nicht aufgerufen.

Und wie ich bereits sagte: PopupMenü ist nil!
Also weiß ich leider nicht, welchen Code du brauchst!

Zitat:

Zitat von OldGrumpy
(Antworten 2$. Antwort passend zur Frage $5. Richtige Antwort $10.)

Macht also $5 $2 xD

Ich werde einfach mal ein Miniprojekt erstellen!

MfG
xZise

[edit]Wie komme ich darauf dass sie passend zur Frage war :cyclops: [/edit]

[edit=2]So! Jetzt habe ich das minimalisert und es funktioniert leider einwandfrei. Nur erkenne ich keinen Unterschied :( [/edit]

[edit=3]Hehe ;) Ich habe den Übeltäter! Und zwar wenn Multiselect an ist, muss man erstmal ein paar mal klicken, bis er anspringt![/edit]

OldGrumpy 6. Okt 2007 09:30

Re: TTntListView - OnMouseUp nicht bei Rechtsklick?
 
Na bitte, geht doch. In vielen Fällen führt das "Problem in ein Miniprojekt bauen" praktisch direkt zur Lösung :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:33 Uhr.
Seite 1 von 2  1 2      

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