Abfrage ob button gedrückt worden ist

[Wadim]

hi,

ich hätte da eine frage, ich habte ein programm geschrieben das viele buttons hat, jetzt will ich nocht für jeden button klick einen eigenen code schreiben sondern dies über eine schlaufe laufen lassen...bisschen schwer zu erkläre, woran ich z.zt scheiter ist die abfrage ob der button gedrückt worden ist...also z.b

Delphi-Quellcode:

if bitbtn1.clicked = true then
  begin
    bla bla
  end;

ich weiß das es diesen befehle "clicked" nicht gibt, aber gibt es irgendeinen befehl der das abfragt, also wenn ich drauf klicke das er dann aufragt ob dieser geklickt worden ist....

danke für eure hilfe

mfg wadim

[Bernhard Geyer]

Der Sender-Parameter gibt an welcher Button gedrückt wurde

Delphi-Quellcode:

if Sender = MeinButton1 then
  blabla1
else if Sender = MeinButton2 then
  blabla2;

[Wadim]

Zitat:

Zitat von Bernhard Geyer

Der Sender-Parameter gibt an welcher Button gedrückt wurde

Delphi-Quellcode:

if Sender = MeinButton1 then
  blabla1
else if Sender = MeinButton2 then
  blabla2;

herzlichen dank, klapt wunderbar :)

mfg wadim

[Christian Seehase]

Moin Wadim,

oder eine andere Variante, unter Ausnutzung der Eigenschaft Tag:

Delphi-Quellcode:

case (Sender as TButton).Tag of
  //...
end;

Hierfür muss sichergestellt sein, dass der Sender auch tatsächlich immer eine TButton-Kompo (oder Ableitung davon) ist, und Du musst für jeden Button den Wert für Tag entsprechend setzen.