Hallo,


ich erzeuge in einem Delphi-Projekt mehrere TPanels in Form
kleiner Kästchen (vgl. Lotto-Kästchen) dynamisch zur Laufzeit
in einem TPanel-"Array". Jedem weise ich ein und dieselbe (!!!)
OnClick-Funktion zu, die aufgerufen wird, wenn man eines der
TPanels anklickt, denn sonst werden es zuviele einzelne Funktionen.

Nun die Frage:

Wie kann ich erkennen, welches TPanel ich mit der Maus geklickt
habe. Um Variablen kann man die PanelClick-Funktion nicht erweitern,
da Delphi dann meckert, es sei plötzlich eine Prozedur.

In der Funktion steht ja immer ein (Sender: TObject). Kann man
irgendwie da herausbekommen wie das geklickte TPanel oder eine
seinder Eigenschaften hieß, z.B. den Hint, den ich hochnummeriere
und so identifiizieren könnte, welches ich denn geklickt habe?

Zur Veranschaulichung: Es werden z.B. 49 Panels angelegt und weil
das ja recht viele sind, will ich alle dynamisch zur Laufzeit
generieren - klappt auch. Und jedem Panel.Onclick weise ich die
PanelClick Funktion zu. Jetzt müßte ich nur noch herausbekommen,
welches konkrete Panel ich denn eben zufällig angeklickt habe.
Am elegantesten wäre ja ein Parameter, der mir aber nicht gestattet
ist, weil man wohl OnClickEvents nichts neues Dazugeben darf.

Weiß jemand Rat?


Danke!

DelphMan

Ich würde den umweg über die Maus gehen.
Wenn du guckst, wo die Maus ist, kannst du herausfinden, welcher button geklickt
wurde. Das geht dann glaube ich mit GetCursorPos oder so.

Arne

DelphMan hat folgendes geschrieben:

In der Funktion steht ja immer ein (Sender: TObject). Kann man irgendwie da herausbekommen wie das geklickte TPanel oder eine seinder Eigenschaften hieß, z.B. den Hint, den ich hochnummeriere und so identifiizieren könnte, welches ich denn geklickt habe?

Genau das ist der richtige Weg. Probier mal den Code:




MrSaint


// edit: klammern im Code hinzugefügt...

Ist wohl besser ...

Wow, Suuuper! Es klappt! Und so einfach!

Vielen vielen Dank!!!

Geht auch kürzer:


Moderiert von raziel: Delphi-Tags hinzugefügt.

@Manuell: da bekommst du aber ein Problem, wenn der Sender einmal kein TPanel sein sollte..

MrSaint hat folgendes geschrieben:

@Manuell: da bekommst du aber ein Problem, wenn der Sender einmal kein TPanel sein sollte..

Ja ok, hauptsächlich wollte ich darauf hinaus dass man nicht zwingend eine zusätzliche Variable deklarieren muss um auf Sender zuzugreifen. Der Test ob es wirklich ein TPanel dachte ich entfällt, da er die Prozedur ja hoffentlich nur bei Panel-Ereignissen eingetragen hat.