Get Child Index

[h***@googlemail.com]

Hallo,

auf einem Panel liegen viele Labels. Alle onClick Ereignisse der Labels zeigen auf dieselbe Prozedur. Wie kann ich nun in dieser Prozedur am einfachsten herausfinden, auf welches Label geklickt wurde?

Harald

[Jakob Achterndiek]

Post by h***@googlemail.com
Hallo,
auf einem Panel liegen viele Labels. Alle onClick Ereignisse der Labels
zeigen auf dieselbe Prozedur. Wie kann ich nun in dieser Prozedur am
einfachsten herausfinden, auf welches Label geklickt wurde?

procedure TForm1.AnyLabelClick(Sender: TObject);
begin
with (Sender as tLabel) do ShowMessage(Name+#13#10+Caption);
end;


j/\a
--

[Hans-Peter Diettrich]

Post by h***@googlemail.com
Hallo,
auf einem Panel liegen viele Labels. Alle onClick Ereignisse der
Labels zeigen auf dieselbe Prozedur. Wie kann ich nun in dieser
Prozedur am einfachsten herausfinden, auf welches Label geklickt
wurde?

Das Label steht in Sender.

DoDi