Class TdlgMabDelete (unit MabDlDlg)

Inherits from

TForm

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

function Execute: Boolean;


procedure SetButtonStyle(AButtonStyle: TButtonStyle);


Properties

property ButtonStyle : TButtonStyle


property Description : string


Events

Variables

btnNo : TBitBtn;


btnYes : TBitBtn;


imgDelete : TImage;


lblDelete : TLabel;


FDescription : string;

Private declarations


Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


function Execute: Boolean;


procedure SetButtonStyle(AButtonStyle: TButtonStyle);


Properties


property ButtonStyle : TButtonStyle


property Description : string


Events


Variables


btnNo : TBitBtn;


btnYes : TBitBtn;


imgDelete : TImage;


lblDelete : TLabel;


FDescription : string;

Private declarations