mainform.nfm.~4~

来自「Delphi 2005程序设计教程_实例源文件和教学课件」· ~4~ 代码 · 共 93 行

object formMain: TformMain
  Caption = 'Mail Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Height = 216
  Width = 396
  Left = 13
  Top = 13
  PixelsPerInch = 96
  TextHeight = 13
  object ListView1: TListView
    Align = alTop
    Columns = <
      item
        Caption = 'From'
      end
      item
        Caption = 'To'
      end
      item
        Caption = 'Subject'
      end
      item
        Caption = 'Date'
      end>
    ReadOnly = True
    RowSelect = True
    TabOrder = 0
    ViewStyle = vsReport
    Left = 0
    Top = 0
    Width = 388
    Height = 150
  end
  object butnGetHeaders: TButton
    Caption = 'Get Headers'
    TabOrder = 1
    Left = 4
    Top = 156
    Width = 75
    Height = 25
    OnClick = butnGetHeadersClick
  end
  object btnSend: TButton
    Caption = #21457#37038#20214
    TabOrder = 2
    Left = 136
    Top = 156
    Width = 75
    Height = 25
    OnClick = btnSendClick
  end
  object btnClose: TButton
    Caption = #36864#20986
    TabOrder = 3
    Left = 264
    Top = 156
    Width = 75
    Height = 25
    OnClick = btnCloseClick
  end
  object IdPOP31: TIdPOP3
    AutoLogin = True
    Username = 'yanduozh'
    SASLMechanisms = <>
    Left = 72
    Top = 248
  end
  object IdMessage1: TIdMessage
    AttachmentEncoding = 'UUE'
    BccList = <>
    CCList = <>
    Encoding = meDefault
    FromList = <
      item
      end>
    Recipients = <>
    ReplyTo = <>
    ConvertPreamble = True
    Left = 92
    Top = 112
  end
  object IdSMTP1: TIdSMTP
    SASLMechanisms = <>
    Left = 152
    Top = 104
  end
end