PC World Komputer 1998 January/Pcwk0198.iso/Zadarmo/CYBERCON/_SETUP.1/Ccontact.exe/0/RCDATA/TSMTPFORM/TSMTPFORM.txt

Text File | 1997-08-26 | 18KB | 498 lines

object SMTPForm: TSMTPForm
  Left = 13
  Top = 67
  Width = 608
  Height = 433
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Send E-mail'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar: TPanel
    Left = 0
    Top = 0
    Width = 600
    Height = 33
    Align = alTop
    BevelOuter = bvNone
    BorderWidth = 1
    TabOrder = 0
    object SendButton: TSpeedButton
      Left = 12
      Top = 4
      Width = 21
      Height = 25
      Hint = 'Send'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
        000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
        FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F
        FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF
        9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000
        0000777777777777777733333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333333333333333333333333333333333333333333333333330000}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SendButtonClick
    end
    object CancelButton: TSpeedButton
      Tag = 1
      Left = 36
      Top = 4
      Width = 22
      Height = 25
      Hint = 'Cancel'
      Enabled = False
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = CancelButtonClick
    end
    object AttachButton: TSpeedButton
      Left = 58
      Top = 4
      Width = 25
      Height = 25
      Hint = 'Attach'
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        1800000000000003000000000000000000000000000000000000FFFFFFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000BFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00
        FFFF000000FFFFFF7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBF00000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFFBFBFBF000000BFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF000000BFBFBFBFBFBFBFBFBF00000000FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF007F
        7FBFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF000000BFBFBFBFBFBFBFBFBFBFBFBF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF007F7FBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF007F7F007F7F007F7F000000BFBFBFBFBFBFBFBFBF
        BFBFBF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF000000007F
        7F007F7F007F7FBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00FFFF00
        FFFF00FFFF0000007F7F007F7F007F7F00000000007F7F000000BFBFBFBFBFBF
        BFBFBFBFBFBF00FFFF00FFFF00FFFF00FFFF00FFFF7F7F007F7F007F7F007F7F
        007F7F00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00
        FFFF00FFFFFFFF000000007F7F000000007F7F00BFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF00FFFF00FFFF00FFFF00FFFF0000000000007F7F000000
        00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF00
        0000BFBFBFBFBFBF7F7F007F7F007F7F00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000007F7F007F7F007F7F
        00000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBF7F7F007F7F007F7F00BFBFBFBFBFBFBFBFBF}
      ParentShowHint = False
      ShowHint = True
      OnClick = AttachButtonClick
    end
    object Bevel1: TBevel
      Left = 0
      Top = 32
      Width = 459
      Height = 5
      Shape = bsTopLine
    end
    object Bevel2: TBevel
      Left = 0
      Top = 0
      Width = 459
      Height = 5
      Shape = bsTopLine
    end
    object SpeedButton1: TSpeedButton
      Left = 88
      Top = 4
      Width = 25
      Height = 25
      Hint = 'Send Later'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333FFFFFFFFFFFFF3344444444444443337777777777777F334CCCCCCCCCC
        C43337777777777777F33444881B188444333777F3737337773333308881FF70
        33333337F3373337F3333330888BF770333333373F33F337333333330881F703
        3333333373F73F7333333333308B703333333333373F77333333333333080333
        3333333333777FF333333333301F103333333333377777FF3333333301B1F103
        333333337737777FF3333330881BFB7033333337F3737F77F333333088881F70
        333333F7F3337777FFF334448888888444333777FFFFFFF777F334CCCCCCCCCC
        C43337777777777777F3344444444444443337777777777777330000}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton3: TSpeedButton
      Left = 120
      Top = 4
      Width = 25
      Height = 25
      Hint = 'Cut'
      Glyph.Data = {
        66030000424D660300000000000036000000280000000F000000110000000100
        1800000000003003000000000000000000000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBF141400BFBFBFBFBFBFBFBFBFBFBFBF7F00007F0000BFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF202000BFBFBFBFBFBF
        BFBFBF7F0000BFBFBFBFBFBF7F0000BFBFBFBFBFBF7F00007F0000BFBFBFBFBF
        BFBFBFBFBFBFBF2C2C00BFBFBFBFBFBFBFBFBF7F0000BFBFBFBFBFBF7F0000BF
        BFBF7F0000BFBFBFBFBFBF7F0000BFBFBFBFBFBFBFBFBF383800BFBFBFBFBFBF
        BFBFBF7F0000BFBFBFBFBFBF7F0000BFBFBF7F0000BFBFBFBFBFBF7F0000BFBF
        BFBFBFBFBFBFBF444400BFBFBFBFBFBFBFBFBFBFBFBF7F00007F00007F0000BF
        BFBF7F0000BFBFBFBFBFBF7F0000BFBFBFBFBFBFBFBFBF505000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF7F0000BFBFBF7F00007F00007F0000BFBFBFBFBF
        BFBFBFBFBFBFBF5C5C00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F000000
        00007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF686800BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBF747400BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000
        0000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF808000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBF000000BFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBF8C8C00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000BF
        BFBF000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF989800BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFA4A400BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBF
        BFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFB0B000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBCBC00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFC8C800BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFD4D400}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 145
      Top = 4
      Width = 25
      Height = 25
      Hint = 'Copy'
      Glyph.Data = {
        42030000424D42030000000000003600000028000000110000000F0000000100
        1800000000000C03000000000000000000000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBF7F00007F00007F00007F00007F00007F00007F00007F00007F0000BFBF
        BFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F0000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F0000BFBFBFFFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBF7F0000FFFFFF000000000000000000000000000000
        FFFFFF7F0000BFBFBF00BFBFBF0000000000000000000000000000000000007F
        0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F0000BFBFBF00BFBF
        BF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F0000FFFFFF00000000000000
        0000000000000000FFFFFF7F0000BFBFBF00BFBFBF000000FFFFFF0000000000
        000000000000007F0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F
        0000BFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F0000FFFF
        FF000000000000FFFFFF7F00007F00007F00007F0000BFBFBF00BFBFBF000000
        FFFFFF0000000000000000000000007F0000FFFFFFFFFFFFFFFFFFFFFFFF7F00
        00FFFFFF7F0000BFBFBFBFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFF7F0000FFFFFFFFFFFFFFFFFFFFFFFF7F00007F0000BFBFBFBFBFBFBFBF
        BF00BFBFBF000000FFFFFF000000000000FFFFFF0000007F00007F00007F0000
        7F00007F00007F0000BFBFBFBFBFBFBFBFBFBFBFBF00BFBFBF000000FFFFFFFF
        FFFFFFFFFFFFFFFF000000FFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF00000000
        0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00BFBF
        BF000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00BFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBF00}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton
      Left = 170
      Top = 4
      Width = 25
      Height = 25
      Hint = 'Paste'
      Glyph.Data = {
        26040000424D2604000000000000360000002800000012000000120000000100
        180000000000F003000000000000000000000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F
        00007F00007F00007F00007F00007F00007F00007F00007F00007F0000BFBFBF
        BFBFBFBFBFBFBFBF0000000000000000000000000000007F0000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F0000BFBFBFBFBFBFBFBF000000
        7F7F7F007F7F7F7F7F007F7F7F7F7F7F0000FFFFFF7F00007F00007F00007F00
        007F00007F0000FFFFFF7F0000BFBFBFBFBFBFBFBF000000007F7F7F7F7F007F
        7F7F7F7F007F7F7F0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFF7F0000BFBFBF5C00BFBFBF0000007F7F7F007F7F7F7F7F007F7F7F7F7F7F
        0000FFFFFF7F00007F00007F0000FFFFFF7F00007F00007F00007F0000BFBFBF
        BFBFBFBFBF000000007F7F7F7F7F007F7F7F7F7F007F7F7F0000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF7F0000FFFFFF7F0000BFBFBFBFBFBFBFBFBFBFBF000000
        7F7F7F007F7F7F7F7F007F7F7F7F7F7F0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FF7F00007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000007F7F7F7F7F007F
        7F7F7F7F007F7F7F00007F00007F00007F00007F00007F00007F0000000000BF
        BFBFBFBFBFBFBFBFBFBFBFBFBF0000007F7F7F007F7F7F7F7F007F7F7F7F7F00
        7F7F7F7F7F007F7F7F7F7F007F7F7F7F7F007F7F000000BFBFBFBFBFBFBFBFBF
        BFBFBFBFBF000000007F7F7F7F7F000000000000000000000000000000000000
        0000000000007F7F7F7F7F7F000000BFBFBFBFBFBFBFBFBFB000BFBFBF000000
        7F7F7F7F7F7F000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000007F7F
        7F007F7F000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000007F7F7F7F7F007F
        7F00000000FFFF00000000000000FFFF0000007F7F7F007F7F7F7F7F000000BF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000000000000000000000000000
        FFFF00FFFF000000000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBF
        0800BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF8000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF6300BFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBF0000}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton5Click
    end
    object btnSendAll: TBitBtn
      Left = 348
      Top = 4
      Width = 105
      Height = 25
      Hint = 'Send Broadcast E-mail To All Or To Active Filter'
      Caption = 'Send To All'
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = btnSendAllClick
    end
    object BitBtn1: TBitBtn
      Left = 506
      Top = 4
      Width = 75
      Height = 25
      TabOrder = 1
      OnClick = BitBtn1Click
      Kind = bkClose
    end
  end
  object SendInfoPanel: TPanel
    Left = 0
    Top = 33
    Width = 600
    Height = 80
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 10
      Top = 8
      Width = 47
      Height = 13
      Alignment = taRightJustify
      Caption = 'Mail To:'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 10
      Top = 56
      Width = 48
      Height = 13
      Alignment = taRightJustify
      Caption = 'Subject:'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 10
      Top = 32
      Width = 20
      Height = 13
      Caption = 'Cc:'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ToEdit: TwwDBEdit
      Left = 64
      Top = 4
      Width = 561
      Height = 21
      Color = 14417919
      DataField = 'SenderEmail'
      DataSource = frmDataModule.dsEmail
      MaxLength = 50
      TabOrder = 0
      WordWrap = False
    end
    object SubjectEdit: TwwDBEdit
      Left = 64
      Top = 52
      Width = 561
      Height = 21
      Color = 14417919
      DataField = 'Subject'
      DataSource = frmDataModule.dsEmail
      MaxLength = 60
      TabOrder = 1
      WordWrap = False
    end
    object CcEdit: TwwDBEdit
      Left = 64
      Top = 28
      Width = 561
      Height = 21
      Color = 14417919
      MaxLength = 0
      TabOrder = 2
      WordWrap = False
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 387
    Width = 600
    Height = 19
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object StatusBar1: TStatusBar
      Left = 0
      Top = 0
      Width = 600
      Height = 19
      Panels = <
        item
          Width = 300
        end
        item
          Width = 100
        end
        item
          Width = 50
        end>
      SimplePanel = False
    end
    object ProgressBar1: TProgressBar
      Left = 302
      Top = 2
      Width = 98
      Height = 17
      Min = 0
      Max = 100
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 340
    Width = 600
    Height = 12
    Align = alBottom
    Alignment = taLeftJustify
    BevelOuter = bvNone
    Caption = 'Attachment:'
    TabOrder = 3
  end
  object ListView1: TListView
    Left = 0
    Top = 352
    Width = 600
    Height = 35
    Align = alBottom
    Color = 14417919
    Columns = <>
    ReadOnly = True
    TabOrder = 4
    LargeImages = ImageList1
  end
  object BodyMemo: TDBMemo
    Left = 0
    Top = 113
    Width = 600
    Height = 227
    Align = alClient
    Color = 14417919
    DataField = 'Body'
    DataSource = frmDataModule.dsEmail
    ScrollBars = ssVertical
    TabOrder = 5
  end
  object msSMTP1: TmsSMTP
    DefaultPort = 25
    TimeOut = 600
    OnOpen = msSMTP1Open
    OnClosing = msSMTP1Closing
    OnClosed = msSMTP1Closed
    OnCancel = msSMTP1Cancel
    OnError = msSMTP1Error
    MailMessage = msMessage1
    OnPrepare = msSMTP1Prepare
    OnSending = msSMTP1Sending
    OnMailSent = msSMTP1MailSent
    OnProgress = msSMTP1Progress
    Left = 368
    Top = 196
  end
  object msMessage1: TmsMessage
    ContentType = 'text/plain'
    ReturnReceipt = False
    Left = 396
    Top = 196
  end
  object ImageList1: TImageList
    Height = 32
    Width = 32
    Left = 340
    Top = 196
  end
  object BatchCopy: TBatchMove
    Destination = frmDataModule.TBLEmailFull
    Source = frmDataModule.QURCopyEmail
    Left = 312
    Top = 196
  end
  object SaveAsDialog: TSaveDialog
    DefaultExt = 'TXT'
    FileEditStyle = fsEdit
    Left = 260
    Top = 196
  end
end