unit1.dfm

Delphi7编程80例(完全版)

object Form1: TForm1
  Left = 286
  Top = 229
  Width = 412
  Height = 356
  Caption = #21457#36865#37038#20214
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 8
    Top = 12
    Width = 72
    Height = 12
    Caption = 'SMTP'#26381#21153#22120#65306
  end
  object Label2: TLabel
    Left = 8
    Top = 72
    Width = 48
    Height = 12
    Caption = #36134#25143#21517#65306
  end
  object Label3: TLabel
    Left = 152
    Top = 72
    Width = 36
    Height = 12
    Caption = #23494#30721#65306
  end
  object Label4: TLabel
    Left = 8
    Top = 107
    Width = 36
    Height = 12
    Caption = #20027#39064#65306
  end
  object Label5: TLabel
    Left = 8
    Top = 139
    Width = 36
    Height = 12
    Caption = #27491#25991#65306
  end
  object Label6: TLabel
    Left = 11
    Top = 269
    Width = 36
    Height = 12
    Caption = #38468#20214#65306
  end
  object Label7: TLabel
    Left = 8
    Top = 45
    Width = 48
    Height = 12
    Caption = #21457#20214#20154#65306
  end
  object Label8: TLabel
    Left = 189
    Top = 45
    Width = 48
    Height = 12
    Caption = #25910#20214#20154#65306
  end
  object edt_SMTP: TEdit
    Left = 80
    Top = 8
    Width = 313
    Height = 20
    TabOrder = 0
  end
  object edt_UserName: TEdit
    Left = 56
    Top = 68
    Width = 89
    Height = 20
    TabOrder = 1
  end
  object edt_Psw: TEdit
    Left = 185
    Top = 68
    Width = 209
    Height = 20
    PasswordChar = '*'
    TabOrder = 2
  end
  object edt_Subject: TEdit
    Left = 48
    Top = 104
    Width = 345
    Height = 20
    TabOrder = 3
  end
  object Memo1: TMemo
    Left = 8
    Top = 155
    Width = 385
    Height = 105
    ScrollBars = ssVertical
    TabOrder = 4
  end
  object edt_File: TEdit
    Left = 48
    Top = 266
    Width = 289
    Height = 20
    TabOrder = 5
  end
  object Button1: TButton
    Left = 344
    Top = 264
    Width = 49
    Height = 25
    Caption = #28155#21152
    TabOrder = 6
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 144
    Top = 293
    Width = 105
    Height = 25
    Caption = #21457#36865#37038#20214
    TabOrder = 7
    OnClick = Button2Click
  end
  object edt_From: TEdit
    Left = 56
    Top = 41
    Width = 129
    Height = 20
    TabOrder = 8
  end
  object edt_To: TEdit
    Left = 240
    Top = 41
    Width = 153
    Height = 20
    TabOrder = 9
  end
  object IdSMTP1: TIdSMTP
    MaxLineAction = maException
    ReadTimeout = 0
    OnWorkEnd = IdSMTP1WorkEnd
    Port = 25
    AuthenticationType = atNone
    Left = 8
    Top = 288
  end
  object IdMessage1: TIdMessage
    AttachmentEncoding = 'MIME'
    BccList = <>
    CCList = <>
    Encoding = meMIME
    Recipients = <>
    ReplyTo = <>
    Left = 40
    Top = 288
  end
  object OpenDialog1: TOpenDialog
    Left = 72
    Top = 288
  end
end