his book holds many useful POP3 (post office protocol) functions. The library functions
use standard TCP sockets only so you do not need any other components. The library
implements the raw protocol described in RFC 1939. This means you have the full control
over the transmitted data.
Post office protocol
T
he source code is documented in German. But a good wizard should understand the lines of
code regardless of the language. The library itself offers basic functions only so you
have to implement your own main program to receive mails using this library. To extend the
library it is recommended to read RFC 1939.
// Author : Daniel, Master Sourcerer at Kitana's C...
// Last change: November 26, 2003
// Email : sourcerer@kitana.org
unit pop3;
interface
uses
SysUtils, StrUtils, Dialogs;
const
maxattachments = 64;
type
TFilenames = array [1..maxattachments] of string;
TAttachments = array [1..maxattachments] of string;
function POP3Connect(servername:string; serverport:int...
procedure POP3Disconnect(h:integer);
function POP3Login(h:integer; username:string; passwor...
procedure POP3MailStat(h:integer; var nmails:integer; ...
function POP3MessageID(h:integer; mailnr:integer):stri...
function POP3GetMailhead(h:integer; mailnr:integer):st...
function POP3GetMail(h:integer; mailnr:integer):string;
function POP3DeleteMail(h:integer; mailnr:integer):boo...
procedure POP3ExtractMailParts(head:string; body:strin...
function HeaderAttr(head:string; attr:string):string;
implementation
