| Class TPop3Client (unit pop3cli) |
TComponent
| Constructors |
constructor Create(AOwner : TComponent);| Functions |
function Apop : Boolean;
function Connect : Boolean;
function Dele : Boolean;
destructor Destroy;
function Last : Boolean;
function List : Boolean;
function Noop : Boolean;
function Pass : Boolean;
function Quit : Boolean;
function Retr : Boolean;
function Rpop : Boolean;
function Rset : Boolean;
function Stat : Boolean;
function Top : Boolean;
function Uidl : Boolean;
function User : Boolean;
procedure ClearErrorMessage;
procedure Display(Msg : String);
function ExtractNumbers(var N1 : Integer; var N2 : Integer) : Boolean;
function ExtractUidl(var N1 : Integer; var N2 : String) : Boolean;
function GetMultiLine(aOnBegin : TNotifyEvent;
aOnLine : TNotifyEvent;
aOnEnd : TNotifyEvent;
aProcess : TNotifyEvent) : Boolean;
function GetResponse : Boolean;
procedure LineTooLong(Sender : TObject);
procedure Notification(AComponent: TComponent; Operation: TOperation);
function PassRpop(OpCode : String) : Boolean;
procedure ProcessList(Sender : TObject);
procedure ProcessUidl(Sender : TObject);
procedure SendCommand(Cmd : String);
procedure SessionClosed(Sender : TObject; Error : WORD);
procedure SetErrorMessage;
procedure SetWait(Value : TWait);
function StartTransaction(OpCode, Params : String) : Boolean;
procedure WaitTimeOut(Sender : TObject);| Properties |
property ErrorMessage : String
property Host : String
property LastResponse : String
property MsgCount : Integer
property MsgLines : Integer
property MsgNum : Integer
property MsgSize : Integer
property MsgUidl : String
property PassWord : String
property Port : String
property ProtocolState : TPop3State
property Tag : LongInt
property TimeOut : Integer
property UserName : String
property Wait : TWait
property WSocket : TWSocket| Events |
event OnDisplay : TPop3Display
event OnListBegin : TNotifyEvent
event OnListEnd : TNotifyEvent
event OnListLine : TNotifyEvent
event OnMessageBegin : TNotifyEvent
event OnMessageEnd : TNotifyEvent
event OnMessageLine : TNotifyEvent
event OnUidlBegin : TNotifyEvent
event OnUidlEnd : TNotifyEvent
event OnUidlLine : TNotifyEvent| Variables |
FErrorMessage : String;
FHost : String;
FLastResponse : String;
FLineTooLong : Boolean;
FMsgCount : Integer;
FMsgLines : Integer;
FMsgNum : Integer;
FMsgSize : Integer;
FMsgUidl : String;
FOnDisplay : TPop3Display;
FOnListBegin : TNotifyEvent;
FOnListEnd : TNotifyEvent;
FOnListLine : TNotifyEvent;
FOnMessageBegin : TNotifyEvent;
FOnMessageEnd : TNotifyEvent;
FOnMessageLine : TNotifyEvent;
FOnUidlBegin : TNotifyEvent;
FOnUidlEnd : TNotifyEvent;
FOnUidlLine : TNotifyEvent;
FPassWord : String;
FPort : String;
FProtocolState : TPop3State;
FTag : LongInt;
FTimeout : Integer;
FTimeOutFlag : Boolean;
FTimeStamp : String;
FUserName : String;
FWait : TWait;
FWSocket : TWSocket;| Constructors |
constructor Create(AOwner : TComponent);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
| Functions |
function Apop : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Connect : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Dele : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
destructor Destroy;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Last : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function List : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Noop : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Pass : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Quit : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Retr : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Rpop : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Rset : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Stat : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Top : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Uidl : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function User : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure ClearErrorMessage;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Display(Msg : String);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function ExtractNumbers(var N1 : Integer; var N2 : Integer) : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function ExtractUidl(var N1 : Integer; var N2 : String) : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function GetMultiLine(aOnBegin : TNotifyEvent;
aOnLine : TNotifyEvent;
aOnEnd : TNotifyEvent;
aProcess : TNotifyEvent) : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function GetResponse : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure LineTooLong(Sender : TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Notification(AComponent: TComponent; Operation: TOperation);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function PassRpop(OpCode : String) : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure ProcessList(Sender : TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure ProcessUidl(Sender : TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SendCommand(Cmd : String);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SessionClosed(Sender : TObject; Error : WORD);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SetErrorMessage;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SetWait(Value : TWait);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function StartTransaction(OpCode, Params : String) : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure WaitTimeOut(Sender : TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
| Properties |
property ErrorMessage : String
property Host : String
property LastResponse : String
property MsgCount : Integer:Updated by the Stat method with the number of messages in the maildrop
property MsgLines : Integer:This is the number of lines to display in the TOP command Set to zero if you wants the default value
property MsgNum : Integer:This is the message number which must be returned by the Retr method. It is also updated by the Last method
property MsgSize : Integer:Updated by the Stat method with the total size in byte for the messages in the maildrop
property MsgUidl : String
property PassWord : String
property Port : String
property ProtocolState : TPop3State
property Tag : LongInt
property TimeOut : Integer
property UserName : String
property Wait : TWait
property WSocket : TWSocket| Events |
event OnDisplay : TPop3Display
event OnListBegin : TNotifyEvent
event OnListEnd : TNotifyEvent
event OnListLine : TNotifyEvent
event OnMessageBegin : TNotifyEvent
event OnMessageEnd : TNotifyEvent
event OnMessageLine : TNotifyEvent
event OnUidlBegin : TNotifyEvent
event OnUidlEnd : TNotifyEvent
event OnUidlLine : TNotifyEvent| Variables |
FErrorMessage : String;
FHost : String;
FLastResponse : String;
FLineTooLong : Boolean;
FMsgCount : Integer;
FMsgLines : Integer;
FMsgNum : Integer;
FMsgSize : Integer;
FMsgUidl : String;
FOnDisplay : TPop3Display;
FOnListBegin : TNotifyEvent;
FOnListEnd : TNotifyEvent;
FOnListLine : TNotifyEvent;
FOnMessageBegin : TNotifyEvent;
FOnMessageEnd : TNotifyEvent;
FOnMessageLine : TNotifyEvent;
FOnUidlBegin : TNotifyEvent;
FOnUidlEnd : TNotifyEvent;
FOnUidlLine : TNotifyEvent;
FPassWord : String;
FPort : String;
FProtocolState : TPop3State;
FTag : LongInt;
FTimeout : Integer;
FTimeOutFlag : Boolean;
FTimeStamp : String;
FUserName : String;
FWait : TWait;
FWSocket : TWSocket;