iwunit1.~pas

一些关于电子邮件SMTP`POP3 MIME`的源码·个人感觉还不错

unit IWUnit1;
{PUBDIST}

interface

uses
  IWAppForm, IWApplication, IWTypes, IWCompEdit, IWDBStdCtrls, IWCompMemo,
  IWExtCtrls, IWDBExtCtrls, IWCompLabel, Controls, IWControl, DB, Classes,
  DBTables;

type
  TformMain = class(TIWAppForm)
    Table1: TTable;
    DataSource1: TDataSource;
    IWDBNavigator1: TIWDBNavigator;
    IWLabel1: TIWLabel;
    IWLabel2: TIWLabel;
    IWLabel3: TIWLabel;
    IWLabel4: TIWLabel;
    IWLabel5: TIWLabel;
    IWDBImage1: TIWDBImage;
    IWDBMemo1: TIWDBMemo;
    IWDBEdit1: TIWDBEdit;
    IWDBEdit2: TIWDBEdit;
    IWDBEdit3: TIWDBEdit;
  public
  end;

implementation
{$R *.dfm}

uses
  ServerController;

end.