frminismtp.dfm

一个简单的同学录软件

object fminismtp: Tfminismtp
  Left = 0
  Top = 0
  Width = 443
  Height = 277
  Align = alClient
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  object Label1: TLabel
    Left = 32
    Top = 16
    Width = 81
    Height = 12
    Caption = '进行SMTP设置'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 48
    Top = 53
    Width = 60
    Height = 12
    Caption = '用户名设置'
  end
  object Label3: TLabel
    Left = 48
    Top = 89
    Width = 60
    Height = 12
    Caption = 'SMTP服务器'
  end
  object Label4: TLabel
    Left = 65
    Top = 125
    Width = 36
    Height = 12
    Caption = '端口号'
  end
  object Label5: TLabel
    Left = 38
    Top = 158
    Width = 72
    Height = 12
    Caption = '本人邮件地址'
  end
  object Bevel1: TBevel
    Left = 12
    Top = 176
    Width = 310
    Height = 73
  end
  object Label6: TLabel
    Left = 18
    Top = 183
    Width = 300
    Height = 60
    Caption = 
      '　　对用户名和邮件地址的设置其实与SMTP并不直接相关，不进行设置也' +
      '可以正常发出信件，但是收信的人就不知道是谁发的信息，也就没有办法' +
      '回信；而且有的SMTP服务器要求对用户名和发信人的邮件地址进行设置，' +
      '所以设置了这两个参数可以保证邮件正常发出。'
    WordWrap = True
  end
  object strname: TEdit
    Left = 120
    Top = 49
    Width = 161
    Height = 20
    TabOrder = 0
  end
  object strsmtp: TEdit
    Left = 120
    Top = 86
    Width = 153
    Height = 20
    TabOrder = 1
    Text = 'smtp.21cn.com'
  end
  object strport: TEdit
    Left = 120
    Top = 119
    Width = 25
    Height = 20
    TabOrder = 2
    Text = '25'
  end
  object stremail: TEdit
    Left = 120
    Top = 151
    Width = 113
    Height = 20
    TabOrder = 3
  end
end