TForm1.Button4Click Method

Unit: Unit1
procedure Button4Click(Sender: TObject)

Parameters

Sender
Type: Vcl.ImageCollection.TObject