Ein Hallöle von
http://www.FrankNStein.de/Smiley-Wolke.gif und herzlich willkommen in unserer
DP-Gemeinde,
also, es gibt verschiedene Möglichkeiten.
Abfragen ob Sender ein bestimmtes Objekt ist:
If Sender is Button1 Then ...
Den Namen des Senders abfragen:
If TButton(Sender).Name = 'Button1' Then ...
Der Eigenschaft TAG der verschiedenen Objekte verschiedene Werte zuweisen und diese abfragen:
Delphi-Quellcode:
Case TButton(Sender).Tag of
1: ...
2: ...
...
End;
Direkt Sender was zuweisen:
TButton(Sender).Enabled := True;
...
( "TButton(Sender)" und "(Sender as TButton)" kommt auf's Selbe raus )
http://www.FrankNStein.de/Smiley-Kuss.gif * *
http://www.FrankNStein.de/Smiley-Spinne.gif * * *
http://www.FrankNStein.de/Smiley-Winken.gif