home *** CD-ROM | disk | FTP | other *** search
Text File | 2004-02-23 | 74.4 KB | 2,453 lines |
- object MsgEditor: TMsgEditor
- Left = 221
- Top = 177
- Width = 584
- Height = 410
- HelpContext = 14003
- Caption = 'Edit Mail Message'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- KeyPreview = True
- Menu = EditMenu
- OldCreateOrder = True
- Position = poDefaultPosOnly
- Visible = True
- OnActivate = FormActivate
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnDragDrop = FormDragDrop
- OnDragOver = FormDragOver
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 16
- object DockTop: TDock97
- Left = 0
- Top = 0
- Width = 576
- Height = 33
- BoundLines = [blTop]
- object pnTools: TToolbar97
- Left = 0
- Top = 0
- Caption = 'Toolbar'
- DockedTo = DockTop
- DockPos = 0
- FullSize = True
- TabOrder = 0
- object bQPasteFrom: TToolbarButton97
- Left = 366
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Paste from a file as Quotation'
- ParentShowHint = False
- ShowHint = True
- OnClick = mQPasteFromClick
- end
- object bPasteFrom: TToolbarButton97
- Left = 336
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Paste from a file'
- ParentShowHint = False
- ShowHint = True
- OnClick = mPasteFromClick
- end
- object bSend: TToolbarButton97
- Left = 0
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Send the message'
- ParentShowHint = False
- ShowHint = True
- OnClick = bSend1Click
- end
- object bSearch: TToolbarButton97
- Left = 246
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Search Text'
- ParentShowHint = False
- ShowHint = True
- OnClick = bSearch1Click
- end
- object bQPaste: TToolbarButton97
- Left = 216
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Paste Quoted'
- ParentShowHint = False
- ShowHint = True
- OnClick = mQPasteClick
- end
- object bPaste: TToolbarButton97
- Left = 186
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Paste from Clipboard'
- ParentShowHint = False
- ShowHint = True
- OnClick = mPasteClick
- end
- object bCut: TToolbarButton97
- Left = 156
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Cut to Clipboard'
- ParentShowHint = False
- ShowHint = True
- OnClick = mCutClick
- end
- object bCopy: TToolbarButton97
- Left = 126
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Copy to Clipboard'
- ParentShowHint = False
- ShowHint = True
- OnClick = mCopyClick
- end
- object bSave: TToolbarButton97
- Left = 90
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Save the message'
- ParentShowHint = False
- ShowHint = True
- OnClick = tmSaveTimer
- end
- object bDraft: TToolbarButton97
- Tag = 1
- Left = 60
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Save message as draft'
- ParentShowHint = False
- ShowHint = True
- OnClick = bStore1Click
- end
- object bStore: TToolbarButton97
- Left = 30
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Put the message in Outbox'
- ParentShowHint = False
- ShowHint = True
- OnClick = bStore1Click
- end
- object ToolbarSep971: TToolbarSep97
- Left = 396
- Top = 0
- end
- object bReplace: TToolbarButton97
- Left = 276
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Search & Replace'
- ParentShowHint = False
- ShowHint = True
- OnClick = bReplace1Click
- end
- object bCopyTo: TToolbarButton97
- Left = 306
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Copy to a file'
- ParentShowHint = False
- ShowHint = True
- OnClick = mCopyToClick
- end
- object ToolbarSep972: TToolbarSep97
- Left = 120
- Top = 0
- end
- object bAttach: TToolbarButton97
- Tag = 10
- Left = 402
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Attach a file'
- ParentShowHint = False
- ShowHint = True
- OnClick = mAddMIMEClick
- end
- object bCancel: TToolbarButton97
- Left = 438
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Cancel the message'
- ParentShowHint = False
- ShowHint = True
- OnClick = mCancelClick
- end
- object ToolbarSep973: TToolbarSep97
- Left = 432
- Top = 0
- end
- end
- end
- object DockBottom: TDock97
- Left = 0
- Top = 355
- Width = 576
- Height = 9
- Position = dpBottom
- end
- object DockLeft: TDock97
- Left = 0
- Top = 33
- Width = 9
- Height = 322
- Position = dpLeft
- end
- object DockRight: TDock97
- Left = 567
- Top = 33
- Width = 9
- Height = 322
- Position = dpRight
- end
- object Panel1: TPanel
- Left = 9
- Top = 33
- Width = 558
- Height = 322
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 4
- object DockEdit: TDock97
- Left = 0
- Top = 61
- Width = 558
- Height = 28
- object tbHTML: TToolbar97
- Left = 0
- Top = 0
- Caption = 'HTML Tools'
- DefaultDock = DockEdit
- DockedTo = DockEdit
- DockPos = 0
- FullSize = True
- TabOrder = 0
- object bBold: TToolbarButton97
- Left = 226
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Bold'
- AllowAllUp = True
- GroupIndex = 10
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000000000000000000000000000000000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000FF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FF000000000000000000FF00FFFF00FF0000000000000000
- 00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000FF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FF000000000000000000000000000000000000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000FF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FF000000000000000000FF00FFFF00FF0000000000000000
- 00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000FF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000000000000000000000000000000000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- Layout = blGlyphTop
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bBoldClick
- end
- object bItalic: TToolbarButton97
- Left = 250
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Italic'
- AllowAllUp = True
- GroupIndex = 12
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = [fsBold, fsItalic]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000
- 000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FF000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
- 00000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bItalicClick
- end
- object bUnderline: TToolbarButton97
- Left = 274
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Underline'
- AllowAllUp = True
- GroupIndex = 13
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FF000000000000000000000000000000000000000000000000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FF000000000000000000000000000000FF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000FF00FFFF
- 00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000FF00FFFF00FFFF00FF000000000000FF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000FF00FFFF
- 00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000FF00FFFF00FFFF00FF000000000000FF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000FF00FFFF
- 00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF000000000000FF00FFFF00FFFF00FF000000000000FF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000FF00FFFF
- 00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FF000000000000000000000000FF00FF000000000000000000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bUnderlineClick
- end
- object bLeft: TToolbarButton97
- Left = 384
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Align left'
- GroupIndex = 11
- Down = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- Layout = blGlyphTop
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bLeftClick
- end
- object bCentre: TToolbarButton97
- Left = 408
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Centered'
- GroupIndex = 11
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = [fsBold, fsItalic]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000
- 0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bCentreClick
- end
- object bRight: TToolbarButton97
- Left = 432
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Align right'
- GroupIndex = 11
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = bRightClick
- end
- object bFormatJusfity: TToolbarButton97
- Left = 456
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Justify'
- GroupIndex = 11
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000010001010001010001FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000010001010001010001FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000000000000000000000000000
- 0000000000000000010001010001010001FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- GlyphMask.Data = {00000000}
- Layout = blGlyphTop
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bFormatJusfityClick
- end
- object ToolbarSep974: TToolbarSep97
- Left = 376
- Top = 0
- Blank = True
- SizeHorz = 8
- end
- object ToolbarSep975: TToolbarSep97
- Left = 298
- Top = 0
- Blank = True
- SizeHorz = 8
- end
- object ToolbarSep977: TToolbarSep97
- Left = 218
- Top = 0
- Blank = True
- SizeHorz = 8
- end
- object ToolbarSep976: TToolbarSep97
- Left = 480
- Top = 0
- Blank = True
- SizeHorz = 8
- end
- object bTextImage: TToolbarButton97
- Left = 488
- Top = 1
- Width = 23
- Height = 22
- Hint = 'Insert picture'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = []
- Glyph.Data = {
- 66040000424DA604000000000000B60000002800000012000000120000000100
- 180000000000F003000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFF0000FFFFFF00FFFF00808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080FFFFFF
- 0000FFFFFF00FFFF00808000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF008080FFFFFF0000FFFFFF00FFFF
- 008080FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
- 00FF0000FF000000FFFF008080FFFFFF0000FFFFFF00FFFF008080FF000000FF
- 0000FF0000FF0000FF00FF0000FF0000FF0000FF0000FF0000FF0000FF000000
- FFFF008080FFFFFF0000FFFFFF00FFFF008080FF000000FF0000FF0000FF0000
- FF00FF0000FF0000FF0000FF0000FF0000FF0000FF000000FFFF008080FFFFFF
- 0000FFFFFF00FFFF008080FF000000FF0000FF0000FF00FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF000000FFFF008080FFFFFF0000FFFFFF00FFFF
- 008080FF000000FF0000FF00FF0000FF0000FF0000FF000000FFFF00FFFFFF00
- 00FF0000FF000000FFFF008080FFFFFF0000FFFFFF00FFFF008080FF000000FF
- 0000FF00FF0000FF0000FF000000FFFF00FFFF00FFFF00FFFFFF0000FF000000
- FFFF008080FFFFFF0000FFFFFF00FFFF008080FF0000FF0000FF0000FF0000FF
- 0000FF000000FFFF00FFFF00FFFF00FFFFFF0000FF000000FFFF008080FFFFFF
- 0000FFFFFF00FFFF008080FF0000FF0000FF0000FF0000FF0000FF0000FF0000
- 00FFFF00FFFFFF0000FF0000FF000000FFFF008080FFFFFF0000FFFFFF00FFFF
- 0080800080800080800080800080800080800080800080800080800080800080
- 80008080008080008080008080FFFFFF0000FFFFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFFFFFFFF0000FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF
- 0000FFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFFFFFFFFFFFFFF
- FFFFFF000000000000000000000000FFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFF0000}
- GlyphMask.Data = {00000000}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = bTextImageClick
- end
- object bAddLink: TToolbarButton97
- Left = 511
- Top = 1
- Width = 23
- Height = 22
- Hint = 'Add a hyperlink'
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000120B0000120B000000000000000000006D9CC66D9CC6
- CEA484A7826C7E5D4B704F3D89694EBA90706D9CC6CEA484A7826C7E5D4B704F
- 3D89694EBA90706D9CC66D9CC6D5AF92B79684D0B0A0E0D0C0E0C8B0B090807F
- 5D4BAF8A73B79684D0B0A0E0D0C0E0C8B0B090807F5D4BBC94746D9CC6C3A18C
- E0D0C0B3917EA18060BB9A8750281040281040281040281071573EA18060BB9A
- 87CBA996B0988081644A6D9CC6B39B82FFFFFF633B23D6B197D6B5A2FFFFFFFF
- F8F0FFE8E0F0D8D0F0D0C0967355DFBA9DB89E85E0D0C06848376D9CC6C5A990
- F0E0D09C8978593928604830B09880D0B0A0C0A890D0B8B0C3AA926E543B7B61
- 48B5A08DC0B0A09977646D9CC66D9CC6C0A8A0E0D8D0FFF8F0FFF0F0D0C0B0A0
- 8070806850C0A890E0D8D0FFF8F0FFF0F0D0C0B0AA8A796D9CC66D9CC6B09C8A
- D08860C09070A09880A09070907860308820706830906850AA8B7AB8A088B899
- 88C1A68F6D9CC66D9CC66D9CC6C09070FF9860E0906060785050A03050A03080
- 9020D07840706840605840B79D866D9CC66D9CC66D9CC66D9CC6C7AE97F09870
- F0987060705060984060B04090A040E08860D080505068404078309077606D9C
- C66D9CC66D9CC66D9CC6B49C93FFA07080806040A04050B040909060E09870E0
- 9060E0885060A0204098206958486D9CC66D9CC66D9CC66D9CC6B4A393E09070
- 60985040C86040C87070A070B0A070D09860E09060A0903040A0207858486D9C
- C66D9CC66D9CC66D9CC6C7B5A3A0906050B86060D88090E0A080E0A0A0D090B0
- A060F09860E088505098309B836C6D9CC66D9CC66D9CC66D9CC66D9CC6A0A080
- 30C86070E090C0F0B0D0F0D0F0F8D0B0E8A0809860D09840808840BEAA986D9C
- C66D9CC66D9CC66D9CC66D9CC6C7B5A490B88080D880C0F0B0E0F8D080A87070
- D89040B060908040A694836D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6
- C7B5A5B0B890B0D090A0D89080E09050C070909060B19F8F6D9CC66D9CC66D9C
- C66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6C7B6A5B4A494B49C94C7
- AB9A6D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6}
- GlyphMask.Data = {00000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = bAddLinkClick
- end
- object bDocBkg: TToolbarButton97
- Left = 353
- Top = 1
- Width = 23
- Height = 22
- Hint = 'Document background'
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000120B0000120B000000000000000000006D9CC66D9CC6
- 6D9CC66D9CC66D9CC6A078608048308048308048208040208040208038208038
- 108030107030107030106D9CC66D9CC66D9CC66D9CC66D9CC6B08060FFF0F0D0
- A890C09880C09080A080709078608068505038305048407030106D9CC66D9CC6
- 6D9CC66D9CC66D9CC6B08870FFFFFFF0E0D0E0B0A0D0A080D09880C098805038
- 30A088704038307030106D9CC66D9CC66D9CC66D9CC66D9CC6B08870B0A090FF
- F8FFF0E0D0E0B0A0D0A890705850C0B8B07068605040408038106D9CC66D9CC6
- 6D9CC66D9CC66D9CC6B09080F0E8E0B09890FFF8F0F0E0D0705840A08880A090
- 80503830F0C0A08038106D9CC66D9CC66D9CC66D9CC66D9CC6C09880FFFFFFE0
- D8D0B09890A08880C0A8A0C0A8A0C0A8A0FFD8D0F0C0B0803820A7A7A7A7A7A7
- 9797979797978B8B8B8282828282828282827B7B7BF0D8D0E0E0F05068D03058
- D0D0C0D0F0C8C0804020A7A7A70000FF1D94F700FFFF00FF00FF8F00FF0000FF
- 00FF828282FFFFFF6070D050A0F02078D03048C0F0D0C0804020A7A7A70000FF
- 1D94F700FFFF00FF00FF8F00FF0000FF00FF828282FFFFFF9098D090C0F050A8
- F06070C0F0D8D0804020A7A7A70000FF1D94F700FFFF00FF00FF8F00FF0000FF
- 00FF8B8B8BFFFFFFE0E8F0A0A8E09098D0F0E8F0FFF0F0804820A7A7A70000FF
- 1D94F700FFFF00FF00FF8F00FF0000FF00FF8B8B8BC09880B09080B08870B080
- 70A07860A07860A07050A7A7A70000FF1D94F700FFFF00FF00FF8F00FF0000FF
- 00FF8B8B8B6D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6A7A7A70000FF
- 1D94F700FFFF00FF00FF8F00FF0000FF00FF9797976D9CC66D9CC66D9CC66D9C
- C66D9CC66D9CC66D9CC6A7A7A70000FF1D94F700FFFF00FF00FF8F00FF0000FF
- 00FF9797976D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6A7A7A70000FF
- 1D94F700FFFF00FF00FF8F00FF0000FF00FFA7A7A76D9CC66D9CC66D9CC66D9C
- C66D9CC66D9CC66D9CC6A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7A7
- A7A7A7A7A76D9CC66D9CC66D9CC66D9CC66D9CC66D9CC66D9CC6}
- GlyphMask.Data = {00000000}
- ParentShowHint = False
- ShowHint = True
- OnClick = bDocBkgClick
- end
- object bBkColor: TToolbarButton97
- Left = 329
- Top = 1
- Width = 24
- Height = 22
- Hint = 'Text background'
- ParentShowHint = False
- ShowHint = True
- OnClick = bBkColorClick
- end
- object bTextColor: TToolbarButton97
- Left = 306
- Top = 1
- Width = 23
- Height = 22
- Hint = 'Text colour'
- ParentShowHint = False
- ShowHint = True
- OnClick = bTextColorClick
- end
- object cbSize: TComboBox
- Left = 169
- Top = 0
- Width = 49
- Height = 24
- ItemHeight = 16
- TabOrder = 0
- Text = '9'
- OnChange = cbSizeChange
- OnKeyPress = cbSizeKeyPress
- OnSelect = cbSizeSelect
- Items.Strings = (
- '8'
- '9'
- '10'
- '11'
- '12'
- '14'
- '16'
- '18'
- '20'
- '22'
- '24'
- '26'
- '28'
- '36'
- '48'
- '72')
- end
- object cbFont: TComboBox
- Left = 0
- Top = 0
- Width = 169
- Height = 24
- Style = csDropDownList
- ItemHeight = 16
- TabOrder = 1
- OnChange = cbFontChange
- OnKeyDown = cbFontKeyDown
- OnSelect = cbFontChange
- Items.Strings = (
- 'Arial'
- 'Courier New'
- 'Comic Sans MS'
- 'Times New Roman')
- end
- end
- end
- object pnMsgEditAligner: TPanel
- Left = 0
- Top = 89
- Width = 558
- Height = 213
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 1
- TabOrder = 1
- object Split1: TSplitter
- Left = 1
- Top = 1
- Height = 211
- end
- object Panel2: TPanel
- Left = 61
- Top = 1
- Width = 496
- Height = 211
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- OnDragDrop = FormDragDrop
- OnDragOver = FormDragOver
- object Split2: TSplitter
- Left = 0
- Top = 47
- Width = 496
- Height = 3
- Cursor = crVSplit
- Align = alTop
- end
- object pnHeader: TPanel
- Tag = 11
- Left = 0
- Top = 0
- Width = 496
- Height = 47
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- Visible = False
- object pnOMsgAligner: TPanel
- Tag = 11
- Left = 0
- Top = 0
- Width = 496
- Height = 47
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 2
- TabOrder = 0
- object oMsg: TTextEditor
- Left = 2
- Top = 2
- Width = 492
- Height = 43
- OnPosChanged = fMsgPosChanged
- OnBlockChanged = fMsgBlockChanged
- BgColor = clWhite
- TextColor = clBlack
- SelColor = clWhite
- SelBgColor = clBlack
- QuoteColor = clBlue
- RefColor = clBlue
- Kludge1Color = clOlive
- Kludge2Color = clOlive
- Kludge3Color = clOlive
- ReadOnly = True
- OnSelectionChanged = fMsgSelectionChanged
- OnInsChange = fMsgInsChange
- OnApplicationPopup = Popup3Click
- FontCharset = 1
- Ctl3D = False
- TabOrder = 0
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- Align = alClient
- OnMouseMove = fMsgMouseMove
- OnEnter = oMsgEnter
- PopupMenu = EditPopup
- OnDblClick = fMsgDblClick
- end
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 50
- Width = 496
- Height = 161
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 1
- TabOrder = 1
- object pnEditorAlign: TPanel
- Tag = 11
- Left = 1
- Top = 1
- Width = 494
- Height = 159
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 2
- TabOrder = 0
- object fMsg: TTextEditor
- Left = 2
- Top = 2
- Width = 490
- Height = 155
- HelpContext = 10027
- OnPosChanged = fMsgPosChanged
- OnBlockChanged = fMsgBlockChanged
- BgColor = clWhite
- TextColor = clBlack
- SelColor = clWhite
- SelBgColor = clBlack
- QuoteColor = clBlue
- RefColor = clBlue
- Kludge1Color = clOlive
- Kludge2Color = clOlive
- Kludge3Color = clOlive
- ReadOnly = False
- OnSelectionChanged = fMsgSelectionChanged
- OnModifiedChange = fMsgModifiedChange
- OnInsChange = fMsgInsChange
- SpellPopup = SpellPopup
- OnApplicationPopup = Popup3Click
- FontCharset = 1
- Ctl3D = False
- TabOrder = 0
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- Align = alClient
- OnMouseMove = fMsgMouseMove
- OnEnter = fMsgEnter
- OnDblClick = fMsgDblClick
- end
- end
- end
- end
- object pnAttach: TPanel
- Left = 4
- Top = 1
- Width = 57
- Height = 211
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 1
- object pnAttachAligner: TPanel
- Tag = 11
- Left = 0
- Top = 0
- Width = 57
- Height = 211
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object fList: TListView
- Left = 0
- Top = 0
- Width = 57
- Height = 211
- HelpContext = 10041
- Align = alClient
- Columns = <>
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- IconOptions.AutoArrange = True
- LargeImages = fImages
- MultiSelect = True
- ReadOnly = True
- ParentFont = False
- PopupMenu = AttachPopup
- ShowColumnHeaders = False
- SmallImages = fImages
- StateImages = fImages
- TabOrder = 0
- OnDblClick = fListDblClick
- OnEnter = fListEnter
- OnDragDrop = FormDragDrop
- OnDragOver = FormDragOver
- end
- end
- end
- end
- object sBar: TStatusBar
- Left = 0
- Top = 302
- Width = 558
- Height = 20
- Panels = <
- item
- Text = ' 1:1'
- Width = 80
- end
- item
- Width = 70
- end
- item
- Text = 'Stream'
- Width = 70
- end
- item
- Text = 'Insert'
- Width = 70
- end
- item
- Style = psOwnerDraw
- Text = 'Normal'
- Width = 64
- end
- item
- Text = 'Account'
- Width = 120
- end
- item
- Text = 'Windows'
- Width = 50
- end>
- OnMouseDown = sBarMouseDown
- OnDrawPanel = sBarDrawPanel
- end
- object gInfo: TAddressGrid
- Left = 0
- Top = 0
- Width = 558
- Height = 61
- HelpContext = 10044
- Align = alTop
- BorderStyle = bsNone
- Color = clBtnFace
- ColCount = 2
- DefaultRowHeight = 20
- DefaultDrawing = False
- RowCount = 1
- FixedRows = 0
- Options = [goVertLine, goHorzLine, goEditing, goTabs, goAlwaysShowEditor, goThumbTracking]
- TabOrder = 3
- OnDragDrop = FormDragDrop
- OnDragOver = FormDragOver
- OnEnter = gInfoEnter
- OnExit = gInfoExit
- OnMouseDown = gInfoMouseDown
- OnSelectCell = gInfoSelectCell
- SimpleLook = False
- OnAddressClick = gInfoAddressClick
- OnAddAddressClick = bAddAddrClick
- ColWidths = (
- 16
- 542)
- end
- end
- object EditMenu: TMainMenu
- Left = 488
- Top = 80
- object File1: TMenuItem
- Caption = '&Message'
- object SendNow2: TMenuItem
- Caption = '&Send now'
- ShortCut = 16397
- OnClick = bSend1Click
- end
- object mSend: TMenuItem
- Caption = '&Send now'
- ShortCut = 113
- Visible = False
- OnClick = bSend1Click
- end
- object mQueue: TMenuItem
- Caption = 'Queue in &Outbox'
- ShortCut = 8305
- OnClick = bStore1Click
- end
- object meSave: TMenuItem
- Caption = 'Sa&ve'
- ShortCut = 16467
- OnClick = tmSaveTimer
- end
- object mSaveAs: TMenuItem
- Caption = 'Save &as...'
- ShortCut = 16497
- OnClick = bSaveAsClick
- end
- object mDraft: TMenuItem
- Tag = 1
- Caption = 'Save &Draft'
- ShortCut = 32881
- OnClick = bStore1Click
- end
- object N10: TMenuItem
- Caption = '-'
- end
- object mPrint: TMenuItem
- Caption = '&Print...'
- ShortCut = 16464
- OnClick = mPrintClick
- end
- object mPrintSetup: TMenuItem
- Caption = 'Print s&etup...'
- OnClick = mPrintSetupClick
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object mCancel: TMenuItem
- Caption = 'Cancel'
- OnClick = mCancelClick
- end
- object Test: TMenuItem
- Caption = 'Test'
- ShortCut = 57428
- Visible = False
- OnClick = TestClick
- end
- end
- object mEEdit: TMenuItem
- Caption = '&Edit'
- OnClick = mEEditClick
- object mUndo: TMenuItem
- Tag = 2
- Caption = '&Undo'
- OnClick = mUndoClick
- end
- object mRedo: TMenuItem
- Caption = '&Redo'
- Enabled = False
- Visible = False
- OnClick = mRedoClick
- end
- object N11: TMenuItem
- Caption = '-'
- end
- object mCut: TMenuItem
- Tag = 1
- Caption = 'Cu&t'
- OnClick = mCutClick
- end
- object mCopy: TMenuItem
- Tag = 1
- Caption = '&Copy'
- OnClick = mCopyClick
- end
- object mPaste: TMenuItem
- Caption = '&Paste'
- OnClick = mPasteClick
- end
- object mClear: TMenuItem
- Caption = '&Delete'
- OnClick = mClearClick
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object mCopyTo: TMenuItem
- Tag = 1
- Caption = 'Cop&y to...'
- OnClick = mCopyToClick
- end
- object N21: TMenuItem
- Caption = '-'
- end
- object mPasteFrom: TMenuItem
- Caption = 'Paste &from...'
- OnClick = mPasteFromClick
- end
- object mQPaste: TMenuItem
- Caption = 'Paste as &Quotation'
- ShortCut = 32813
- OnClick = mQPasteClick
- end
- object mQPasteFrom: TMenuItem
- Caption = 'P&aste as Quotation from...'
- OnClick = mQPasteFromClick
- end
- object mPasteFormat: TMenuItem
- Caption = 'Pa&ste formatted'
- ShortCut = 24621
- OnClick = mPasteFormatClick
- end
- end
- object Search1: TMenuItem
- Caption = '&Search'
- object Find1: TMenuItem
- Caption = '&Find...'
- ShortCut = 16454
- OnClick = bSearch1Click
- end
- object mFind: TMenuItem
- Caption = '&Find...'
- ShortCut = 118
- Visible = False
- OnClick = bSearch1Click
- end
- object mReplace: TMenuItem
- Caption = '&Replace...'
- ShortCut = 16502
- OnClick = bReplace1Click
- end
- object Searchagain2: TMenuItem
- Caption = '&Search again'
- ShortCut = 114
- Visible = False
- OnClick = Searchagain1Click
- end
- object Searchagain1: TMenuItem
- Caption = '&Search again'
- ShortCut = 8310
- OnClick = Searchagain1Click
- end
- object mReverseSearch: TMenuItem
- Caption = 'Re&verse search'
- ShortCut = 32886
- OnClick = mReverseSearchClick
- end
- end
- object Utilities1: TMenuItem
- Caption = '&Utilities'
- OnClick = Utilities1Click
- object mAddressPicker: TMenuItem
- Caption = 'Address Picker'
- ShortCut = 32887
- OnClick = mAddressPickerClick
- end
- object N16: TMenuItem
- Caption = '-'
- end
- object mInsertDate: TMenuItem
- Caption = 'Insert &Date'
- OnClick = mInsertDateClick
- end
- object mInsertTime: TMenuItem
- Caption = 'Insert &Time'
- OnClick = mInsertDateClick
- end
- object mmInsCookie: TMenuItem
- Caption = 'Insert &Cookie'
- OnClick = mmInsCookieClick
- end
- object muQuick: TMenuItem
- Caption = 'Insert &Quick template'
- object none1: TMenuItem
- Caption = '(none)'
- Enabled = False
- end
- end
- object mEvaluate: TMenuItem
- Caption = '&Evaluate'
- ShortCut = 24763
- OnClick = mEvaluateClick
- end
- object mAdvanceAddressSearch: TMenuItem
- Caption = 'Advance address search'
- ShortCut = 16571
- Visible = False
- OnClick = mAdvanceAddressSearchClick
- end
- object mReverseAddressSearch: TMenuItem
- Tag = -1
- Caption = 'Reverse address search'
- ShortCut = 16573
- Visible = False
- OnClick = mAdvanceAddressSearchClick
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object mmFormat: TMenuItem
- Caption = '&Format Block'
- object AlignLeft1: TMenuItem
- Caption = '&Left'
- ShortCut = 32844
- OnClick = AlignLeft1Click
- end
- object Justify1: TMenuItem
- Caption = '&Justify'
- ShortCut = 32842
- OnClick = Justify1Click
- end
- object Right1: TMenuItem
- Caption = '&Right'
- ShortCut = 32850
- OnClick = Right1Click
- end
- object Center1: TMenuItem
- Caption = '&Center'
- ShortCut = 32835
- OnClick = Center1Click
- end
- end
- object muAutoFormat: TMenuItem
- Caption = 'A&uto-Format'
- ShortCut = 24646
- OnClick = muAutoFormatClick
- end
- object muAutowrap: TMenuItem
- Caption = 'Auto-&Wrap '
- ShortCut = 24663
- OnClick = muAutowrapClick
- end
- object muWrapJustify: TMenuItem
- Caption = '&Justify on autowrap'
- ShortCut = 24650
- OnClick = muWrapJustifyClick
- end
- object N17: TMenuItem
- Caption = '-'
- end
- object muAttachvCard: TMenuItem
- Caption = 'Attach Personal vCard'
- OnClick = muAttachvCardClick
- end
- object Addafile1: TMenuItem
- Caption = '&Attach files'
- object MIMEcoded1: TMenuItem
- Caption = '&MIME-coded...'
- ShortCut = 32801
- OnClick = mAddMIMEClick
- end
- object QuotedPrintable1: TMenuItem
- Tag = 1
- Caption = '&Quoted-Printable...'
- OnClick = mAddMIMEClick
- end
- object N18: TMenuItem
- Caption = '-'
- end
- object UUencoded1: TMenuItem
- Tag = 3
- Caption = '&UU-encoded...'
- ShortCut = 32802
- OnClick = mAddMIMEClick
- end
- end
- end
- object mbSpell: TMenuItem
- Caption = 'Spell C&hecker'
- object mbAutoSpell: TMenuItem
- Caption = '&Automatic checking'
- Checked = True
- ShortCut = 16499
- OnClick = mbAutoSpellClick
- end
- object mbSpellAll: TMenuItem
- Caption = '&Check entire text'
- ShortCut = 115
- OnClick = mbSpellAllClick
- end
- object mCheckComplete: TMenuItem
- Caption = 'Check &before send/queue'
- OnClick = mCheckCompleteClick
- end
- object N29: TMenuItem
- Caption = '-'
- end
- object mbLng: TMenuItem
- Caption = '&Language'
- object mbAEnglish: TMenuItem
- Caption = 'American English'
- Checked = True
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object BritishEnglish1: TMenuItem
- Tag = 1
- Caption = 'British English'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Catalan1: TMenuItem
- Tag = 2
- Caption = 'Catalan'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Czech1: TMenuItem
- Tag = 3
- Caption = 'Czech'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Danish1: TMenuItem
- Tag = 4
- Caption = 'Danish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Dutch1: TMenuItem
- Tag = 5
- Caption = 'Dutch'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Finnish1: TMenuItem
- Tag = 6
- Caption = 'Finnish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object French1: TMenuItem
- Tag = 7
- Caption = 'French'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object German2: TMenuItem
- Tag = 8
- Caption = 'German'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Hungarian1: TMenuItem
- Tag = 9
- Caption = 'Hungarian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Italian1: TMenuItem
- Tag = 10
- Caption = 'Italian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Norwegian1: TMenuItem
- Tag = 11
- Caption = 'Norwegian (Bokmal)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object NorwegianNynorsk1: TMenuItem
- Tag = 12
- Caption = 'Norwegian (Nynorsk)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Polish1: TMenuItem
- Tag = 13
- Caption = 'Polish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object PortugeseBrasilian1: TMenuItem
- Tag = 14
- Caption = 'Portuguese (Brazilian)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object PortugeseIberian1: TMenuItem
- Tag = 15
- Caption = 'Portuguese (Iberian)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Russian1: TMenuItem
- Tag = 16
- Caption = 'Russian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Spanish1: TMenuItem
- Tag = 17
- Caption = 'Spanish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Swedish1: TMenuItem
- Tag = 18
- Caption = 'Swedish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object N8: TMenuItem
- Tag = -1
- Caption = '-'
- GroupIndex = 10
- RadioItem = True
- end
- object AmericanEnglish1: TMenuItem
- Tag = 19
- Caption = 'American English'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object AustralianEnglish1: TMenuItem
- Tag = 20
- Caption = 'Australian English'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object BritishEnglish2: TMenuItem
- Tag = 21
- Caption = 'British English'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Catalan2: TMenuItem
- Tag = 22
- Caption = 'Catalan'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Czech2: TMenuItem
- Tag = 23
- Caption = 'Czech'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Danish2: TMenuItem
- Tag = 24
- Caption = 'Danish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Dutch2: TMenuItem
- Tag = 25
- Caption = 'Dutch'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Finnish2: TMenuItem
- Tag = 26
- Caption = 'Finnish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object French2: TMenuItem
- Tag = 27
- Caption = 'French'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object French3: TMenuItem
- Tag = 28
- Caption = 'French Canadian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object German1: TMenuItem
- Tag = 29
- Caption = 'German'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Hungarian2: TMenuItem
- Tag = 30
- Caption = 'Hungarian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Italian2: TMenuItem
- Tag = 31
- Caption = 'Italian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object NorwegianBokmal1: TMenuItem
- Tag = 32
- Caption = 'Norwegian (Bokmal)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object NorwegianNynorsk2: TMenuItem
- Tag = 33
- Caption = 'Norwegian (Nynorsk)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Polish2: TMenuItem
- Tag = 34
- Caption = 'Polish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object PortugeseBrasilian2: TMenuItem
- Tag = 35
- Caption = 'Portuguese (Brazilian)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object PortugeseIberian2: TMenuItem
- Tag = 36
- Caption = 'Portuguese (Iberian)'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Russian2: TMenuItem
- Tag = 37
- Caption = 'Russian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Spanish2: TMenuItem
- Tag = 38
- Caption = 'Spanish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Swedish2: TMenuItem
- Tag = 39
- Caption = 'Swedish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Afrikaans: TMenuItem
- Tag = 40
- Caption = 'Afrikaans'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Albanian: TMenuItem
- Tag = 41
- Caption = 'Albanian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Arabic: TMenuItem
- Tag = 42
- Caption = 'Arabic'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Basque: TMenuItem
- Tag = 43
- Caption = 'Basque'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Belarusian: TMenuItem
- Tag = 44
- Caption = 'Belarusian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Bulgarian: TMenuItem
- Tag = 45
- Caption = 'Bulgarian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Chinese: TMenuItem
- Tag = 46
- Caption = 'Chinese'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Croatian: TMenuItem
- Tag = 47
- Caption = 'Croatian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Estonian: TMenuItem
- Tag = 48
- Caption = 'Estonian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Faeroese: TMenuItem
- Tag = 49
- Caption = 'Faeroese'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Farsi: TMenuItem
- Tag = 50
- Caption = 'Farsi'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Greek: TMenuItem
- Tag = 51
- Caption = 'Greek'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Hebrew: TMenuItem
- Tag = 52
- Caption = 'Hebrew'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Icelandic: TMenuItem
- Tag = 53
- Caption = 'Icelandic'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Indonesian: TMenuItem
- Tag = 54
- Caption = 'Indonesian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Japanese: TMenuItem
- Tag = 55
- Caption = 'Japanese'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Korean: TMenuItem
- Tag = 56
- Caption = 'Korean'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Latvian: TMenuItem
- Tag = 57
- Caption = 'Latvian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Lithuanian: TMenuItem
- Tag = 58
- Caption = 'Lithuanian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Romanian: TMenuItem
- Tag = 59
- Caption = 'Romanian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Serbian: TMenuItem
- Tag = 60
- Caption = 'Serbian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Slovak: TMenuItem
- Tag = 61
- Caption = 'Slovak'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Slovenian: TMenuItem
- Tag = 62
- Caption = 'Slovenian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Thai: TMenuItem
- Tag = 63
- Caption = 'Thai'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Turkish: TMenuItem
- Tag = 64
- Caption = 'Turkish'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Ukrainian: TMenuItem
- Tag = 65
- Caption = 'Ukrainian'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- object Vietnamese: TMenuItem
- Tag = 66
- Caption = 'Vietnamese'
- GroupIndex = 10
- RadioItem = True
- OnClick = mbAEnglishClick
- end
- end
- object mbSpellOpts: TMenuItem
- Caption = '&Options...'
- OnClick = mbSpellOptsClick
- end
- object mbSpellDict: TMenuItem
- Caption = '&Dictionaries...'
- OnClick = mbSpellDictClick
- end
- end
- object PGP1: TMenuItem
- Caption = '&Privacy'
- object mpOCrypt: TMenuItem
- Caption = '&Encrypt when Completed'
- OnClick = mpOSignClick
- end
- object mpOSign: TMenuItem
- Caption = '&Sign when Completed'
- OnClick = mpOSignClick
- end
- object N20: TMenuItem
- Caption = '-'
- end
- object mpApplyPGP: TMenuItem
- Caption = 'Enable OpenPGP'
- OnClick = mpOSignClick
- end
- object mpApplySMIME: TMenuItem
- Caption = 'Enable S/MIME'
- OnClick = mpOSignClick
- end
- object mpConfigure: TMenuItem
- Tag = 1111
- Caption = 'Set Defaults...'
- OnClick = mpConfigureClick
- end
- object N14: TMenuItem
- Caption = '-'
- end
- object mpPGP: TMenuItem
- Caption = 'OpenPGP'
- object mpgpSignBlock: TMenuItem
- Tag = 1
- Caption = 'Sign &Block'
- ShortCut = 41043
- OnClick = mpgpSignBlockClick
- end
- object mPGPSignText: TMenuItem
- Caption = 'Si&gn Entire Text'
- ShortCut = 24659
- OnClick = mPGPSignTextClick
- end
- object mPGPEncryptText: TMenuItem
- Caption = 'Encr&ypt Entire Text'
- ShortCut = 24645
- OnClick = mPGPEncryptTextClick
- end
- object mPgpSignCrypt: TMenuItem
- Tag = 2
- Caption = 'S&ign && Encrypt Entire Text'
- ShortCut = 41029
- OnClick = mPgpSignCryptClick
- end
- object PGPD2: TMenuItem
- Caption = '-'
- end
- object mmPGPkeys: TMenuItem
- Caption = 'Key &Manager...'
- OnClick = mmPGPkeysClick
- end
- object mmPGPprefs: TMenuItem
- Caption = '&Preferences...'
- OnClick = mmPGPprefsClick
- end
- end
- object mPGPMIME: TMenuItem
- Caption = 'PGP/MIME'
- object mPGPMIMEAuto: TMenuItem
- Caption = '&Auto'
- Checked = True
- GroupIndex = 2
- RadioItem = True
- OnClick = mPGPMIMEAutoClick
- end
- object mPGPMIMEOn: TMenuItem
- Tag = 1
- Caption = '&On'
- GroupIndex = 2
- RadioItem = True
- OnClick = mPGPMIMEAutoClick
- end
- object mPGPMIMEOff: TMenuItem
- Tag = -1
- Caption = 'O&ff'
- GroupIndex = 2
- RadioItem = True
- OnClick = mPGPMIMEAutoClick
- end
- end
- end
- object View1: TMenuItem
- Caption = '&View'
- OnClick = View1Click
- object mShowTools: TMenuItem
- Caption = '&Toolbar'
- Checked = True
- OnClick = mShowToolsClick
- end
- object moHTMLTools: TMenuItem
- Caption = 'HTML Toolbar'
- Visible = False
- OnClick = moHTMLToolsClick
- end
- object mStorePos: TMenuItem
- Caption = '&Store window position'
- OnClick = mStorePosClick
- end
- object mShowOrigin: TMenuItem
- Caption = '&Original text'
- Enabled = False
- GroupIndex = 11
- OnClick = mShowOriginClick
- end
- object N1: TMenuItem
- Caption = '-'
- GroupIndex = 11
- end
- object N22: TMenuItem
- Caption = '-'
- GroupIndex = 11
- end
- object mEditHeaders: TMenuItem
- Caption = 'Edit &Headers'
- GroupIndex = 11
- OnClick = mEditHeadersClick
- end
- object mEditShortcuts: TMenuItem
- Caption = '&Edit shortcuts'
- GroupIndex = 11
- ShortCut = 32891
- OnClick = mEditShortcutsClick
- end
- end
- object Options1: TMenuItem
- Caption = '&Options'
- object mRcptConfirm: TMenuItem
- Caption = '&Confirm Receipt'
- OnClick = mRcptConfirmClick
- end
- object mReadConfirm: TMenuItem
- Caption = '&Reading confirmation'
- OnClick = mReadConfirmClick
- end
- object moSplit: TMenuItem
- Caption = '&Split message if needed'
- OnClick = moSplitClick
- end
- object N5: TMenuItem
- Caption = '-'
- end
- object mNormal: TMenuItem
- Caption = '&Normal Priority'
- Checked = True
- GroupIndex = 2
- RadioItem = True
- OnClick = mNormalClick
- end
- object mHigh: TMenuItem
- Caption = '&High Priority'
- GroupIndex = 2
- RadioItem = True
- OnClick = mNormalClick
- end
- object mLow: TMenuItem
- Caption = '&Low priority'
- GroupIndex = 2
- RadioItem = True
- OnClick = mNormalClick
- end
- object N13: TMenuItem
- Caption = '-'
- GroupIndex = 2
- end
- object Messageformat1: TMenuItem
- Caption = 'Message &Format'
- GroupIndex = 2
- object moPlain: TMenuItem
- Caption = '&Plain text (MicroEd)'
- Checked = True
- GroupIndex = 10
- RadioItem = True
- OnClick = moPlainClick
- end
- object moWindows: TMenuItem
- Tag = 1
- Caption = 'Plain text (Windows)'
- GroupIndex = 10
- RadioItem = True
- Visible = False
- OnClick = moPlainClick
- end
- object moAlternative: TMenuItem
- Tag = 2
- Caption = 'HTML/Plain text'
- GroupIndex = 10
- RadioItem = True
- Visible = False
- OnClick = moPlainClick
- end
- object moHTML: TMenuItem
- Tag = 3
- Caption = 'HTML only'
- GroupIndex = 10
- RadioItem = True
- Visible = False
- OnClick = moPlainClick
- end
- end
- object mmXlat: TMenuItem
- Caption = '&Message encoding'
- GroupIndex = 2
- object mtNone: TMenuItem
- Caption = '&None'
- GroupIndex = 10
- RadioItem = True
- OnClick = mtNoneClick
- end
- object N19: TMenuItem
- Caption = '-'
- Enabled = False
- GroupIndex = 10
- end
- end
- object N12: TMenuItem
- Caption = '-'
- GroupIndex = 2
- end
- object meAccount: TMenuItem
- Caption = '&Active account'
- GroupIndex = 2
- end
- end
- end
- object tCheck: TTimer
- OnTimer = tCheckTimer
- Left = 489
- Top = 33
- end
- object fImages: TImageList
- Height = 32
- Width = 32
- Left = 16
- Top = 291
- end
- object AttachPopup: TPopupMenu
- OnPopup = AttachPopupPopup
- Left = 16
- Top = 252
- object mAddFile: TMenuItem
- Caption = '&Add a file'
- object mAddMIME: TMenuItem
- Caption = '&MIME-coded'
- ShortCut = 45
- OnClick = mAddMIMEClick
- end
- object mAddQuoted: TMenuItem
- Tag = 1
- Caption = '&Quoted-Printable'
- ShortCut = 32813
- OnClick = mAddMIMEClick
- end
- object N15: TMenuItem
- Caption = '-'
- end
- object mAddUUE: TMenuItem
- Tag = 2
- Caption = '&UU-encoded'
- ShortCut = 16429
- OnClick = mAddMIMEClick
- end
- end
- object N6: TMenuItem
- Caption = '-'
- end
- object maSave: TMenuItem
- Caption = '&Save...'
- ShortCut = 13
- OnClick = maSaveClick
- end
- object maDel: TMenuItem
- Caption = '&Delete'
- ShortCut = 46
- OnClick = maDelClick
- end
- object maView: TMenuItem
- Tag = 1
- Caption = '&Open...'
- ShortCut = 16397
- OnClick = maSaveClick
- end
- object maPrint: TMenuItem
- Tag = 2
- Caption = '&Print...'
- OnClick = maSaveClick
- end
- object MenuItem1: TMenuItem
- Caption = '-'
- Visible = False
- end
- object maForward: TMenuItem
- Caption = '&Forward...'
- ShortCut = 16454
- Visible = False
- end
- object PopUp1: TMenuItem
- Caption = 'PopUp'
- ShortCut = 32889
- Visible = False
- OnClick = PopUp1Click
- end
- end
- object tmSave: TTimer
- Enabled = False
- OnTimer = tmSaveTimer
- Left = 326
- Top = 224
- end
- object EditPopup: TPopupMenu
- AutoPopup = False
- OnPopup = EditPopupPopup
- Left = 16
- Top = 152
- object meQuote: TMenuItem
- Caption = '&Quote'
- Visible = False
- OnClick = meQuoteClick
- end
- object meQuoteWO: TMenuItem
- Tag = 1
- Caption = 'Quote &Without Prefixes'
- Visible = False
- OnClick = meQuoteClick
- end
- object meCopy: TMenuItem
- Caption = '&Copy'
- ShortCut = 16429
- OnClick = mCopyClick
- end
- object meCut: TMenuItem
- Caption = 'C&ut'
- ShortCut = 8238
- OnClick = mCutClick
- end
- object mePaste: TMenuItem
- Caption = '&Paste'
- ShortCut = 8237
- OnClick = mPasteClick
- end
- object mePasteQuoted: TMenuItem
- Caption = 'Paste as &Quotation'
- ShortCut = 32813
- OnClick = mQPasteClick
- end
- object meDelete: TMenuItem
- Caption = '&Delete'
- OnClick = mClearClick
- end
- object mInsCookie: TMenuItem
- Caption = 'I&nsert Cookie'
- OnClick = mmInsCookieClick
- end
- object meQuick: TMenuItem
- Caption = 'Insert Quick &Template'
- ShortCut = 16416
- OnClick = meQuickClick
- end
- object N24: TMenuItem
- Caption = '-'
- end
- object meFind: TMenuItem
- Caption = '&Find...'
- ShortCut = 118
- OnClick = bSearch1Click
- end
- object meReplace: TMenuItem
- Caption = '&Replace...'
- ShortCut = 16502
- OnClick = bReplace1Click
- end
- object meSearchAgain: TMenuItem
- Caption = '&Search Again'
- ShortCut = 8310
- OnClick = Searchagain1Click
- end
- object N23: TMenuItem
- Caption = '-'
- end
- object Blocktype1: TMenuItem
- Caption = '&Block type'
- OnClick = Blocktype1Click
- object meStream: TMenuItem
- Caption = '&Stream'
- Checked = True
- GroupIndex = 2
- RadioItem = True
- OnClick = meStreamClick
- end
- object meColumn: TMenuItem
- Tag = 1
- Caption = '&Column'
- GroupIndex = 2
- RadioItem = True
- OnClick = meStreamClick
- end
- object meLinear: TMenuItem
- Tag = 2
- Caption = '&Linear'
- GroupIndex = 2
- RadioItem = True
- OnClick = meStreamClick
- end
- end
- object mePrefs: TMenuItem
- Caption = 'Pr&eferences...'
- OnClick = Editorpreferences1Click
- end
- object SelectAll1: TMenuItem
- Caption = 'Select All'
- OnClick = SelectAll1Click
- end
- object Popup3: TMenuItem
- Tag = 1
- Caption = 'Popup'
- ShortCut = 32889
- Visible = False
- OnClick = Popup3Click
- end
- object Undo: TMenuItem
- Caption = 'Undo'
- ShortCut = 32776
- Visible = False
- OnClick = mUndoClick
- end
- object mlRedo: TMenuItem
- Caption = 'Redo'
- ShortCut = 40968
- Visible = False
- OnClick = mRedoClick
- end
- end
- object sbPop: TPopupMenu
- AutoPopup = False
- OnPopup = sbPopPopup
- Left = 224
- Top = 223
- object msbStream: TMenuItem
- Caption = '&Stream'
- GroupIndex = 1
- RadioItem = True
- OnClick = meStreamClick
- end
- object msbColumn: TMenuItem
- Tag = 1
- Caption = '&Column'
- GroupIndex = 1
- RadioItem = True
- OnClick = meStreamClick
- end
- object msbLinear: TMenuItem
- Tag = 2
- Caption = '&Linear'
- GroupIndex = 1
- RadioItem = True
- OnClick = meStreamClick
- end
- object msbInsert: TMenuItem
- Caption = '&Insert mode'
- GroupIndex = 2
- RadioItem = True
- OnClick = msbInsertClick
- end
- object msbOverride: TMenuItem
- Tag = 1
- Caption = '&Overwrite mode'
- GroupIndex = 2
- RadioItem = True
- OnClick = msbInsertClick
- end
- object msbHigh: TMenuItem
- Caption = '&High priority'
- GroupIndex = 3
- RadioItem = True
- OnClick = msbHighClick
- end
- object msbNormal: TMenuItem
- Tag = 1
- Caption = '&Normal priority'
- GroupIndex = 3
- RadioItem = True
- OnClick = msbHighClick
- end
- object msbLow: TMenuItem
- Tag = 2
- Caption = '&Low priority'
- GroupIndex = 3
- RadioItem = True
- OnClick = msbHighClick
- end
- object msbDiv: TMenuItem
- Caption = '-'
- GroupIndex = 3
- end
- object msbRRQ: TMenuItem
- Caption = '&Confirm Receipt'
- GroupIndex = 4
- OnClick = msbRRQClick
- end
- object msbRead: TMenuItem
- Caption = '&Reading confirmation'
- GroupIndex = 4
- OnClick = msbReadClick
- end
- end
- object msbXlat: TPopupMenu
- Left = 262
- Top = 223
- object msbNone: TMenuItem
- Caption = '&None'
- GroupIndex = 10
- RadioItem = True
- OnClick = msbNoneClick
- end
- object N25: TMenuItem
- Caption = '-'
- Enabled = False
- GroupIndex = 10
- end
- end
- object SpellPopup: TPopupMenu
- Left = 16
- Top = 196
- object nosuggestions1: TMenuItem
- Caption = '(no suggestions)'
- Enabled = False
- Visible = False
- end
- object N28: TMenuItem
- Caption = '-'
- end
- object mspSuggest: TMenuItem
- Caption = '&Suggest more...'
- OnClick = mspSuggestClick
- end
- object N7: TMenuItem
- Caption = '-'
- end
- object mspIgnoreAll: TMenuItem
- Caption = '&Ignore all'
- OnClick = mspIgnoreAllClick
- end
- object mspAddWord: TMenuItem
- Caption = '&Add to dictionary'
- OnClick = mspAddWordClick
- end
- object Dictionarytoadd1: TMenuItem
- Caption = '&Dictionary to add to'
- end
- object mspOptions: TMenuItem
- Caption = '&Options...'
- OnClick = mbSpellOptsClick
- end
- end
- object pmUsers: TPopupMenu
- Left = 181
- Top = 224
- end
- object AddrTimer: TTimer
- Enabled = False
- Interval = 10
- OnTimer = AddrTimerTimer
- Left = 376
- Top = 224
- end
- object dttText: TDropTextTarget
- Dragtypes = [dtCopy]
- GetDataOnEnter = False
- OnDragOver = dttTextDragOver
- OnDrop = dttTextDrop
- ShowImage = True
- Left = 24
- Top = 328
- end
- object ColorDialog: TColorDialog
- Options = [cdFullOpen, cdAnyColor]
- Left = 432
- Top = 224
- end
- object odImage: TOpenDialog
- Options = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist, ofShareAware, ofEnableSizing]
- Left = 488
- Top = 224
- end
- object pmHeaders: TPopupMenu
- OnPopup = pmHeadersPopup
- Left = 149
- Top = 92
- object N9: TMenuItem
- Caption = '-'
- end
- object mhEditHeaders: TMenuItem
- Caption = 'Edit &Headers'
- OnClick = mEditHeadersClick
- end
- end
- object MenuNavigator: TMenuNavigator
- Left = 507
- Top = 206
- end
- end
-