home *** CD-ROM | disk | FTP | other *** search
- object MailForm: TMailForm
- Left = 200
- Top = 99
- Width = 468
- Height = 343
- Caption = 'Internet Mail'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poDefaultPosOnly
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object ToolBar: TPanel
- Left = 0
- Top = 0
- Width = 460
- Height = 33
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvNone
- BorderWidth = 1
- TabOrder = 0
- object SendButton: TSpeedButton
- Left = 8
- Top = 4
- Width = 25
- 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 SetupButton: TSpeedButton
- Left = 104
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Setup'
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333
- 3330337F3F7F33333F3787070003333707303F737773333373F7007703333330
- 700077337F3333373777887007333337007733F773F333337733700070333333
- 077037773733333F7F37703707333300080737F373333377737F003333333307
- 78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733
- 078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730
- 70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003
- 3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003
- 33337F73FF7377733333078000770333333373377733733333330000}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = SetupButtonClick
- end
- object ExitButton: TSpeedButton
- Left = 136
- Top = 4
- Width = 25
- Height = 25
- Hint = 'Exit'
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000C0DCC000F0CA
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8
- F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404
- 0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF
- F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303
- 03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8
- F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303
- F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303
- 03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04
- 0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF
- FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD
- 05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303
- 03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03
- 03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303
- 03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807
- F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303
- F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303
- 03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303
- 0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000
- 000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303
- 00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303
- 03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303
- 03FF}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = ExitButtonClick
- end
- object CancelButton: TSpeedButton
- Tag = 1
- Left = 40
- Top = 4
- Width = 25
- 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 = 72
- 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
- end
- object SendInfoPanel: TPanel
- Left = 0
- Top = 33
- Width = 460
- Height = 74
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 65
- Height = 13
- Alignment = taRightJustify
- Caption = 'To:'
- end
- object Label3: TLabel
- Left = 8
- Top = 30
- Width = 65
- Height = 13
- Alignment = taRightJustify
- Caption = 'Subject:'
- end
- object Label2: TLabel
- Left = 8
- Top = 52
- Width = 65
- Height = 13
- Alignment = taRightJustify
- Caption = 'Attachments:'
- end
- object ToEdit: TEdit
- Left = 80
- Top = 2
- Width = 345
- Height = 21
- TabOrder = 0
- end
- object SubjectEdit: TEdit
- Left = 80
- Top = 24
- Width = 345
- Height = 21
- TabOrder = 1
- end
- object AttachmentsComboBox: TComboBox
- Left = 80
- Top = 46
- Width = 345
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- end
- end
- object BodyMemo: TMemo
- Left = 0
- Top = 107
- Width = 459
- Height = 190
- Align = alLeft
- ScrollBars = ssVertical
- TabOrder = 2
- end
- object Panel1: TPanel
- Left = 0
- Top = 297
- Width = 460
- Height = 19
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 3
- object StatusBar1: TStatusBar
- Left = 0
- Top = 0
- Width = 460
- Height = 19
- Panels = <
- item
- Width = 300
- end
- item
- Width = 100
- end
- item
- Width = 50
- end>
- SimplePanel = False
- end
- object ProgressBar1: TProgressBar
- Left = 302
- Top = 3
- Width = 98
- Height = 16
- Min = 0
- Max = 100
- TabOrder = 1
- end
- end
- object Mailer: TSMTP
- DefaultPort = 25
- OnStatusChange = MailerStatusChange
- OnProgress = MailerProgress
- Left = 200
- end
- end
-