//procedure CreateButton(ALeft, ATop: Integer; ACaption: String; ANotifyEvent: TNotifyEvent);
//begin
// with TButton.Create(WizardForm) do begin
// Left := ALeft;
// Top := ATop;
// Width := WizardForm.CancelButton.Width;
// Height := WizardForm.CancelButton.Height;
// Caption := ACaption;
// OnClick := ANotifyEvent;
// Parent := WizardForm.WelcomePage;
// end;
//end;
private void CreateButton(int ALeft, int ATop, string ACaption, TNotifyEvent ANotifyEvent)
{
var button = new TButton(WizardForm);
button.Left = ALeft;
button.Top = ATop;
button.Width = WizardForm.CancelButton.Width;
button.Height = WizardForm.CancelButton.Height;
button.Caption = ACaption;
button.OnClick += ANotifyEvent;
button.Parent = WizardForm.WelcomePage;
}
public static extern int LCB_SetOnLeCodigo(IntPtr lcbHandle, [MarshalAs(UnmanagedType.FunctionPtr)] TNotifyEvent method);