Hallo Phantom,
durch sender: TObject im OnClick Event des Buttons, also z. B.
Delphi-Quellcode:
with sender as TButton do
begin
ShowMessage(Caption);
end;
Anstatt Caption kann natürlich auch Name (Name des Buttons) verwenden.
TButton wäre der Standard Button von Delphi, z. B. der BitBtn dann ist es TBitBtn.
Gruß
Jörg