Class Tmainform (unit pop_main)

Inherits from

TForm

@/// Tmainform = class(TForm)

Constructors



Functions

procedure btn_closeClick(Sender: TObject);

@\\\0000000503*) (*@/// procedure Tmainform.

procedure btn_connectClick(Sender: TObject);

@/// procedure Tmainform.

procedure lbx_messagesDblClick(Sender: TObject);

@\\\0000000305*) (*@/// procedure Tmainform.

procedure lbx_messagesDrawItem(Control:TWinControl; Index:Integer; Rect:TRect; State:TOwnerDrawState);

@\\\0000000A03*) (*@/// procedure Tmainform.

procedure mnu_deleteClick(Sender: TObject);

@\\\0000000703*) (*@/// procedure Tmainform.

procedure mnu_saveClick(Sender: TObject);

@\\\0000000603*) (*@/// procedure Tmainform.

Properties

Events

Variables

btn_close : TButton;


btn_connect : TButton;


dlg_save : TSaveDialog;


edt_hostname : TEdit;


edt_password : TEdit;


edt_username : TEdit;


Label2 : TLabel;


Label3 : TLabel;


lbl_host : TLabel;


lbl_messages : TLabel;


lbx_messages : TListBox;


mem_text : TMemo;


mnu_delete : TMenuItem;


mnu_get : TMenuItem;


mnu_mail : TPopupMenu;


mnu_messages : TPopupMenu;


mnu_save : TMenuItem;


Pop : T_Pop3;


active : boolean;



Constructors


Functions


procedure btn_closeClick(Sender: TObject);

@\\\0000000503*) (*@/// procedure Tmainform.btn_closeClick(Sender: TObject);


procedure btn_connectClick(Sender: TObject);

@/// procedure Tmainform.btn_connectClick(Sender: TObject);


procedure lbx_messagesDblClick(Sender: TObject);

@\\\0000000305*) (*@/// procedure Tmainform.lbx_messagesDblClick(Sender: TObject);


procedure lbx_messagesDrawItem(Control:TWinControl; Index:Integer; Rect:TRect; State:TOwnerDrawState);

@\\\0000000A03*) (*@/// procedure Tmainform.lbx_messagesDrawItem(Control: TWinControl; Index: Integer;


procedure mnu_deleteClick(Sender: TObject);

@\\\0000000703*) (*@/// procedure Tmainform.mnu_deleteClick(Sender: TObject);


procedure mnu_saveClick(Sender: TObject);

@\\\0000000603*) (*@/// procedure Tmainform.mnu_saveClick(Sender: TObject);


Properties


Events


Variables


btn_close : TButton;


btn_connect : TButton;


dlg_save : TSaveDialog;


edt_hostname : TEdit;


edt_password : TEdit;


edt_username : TEdit;


Label2 : TLabel;


Label3 : TLabel;


lbl_host : TLabel;


lbl_messages : TLabel;


lbx_messages : TListBox;


mem_text : TMemo;


mnu_delete : TMenuItem;


mnu_get : TMenuItem;


mnu_mail : TPopupMenu;


mnu_messages : TPopupMenu;


mnu_save : TMenuItem;


Pop : T_Pop3;


active : boolean;