Einzelnen Beitrag anzeigen

a.def
(Gast)

n/a Beiträge
 
#2

AW: 4 Buttons abfragen

  Alt 6. Apr 2017, 19:41
Ich habe das nicht ganz verstanden. Klingt irgendwie wie ein Spiel?

Ich würde allen 4 Buttons ein einzigartiges Tag geben (0,1,2,3) und allen Buttons denselben OnClick verpassen und dann im OnClick prüfen:
Delphi-Quellcode:
 if TButton(Sender).Tag = iButtonStart then
  begin
   // tue etwas, wenn der gedrückte Button der Startbutton ist
  end
 else if TButton(Sender).Tag = iButtonEnd then
  begin
   // tue etwas, wenn der gedrückte Button der Endbutton ist
  end;
Irgendwo dann noch in Variablen festlegen, welcher Button der Start- und Endbutton ist:
Delphi-Quellcode:
iButtonStart := 2;
iButtonEnd := 1;
  Mit Zitat antworten Zitat