TForm1.Button1Click Method

Unit: Unit1
procedure Button1Click(Sender: TObject)

Parameters

Sender
Type: Data.Bind.ObjectScope.TObject