08-24-2020, 03:10 AM
Code:
unit Unit1;
interface
uses
Classes, SysUtils, IWAppForm, IWApplication, IWColor, IWTypes, Vcl.Controls,
IWVCLBaseControl, IWBaseControl, IWBaseHTMLControl, IWControl, IWCompButton;
type
TIWForm1 = class(TIWAppForm)
IWButton1: TIWButton;
procedure IWButton1AsyncClick(Sender: TObject; EventParams: TStringList);
public
end;
implementation
{$R *.dfm}
procedure TIWForm1.IWButton1AsyncClick(Sender: TObject; EventParams: TStringList);
begin
//
end;
initialization
TIWForm1.SetAsMainForm;
end.