unit1.~dfm

利用Delphi7

object SMTPForm: TSMTPForm
  Left = 256
  Top = 210
  Width = 562
  Height = 428
  Caption = 'SMTP'#23458#25143#31471
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 233
    Height = 81
    Caption = #26381#21153#22120#23646#24615
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 72
      Height = 13
      Caption = #26381#21153#22120#22320#22336#65306
    end
    object Label2: TLabel
      Left = 8
      Top = 40
      Width = 72
      Height = 13
      Caption = #26381#21153#22120#31471#21475#65306
    end
    object HostName: TEdit
      Left = 80
      Top = 16
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object HostPort: TEdit
      Left = 80
      Top = 40
      Width = 121
      Height = 21
      TabOrder = 1
      Text = '25'
    end
  end
  object GroupBox2: TGroupBox
    Left = 264
    Top = 8
    Width = 265
    Height = 129
    Caption = #22320#22336#20449#24687
    TabOrder = 1
    object Label3: TLabel
      Left = 16
      Top = 16
      Width = 72
      Height = 13
      Caption = #21457#20449#20154#22320#22336#65306
    end
    object Label4: TLabel
      Left = 16
      Top = 40
      Width = 72
      Height = 13
      Caption = #25910#20449#20154#22320#22336#65306
    end
    object Label9: TLabel
      Left = 16
      Top = 64
      Width = 60
      Height = 13
      Caption = #25220#36865#22320#22336#65306
    end
    object Label10: TLabel
      Left = 16
      Top = 96
      Width = 60
      Height = 13
      Caption = #26263#36865#22320#22336#65306
    end
    object EditFrom: TEdit
      Left = 96
      Top = 16
      Width = 137
      Height = 21
      TabOrder = 0
    end
    object EditTo: TEdit
      Left = 96
      Top = 40
      Width = 137
      Height = 21
      TabOrder = 1
    end
    object EditCC: TEdit
      Left = 96
      Top = 64
      Width = 137
      Height = 21
      TabOrder = 2
    end
    object EditBCC: TEdit
      Left = 96
      Top = 88
      Width = 137
      Height = 21
      TabOrder = 3
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 96
    Width = 233
    Height = 73
    Caption = #29992#25143#30331#24405#20449#24687
    TabOrder = 2
    object Label5: TLabel
      Left = 8
      Top = 16
      Width = 60
      Height = 13
      Caption = #29992#25143#36134#21495#65306
    end
    object Label6: TLabel
      Left = 8
      Top = 40
      Width = 60
      Height = 13
      Caption = #29992#25143#21475#20196#65306
    end
    object EditUser: TEdit
      Left = 80
      Top = 16
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object EditPass: TMaskEdit
      Left = 80
      Top = 40
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 1
    end
  end
  object GroupBox4: TGroupBox
    Left = 8
    Top = 176
    Width = 201
    Height = 209
    Caption = #20449#20214#20869#23481
    TabOrder = 3
    object Label7: TLabel
      Left = 8
      Top = 24
      Width = 60
      Height = 13
      Caption = #20449#20214#26631#39064#65306
    end
    object Label8: TLabel
      Left = 8
      Top = 56
      Width = 60
      Height = 13
      Caption = #20449#20214#27491#25991#65306
    end
    object EditSubject: TEdit
      Left = 72
      Top = 24
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object MemoMesg: TMemo
      Left = 8
      Top = 80
      Width = 185
      Height = 121
      TabOrder = 1
    end
  end
  object GroupBox5: TGroupBox
    Left = 216
    Top = 176
    Width = 185
    Height = 209
    Caption = #38468#20214#21015#34920
    TabOrder = 4
    object AttachmentList: TListBox
      Left = 8
      Top = 24
      Width = 153
      Height = 177
      ItemHeight = 13
      ScrollWidth = 1
      TabOrder = 0
      OnKeyUp = AttachmentListKeyUp
    end
  end
  object btnSend: TButton
    Left = 264
    Top = 144
    Width = 75
    Height = 25
    Caption = #21457#36865#20449#20214
    TabOrder = 5
    OnClick = btnSendClick
  end
  object AttachAdd: TButton
    Left = 352
    Top = 144
    Width = 75
    Height = 25
    Caption = #28155#21152#38468#20214
    TabOrder = 6
    OnClick = AttachAddClick
  end
  object GroupBox6: TGroupBox
    Left = 408
    Top = 176
    Width = 138
    Height = 209
    Caption = #21457#36865#36827#31243#20449#24687
    TabOrder = 7
    object MemoInfo: TMemo
      Left = 8
      Top = 16
      Width = 121
      Height = 185
      ReadOnly = True
      TabOrder = 0
    end
  end
  object MailMessage: TIdMessage
    AttachmentEncoding = 'MIME'
    BccList = <>
    CCList = <>
    Encoding = meMIME
    Recipients = <>
    ReplyTo = <>
    Left = 448
    Top = 144
  end
  object IdSMTP: TIdSMTP
    MaxLineAction = maException
    ReadTimeout = 0
    OnDisconnected = IdSMTPDisconnected
    OnWork = IdSMTPWork
    OnWorkBegin = IdSMTPWorkBegin
    OnWorkEnd = IdSMTPWorkEnd
    OnConnected = IdSMTPConnected
    Port = 25
    AuthenticationType = atNone
    Left = 488
    Top = 144
  end
  object AddAttachDlg: TOpenDialog
    Left = 520
    Top = 144
  end
end