Class TEditFileIconDlg (unit Ficondlg)

Inherits from

TForm

Constructors



Functions

procedure BrowseBtnClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure FormCreate(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure FormDestroy(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure FormShow(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure IconFileNameChange(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure IconListBoxDblClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure OKbtnClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.

procedure SetFileIcon(AFileIcon: TFileIcon);

*************************************************************************} { TEditFileIconDlg.

Properties

property FileIcon : TFileIcon

Déclarations publiques

Events

Variables

BrowseBtn : TButton;


CancelBtn : TButton;


IconFileName : TEdit;


IconListBox : TIconListBox;


Label1 : TLabel;


Label2 : TLabel;


OKbtn : TButton;


OpenDialog1 : TOpenDialog;


FFileIcon : TFileIcon;

Déclarations privées


Constructors


Functions


procedure BrowseBtnClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.BrowseBtnClick } {


procedure FormCreate(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.FormCreate } {


procedure FormDestroy(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.FormDestroy } {


procedure FormShow(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.FormShow } {


procedure IconFileNameChange(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.IconFileNameChange } {


procedure IconListBoxDblClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.IconListBoxDblClick } {


procedure OKbtnClick(Sender: TObject);

*************************************************************************} { TEditFileIconDlg.OKbtnClick } {


procedure SetFileIcon(AFileIcon: TFileIcon);

*************************************************************************} { TEditFileIconDlg.SetFileIcon } {


Properties


property FileIcon : TFileIcon

Déclarations publiques


Events


Variables


BrowseBtn : TButton;


CancelBtn : TButton;


IconFileName : TEdit;


IconListBox : TIconListBox;


Label1 : TLabel;


Label2 : TLabel;


OKbtn : TButton;


OpenDialog1 : TOpenDialog;


FFileIcon : TFileIcon;

Déclarations privées