Hallo,
gibt es eine möglichkeit rauszufinden, durch welchen button eine routine aufgerufen wurde oder muß ich zwingend für jeden button eine eigene routine schreiben, auch wenn sie prinzipiell das gleiche tun?
Delphi-Quellcode:
type Trecord = record
value : integer;
button : Tbutton;
end;
var test: array[0..1] of Trecord;
procedure TForm1.ButtonClick(Sender: TObject);
//onClick bei test[0].button und test[1].button
begin
label1.caption:='Wert :'+inttostr(test[0 oder 1].value)
//gibt den zum button gehörigen wert aus
end
gibt es da eine möglichkeit? ich muß ja sozusagen vom button auf den record schließen um so die komponenten des records ansprechen zu können. mein gefühl sagt mir, dass das nicht unbedingt realisierbar sein muß, zur not muß ich eben mit copy + paste für jeden button 'ne procedure schreiben...