Class Tfrm_attach (unit attach) |
Inherits from
TForm
@/// Tfrm_attach = class(TForm)
procedure btn_addClick(Sender: TObject);
@\\\0030001012001012001101*) (*@/// procedure Tfrm_attach.
procedure btn_delClick(Sender: TObject);
@\\\0000000503*) (*@/// procedure Tfrm_attach.
procedure lbx_attachDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
@\\\0000000805*) (*@/// procedure Tfrm_attach.
btn_add : TButton;
btn_del : TButton;
btn_ok : TButton;
lbx_attach : TListBox;
OpenDialog : TOpenDialog;
procedure btn_addClick(Sender: TObject);
@\\\0030001012001012001101*) (*@/// procedure Tfrm_attach.btn_addClick(Sender: TObject);
procedure btn_delClick(Sender: TObject);
@\\\0000000503*) (*@/// procedure Tfrm_attach.btn_delClick(Sender: TObject);
procedure lbx_attachDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
@\\\0000000805*) (*@/// procedure Tfrm_attach.lbx_attachDrawItem(Control: TWinControl; Index: Integer;
btn_add : TButton;
btn_del : TButton;
btn_ok : TButton;
lbx_attach : TListBox;
OpenDialog : TOpenDialog;