TForm1.PaintBox1Paint Method

Unit: DelphiZXingQRCodeTestAppMainForm
procedure PaintBox1Paint(Sender: TObject)

Parameters

Sender
Type: Vcl.StdCtrls.TObject