Class TOlfAboutDialogForm

Unit

Olf.VCL.AboutDialogForm

Declaration

type TOlfAboutDialogForm = class(TForm)

Description

Hierarchy

• TForm
• TOlfAboutDialogForm

Overview

Fields

	imgLogo: TImage;
	Panel1: TPanel;
	lblTitre: TStaticText;
	lblVersion: TStaticText;
	lblURL: TLabel;
	pnlDescription: TPanel;
	pnlLicence: TPanel;
	lblDescription: TLabel;
	lblLicence: TLabel;
	btnClose: TBitBtn;
	ScrollBox1: TScrollBox;
	ScrollBox2: TScrollBox;
	pnlTop: TPanel;
	pnlclient: TPanel;
	pnlBottom: TPanel;
	lblCopyright: TStaticText;
	btnLicenseInfo: TBitBtn;
	btnBuy: TBitBtn;
	btnRegister: TBitBtn;
	lblFooter: TLabel;
	FIsInUpdateTextFields: boolean;

Methods

	procedure lblURLClick(Sender: TObject);
	procedure FormCreate(Sender: TObject);
	procedure btnCloseKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
	procedure btnCloseClick(Sender: TObject);
	procedure FormShow(Sender: TObject);
	procedure FormClose(Sender: TObject; var Action: TCloseAction);
	procedure FormActivate(Sender: TObject);
	procedure btnLicenseInfoClick(Sender: TObject);
	procedure btnBuyClick(Sender: TObject);
	procedure btnRegisterClick(Sender: TObject);
	procedure UpdateTextFields;
	procedure SetImageList(ImageList: TCustomImageList; ImageListIndex: System.UITypes.TImageIndex = -1; ImageListName: TImageName = ''); overload;
	procedure SetImageList(ImageList: TCustomImageList; ImageListIndex: System.UITypes.TImageIndex = -1); overload;

Properties

	property Titre: string read FTitre write SetTitre;
	property VersionNumero: string read FVersionNumero write SetVersionNumero;
	property VersionDate: string read FVersionDate write SetVersionDate;
	property Image: TImage read FImage write SetImage;
	property Picture: TPicture read FPicture write SetPicture;
	property URL: string read FURL write SetURL;
	property Licence: string read FLicence write SetLicence;
	property Description: string read FDescription write SetDescription;
	property onCloseDialog: TOlfAboutDialogCloseEvent read FonCloseDialog write SetonCloseDialog;
	property onURLClick: TOlfAboutDialogURLClickEvent read FonURLClick write SetonURLClick;
	property Langue: TOlfAboutDialogLang read FLangue write SetLangue;
	property Copyright: string read FCopyright write SetCopyright;
	property onFormActivate: TNotifyEvent read FonFormActivate write SetonFormActivate;
	property onFormShow: TNotifyEvent read FonFormShow write SetonFormShow;
	property onFormClose: TNotifyEvent read FonFormClose write SetonFormClose;
	property onButtonLicenseClick: TNotifyEvent read FonButtonLicenseClick write SetonButtonLicenseClick;
	property onButtonLicenseClickProc: TNotifyEvent read FonButtonLicenseClickProc write SetonButtonLicenseClickProc;
	property onButtonBuyClick: TNotifyEvent read FonButtonBuyClick write SetonButtonBuyClick;
	property onButtonBuyClickProc: TNotifyEvent read FonButtonBuyClickProc write SetonButtonBuyClickProc;
	property onButtonRegisterClick: TNotifyEvent read FonButtonRegisterClick write SetonButtonRegisterClick;
	property onButtonRegisterClickProc: TNotifyEvent read FonButtonRegisterClickProc write SetonButtonRegisterClickProc;
	property onGetText: TOlfAboutDialogGetTextEvent read FonGetText write SetonGetText;
	property onGetTextProc: TOlfAboutDialogGetTextProc read FonGetTextProc write SetonGetTextProc;
	property onGetFooterText: TOlfAboutDialogGetTextEvent read FonGetFooterText write SetonGetFooterText;
	property onGetFooterTextProc: TOlfAboutDialogGetTextProc read FonGetFooterTextProc write SetonGetFooterTextProc;

