> kako da pritiskom na bilo koji kreiran Button,promenim i boju i procitam caption tog Buttona?
Code:
var
btn: TButton
begin
btn := NekaFunkcijaKojaKreiraButton;
btn.OnClick := ButtonClickHandler;
end;
procedure TForm1.ButtonClickHandler(Sender: TObject);
begin
ShowMessage(TButton(Sender).Caption);
// Za promenu boje buttona se mora pisati custom paint, najbolje naslednik TButton. Lakše je da se koristi neki od third-party buttona koji
// direktno podrzavaju promenu boje. Nisam siguran ali mozda i JVCL button ima tu osobinu, ako ne onda Raize, Quantum...
end;