Class TfrmCilTsegRegisterOrShowLicense

Unit

Declaration

type TfrmCilTsegRegisterOrShowLicense = class(TForm)

Description

CilTseg license management default dialog box for your FireMonkey projects

Hierarchy

Overview

Fields

Public pnlRegisterLicense: TLayout;
Public pnlShowLicenseDetails: TLayout;
Public lblShow: TLabel;
Public btnClose: TButton;
Public lblUserEmail: TLabel;
Public edtUserEmail: TEdit;
Public lblLicenseNumber: TLabel;
Public edtLicenseNumber: TEdit;
Public btnBuy: TButton;
Public btnRegister: TButton;
Public btnCancel: TButton;

Methods

Public procedure btnCloseClick(Sender: TObject);
Public procedure FormCreate(Sender: TObject);
Public procedure btnCancelClick(Sender: TObject);
Public procedure btnRegisterClick(Sender: TObject);
Public procedure btnBuyClick(Sender: TObject);
Public procedure FormClose(Sender: TObject; var Action: TCloseAction);
Public constructor Create(AOwner: TComponent); override;
Public destructor Destroy; override;
Public class function Execute(AOwner: TComponent): boolean;

Description

Fields

Public pnlRegisterLicense: TLayout;
 
Public pnlShowLicenseDetails: TLayout;
 
Public lblShow: TLabel;
 
Public btnClose: TButton;
 
Public lblUserEmail: TLabel;
 
Public edtUserEmail: TEdit;
 
Public lblLicenseNumber: TLabel;
 
Public edtLicenseNumber: TEdit;
 
Public btnBuy: TButton;
 
Public btnRegister: TButton;
 
Public btnCancel: TButton;
 

Methods

Public procedure btnCloseClick(Sender: TObject);
 
Public procedure FormCreate(Sender: TObject);
 
Public procedure btnCancelClick(Sender: TObject);
 
Public procedure btnRegisterClick(Sender: TObject);
 
Public procedure btnBuyClick(Sender: TObject);
 
Public procedure FormClose(Sender: TObject; var Action: TCloseAction);
 
Public constructor Create(AOwner: TComponent); override;

Constructor of this class. It's better to call the Execute() method then Create() but it depends on what you want to personalize.

Public destructor Destroy; override;

Destructor for this class. Call ".Free()" or "FreeAndNil()" on your instance.

Public class function Execute(AOwner: TComponent): boolean;

Open an instance of this dialog box as a modal form and manage the license registration process for you.

CilTseg for Delphi (c) 2024-2025 Patrick PREMARTIN - Powered by PasDoc
Generated by PasDoc 0.16.0.