Description

Fields

	imgLogo: TImage;

	Panel1: TPanel;

	lblTitre: TStaticText;

	lblVersion: TStaticText;

	lblURL: TLabel;

	pnlDescription: TPanel;

	pnlLicence: TPanel;

	lblDescription: TLabel;

	lblLicence: TLabel;

	btnClose: TBitBtn;

	ScrollBox1: TScrollBox;

	ScrollBox2: TScrollBox;

	pnlTop: TPanel;

	pnlclient: TPanel;

	pnlBottom: TPanel;

	lblCopyright: TStaticText;

	btnLicenseInfo: TBitBtn;

	btnBuy: TBitBtn;

	btnRegister: TBitBtn;

	lblFooter: TLabel;

	FIsInUpdateTextFields: boolean;

Methods

	procedure lblURLClick(Sender: TObject);

	procedure FormCreate(Sender: TObject);

	procedure btnCloseKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);

	procedure btnCloseClick(Sender: TObject);

	procedure FormShow(Sender: TObject);

	procedure FormClose(Sender: TObject; var Action: TCloseAction);

	procedure FormActivate(Sender: TObject);

	procedure btnLicenseInfoClick(Sender: TObject);

	procedure btnBuyClick(Sender: TObject);

	procedure btnRegisterClick(Sender: TObject);

	procedure UpdateTextFields;

	procedure SetImageList(ImageList: TCustomImageList; ImageListIndex: System.UITypes.TImageIndex = -1; ImageListName: TImageName = ''); overload;

	procedure SetImageList(ImageList: TCustomImageList; ImageListIndex: System.UITypes.TImageIndex = -1); overload;

Properties

	property Titre: string read FTitre write SetTitre;

	property VersionNumero: string read FVersionNumero write SetVersionNumero;

	property VersionDate: string read FVersionDate write SetVersionDate;

	property Image: TImage read FImage write SetImage;

	property Picture: TPicture read FPicture write SetPicture;

	property URL: string read FURL write SetURL;

	property Licence: string read FLicence write SetLicence;

	property Description: string read FDescription write SetDescription;

	property onCloseDialog: TOlfAboutDialogCloseEvent read FonCloseDialog write SetonCloseDialog;

	property onURLClick: TOlfAboutDialogURLClickEvent read FonURLClick write SetonURLClick;

	property Langue: TOlfAboutDialogLang read FLangue write SetLangue;

	property Copyright: string read FCopyright write SetCopyright;

	property onFormActivate: TNotifyEvent read FonFormActivate write SetonFormActivate;

	property onFormShow: TNotifyEvent read FonFormShow write SetonFormShow;

	property onFormClose: TNotifyEvent read FonFormClose write SetonFormClose;

	property onButtonLicenseClick: TNotifyEvent read FonButtonLicenseClick write SetonButtonLicenseClick;

	property onButtonLicenseClickProc: TNotifyEvent read FonButtonLicenseClickProc write SetonButtonLicenseClickProc;

	property onButtonBuyClick: TNotifyEvent read FonButtonBuyClick write SetonButtonBuyClick;

	property onButtonBuyClickProc: TNotifyEvent read FonButtonBuyClickProc write SetonButtonBuyClickProc;

	property onButtonRegisterClick: TNotifyEvent read FonButtonRegisterClick write SetonButtonRegisterClick;

	property onButtonRegisterClickProc: TNotifyEvent read FonButtonRegisterClickProc write SetonButtonRegisterClickProc;

	property onGetText: TOlfAboutDialogGetTextEvent read FonGetText write SetonGetText;

	property onGetTextProc: TOlfAboutDialogGetTextProc read FonGetTextProc write SetonGetTextProc;

	property onGetFooterText: TOlfAboutDialogGetTextEvent read FonGetFooterText write SetonGetFooterText;

	property onGetFooterTextProc: TOlfAboutDialogGetTextProc read FonGetFooterTextProc write SetonGetFooterTextProc;

About Dialog Box components (c) 2022-2025 Patrick PREMARTIN - Powered by PasDoc

---

Generated by PasDoc 0.16.0.