sendform.dfm

关于书籍《Borland c++Builder工程实践》的源代码

object SendForm: TSendForm
  Left = 298
  Top = 178
  Width = 531
  Height = 397
  Caption = #37038#20214#21457#36865
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object txtBody: TMemo
    Left = 0
    Top = 233
    Width = 523
    Height = 90
    Align = alClient
    Color = clWhite
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 323
    Width = 523
    Height = 18
    Panels = <>
    SimplePanel = True
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 523
    Height = 60
    BorderWidth = 1
    ButtonHeight = 48
    Caption = 'ToolBar1'
    EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
    TabOrder = 2
    object SBtnSend: TSpeedButton
      Left = 0
      Top = 2
      Width = 48
      Height = 48
      Caption = #21457#36865
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
        000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
        FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F
        FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF
        9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000
        0000777777777777777733333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      Layout = blGlyphTop
      NumGlyphs = 2
      OnClick = SBtnSendClick
    end
    object SBtnAttach: TSpeedButton
      Left = 48
      Top = 2
      Width = 48
      Height = 48
      Caption = #28155#38468#20214
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
        77F07F773FFFFFFF77F70FFF7700000000007F337777777777770FFFFF0FFFFF
        FFF07F333F7F3FFFF3370FFF700F0000FFF07F3F777F777733370F707F0FFFFF
        FFF07F77337F3FFFFFF7007EEE0F000000F077FFFF7F777777370777770FFFFF
        FFF07777777F3FFFFFF7307EEE0F000000F03773FF7F7777773733707F0FFFFF
        FFF03337737F3FFF33373333700F000FFFF03333377F77733FF73333330FFFFF
        00003333337F3FF377773333330F00FF0F033333337F77337F733333330FFFFF
        00333333337FFFFF773333333300000003333333337777777333}
      Layout = blGlyphTop
      NumGlyphs = 2
      OnClick = mnuInsertClick
    end
    object SBtnDeleteAttachment: TSpeedButton
      Left = 96
      Top = 2
      Width = 48
      Height = 48
      Caption = #21024#38468#20214
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000074120000741200001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
        77F07F773FFFFFFF77F70FFF7700000000007F337777777777770FFFF90FFFFF
        9FF07F333F7F3FFFF3370FFF799F00099FF07F3F777F777733370F707F99FF99
        FFF07F77337F3FFFFFF7007EEE09999000F077FFFF7F777777370777770F99FF
        FFF07777777F3FFFFFF7307EEE09990000F03773FF7F7777773733707F99FF99
        FFF03337737F3FFF33373333799F00099FF03333377F77733FF73333990FFFFF
        90003333337F3FF377773333330F00FF0F033333337F77337F733333330FFFFF
        00333333337FFFFF773333333300000003333333337777777333}
      Layout = blGlyphTop
      NumGlyphs = 2
      OnClick = mnuDeleteClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 60
    Width = 523
    Height = 173
    Align = alTop
    TabOrder = 3
    object Label1: TLabel
      Left = 17
      Top = 12
      Width = 42
      Height = 16
      AutoSize = False
      Caption = #25910#20214#20154': '
    end
    object Label2: TLabel
      Left = 17
      Top = 41
      Width = 30
      Height = 16
      AutoSize = False
      Caption = #25220#36865': '
    end
    object Label3: TLabel
      Left = 17
      Top = 69
      Width = 33
      Height = 16
      AutoSize = False
      Caption = #23494#36865': '
    end
    object Label4: TLabel
      Left = 17
      Top = 96
      Width = 51
      Height = 16
      AutoSize = False
      Caption = #37038#20214#20027#39064' '
    end
    object Label5: TLabel
      Left = 17
      Top = 124
      Width = 69
      Height = 16
      AutoSize = False
      Caption = #38468#20214#21015#34920':'
    end
    object txtTo: TEdit
      Left = 74
      Top = 7
      Width = 445
      Height = 24
      Color = clWhite
      TabOrder = 0
    end
    object txtCC: TEdit
      Left = 74
      Top = 37
      Width = 445
      Height = 24
      Color = clWhite
      TabOrder = 1
    end
    object txtBCC: TEdit
      Left = 74
      Top = 65
      Width = 445
      Height = 24
      Color = clWhite
      TabOrder = 2
    end
    object txtSubject: TEdit
      Left = 74
      Top = 95
      Width = 445
      Height = 24
      Color = clWhite
      TabOrder = 3
    end
    object lstAttach: TListBox
      Left = 74
      Top = 123
      Width = 445
      Height = 44
      Color = clWhite
      ItemHeight = 16
      TabOrder = 4
    end
  end
  object NMSMTP1: TNMSMTP
    Port = 25
    ReportLevel = 0
    OnDisconnect = NMSMTP1Disconnect
    OnConnect = NMSMTP1Connect
    OnInvalidHost = NMSMTP1InvalidHost
    OnHostResolved = NMSMTP1HostResolved
    OnStatus = NMSMTP1Status
    OnConnectionFailed = NMSMTP1ConnectionFailed
    OnConnectionRequired = NMSMTP1ConnectionRequired
    EncodeType = uuMime
    ClearParams = True
    SubType = mtPlain
    Charset = 'us-ascii'
    OnRecipientNotFound = NMSMTP1RecipientNotFound
    OnHeaderIncomplete = NMSMTP1HeaderIncomplete
    OnSendStart = NMSMTP1SendStart
    OnSuccess = NMSMTP1Success
    OnFailure = NMSMTP1Failure
    OnEncodeStart = NMSMTP1EncodeStart
    OnEncodeEnd = NMSMTP1EncodeEnd
    OnAuthenticationFailed = NMSMTP1AuthenticationFailed
    Left = 245
    Top = 12
  end
  object MainMenu1: TMainMenu
    Left = 212
    Top = 12
    object mnuFile: TMenuItem
      Caption = #25991#20214
      object mnuSetting: TMenuItem
        Caption = #35774#32622
        OnClick = mnuSettingClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object mnuExit: TMenuItem
        Caption = #36864#20986
        OnClick = mnuExitClick
      end
    end
    object mnuAttachment: TMenuItem
      Caption = #38468#20214
      object mnuInsert: TMenuItem
        Caption = #28155#21152
        OnClick = mnuInsertClick
      end
      object mnuDelete: TMenuItem
        Caption = #21024#38500
        OnClick = mnuDeleteClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = 'All Files (*.*)|*.*'
    Title = 'Insert Attachment'
    Left = 278
    Top = 12
  end
end