Hi,
du könntest bei der Erstellung der Buttons jedem Button, wie schon vorgeschlagen wurde, über eine Laufvariable eine Identnummer
in .TAG mitgeben.
Delphi-Quellcode:
...
var x : Integer;
x := 0;
...
begin
inc(x);
Buttons[i,j]:=TButton.Create(Form1);
Buttons[i,j].Parent:=Form1;
Buttons[i,j].Tag:=x;
...
Procedure ButtonWerBistDu(Sender: TObject);
begin
if sender is TButton Then ShowMessage('Ich bin Button '+IntToStr(TButton(sender).Tag));
end;
MJ