home *** CD-ROM | disk | FTP | other *** search
Text File | 2001-06-19 | 46.6 KB | 1,936 lines |
- object MsgEditor: TMsgEditor
- Left = 132
- Top = 48
- Width = 616
- Height = 434
- HelpContext = 14003
- Caption = 'Edit Mail Message'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- Menu = EditMenu
- Position = poDefaultPosOnly
- OnActivate = FormActivate
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object DockTop: TDock97
- Left = 0
- Top = 0
- Width = 608
- Height = 32
- object pnTools: TToolbar97
- Left = 0
- Top = 0
- Caption = 'Toolbar'
- DockedTo = DockTop
- DockPos = 0
- 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 letter'
- 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 draft'
- ParentShowHint = False
- ShowHint = True
- OnClick = bStore1Click
- end
- object bStore: TToolbarButton97
- Left = 30
- Top = 0
- Width = 30
- Height = 28
- Hint = 'Put the letter 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 = 379
- Width = 608
- Height = 9
- Position = dpBottom
- end
- object DockLeft: TDock97
- Left = 0
- Top = 32
- Width = 9
- Height = 347
- Position = dpLeft
- end
- object DockRight: TDock97
- Left = 599
- Top = 32
- Width = 9
- Height = 347
- Position = dpRight
- end
- object Panel1: TPanel
- Left = 9
- Top = 32
- Width = 590
- Height = 347
- Align = alClient
- BevelOuter = bvNone
- BevelWidth = 9
- TabOrder = 4
- object Panel3: TPanel
- Left = 0
- Top = 96
- Width = 590
- Height = 251
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- OnClick = mShowToolsClick
- object Split1: TSplitter
- Left = 57
- Top = 0
- Width = 3
- Height = 231
- Cursor = crHSplit
- Beveled = False
- end
- object pnAttach: TPanel
- Left = 0
- Top = 0
- Width = 57
- Height = 231
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 2
- object fList: TListView
- Left = 0
- Top = 0
- Width = 57
- Height = 231
- HelpContext = 10041
- Align = alClient
- OnDblClick = fListDblClick
- Columns = <>
- ReadOnly = True
- IconOptions.AutoArrange = True
- PopupMenu = AttachPopup
- ShowColumnHeaders = False
- TabOrder = 0
- LargeImages = fImages
- SmallImages = fImages
- StateImages = fImages
- end
- end
- object sBar: TStatusBar
- Left = 0
- Top = 231
- Width = 590
- 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>
- SimplePanel = False
- OnMouseDown = sBarMouseDown
- OnDrawPanel = sBarDrawPanel
- end
- object Panel2: TPanel
- Left = 60
- Top = 0
- Width = 530
- Height = 231
- Align = alClient
- BevelOuter = bvLowered
- BevelWidth = 2
- TabOrder = 0
- object Split2: TSplitter
- Left = 2
- Top = 49
- Width = 526
- Height = 4
- Cursor = crVSplit
- Align = alTop
- end
- object pnHeader: TPanel
- Left = 2
- Top = 2
- Width = 526
- Height = 47
- Align = alTop
- BorderWidth = 1
- BorderStyle = bsSingle
- TabOrder = 0
- Visible = False
- object oMsg: TTextEditor
- Left = 2
- Top = 2
- Width = 518
- Height = 39
- OnPosChanged = eMsgPosChanged
- OnBlockChanged = eMsgBlockChanged
- BgColor = clWhite
- TextColor = clBlack
- SelColor = clWhite
- SelBgColor = clBlack
- QuoteColor = clBlue
- RefColor = clBlue
- Kludge1Color = clOlive
- Kludge2Color = clOlive
- Kludge3Color = clOlive
- ReadOnly = True
- OnSelectionChanged = eMsgSelectionChanged
- OnInsChange = eMsgInsChange
- OnApplicationPopup = Popup3Click
- FontCharset = 1
- TabOrder = 0
- Visible = False
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- Align = alClient
- OnMouseMove = eMsgMouseMove
- OnEnter = oMsgEnter
- PopupMenu = EditPopup
- OnDblClick = eMsgDblClick
- end
- end
- object eMsg: TTextEditor
- Left = 2
- Top = 53
- Width = 526
- Height = 176
- HelpContext = 10027
- OnPosChanged = eMsgPosChanged
- OnBlockChanged = eMsgBlockChanged
- BgColor = clWhite
- TextColor = clBlack
- SelColor = clWhite
- SelBgColor = clBlack
- QuoteColor = clBlue
- RefColor = clBlue
- Kludge1Color = clOlive
- Kludge2Color = clOlive
- Kludge3Color = clOlive
- ReadOnly = False
- OnSelectionChanged = eMsgSelectionChanged
- OnModifiedChange = eMsgModifiedChange
- OnInsChange = eMsgInsChange
- SpellPopup = SpellPopup
- OnApplicationPopup = Popup3Click
- FontCharset = 1
- TabOrder = 1
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- Align = alClient
- OnMouseMove = eMsgMouseMove
- OnEnter = eMsgEnter
- OnDblClick = eMsgDblClick
- end
- end
- end
- object gInfo: TAddressGrid
- Left = 0
- Top = 0
- Width = 590
- Height = 96
- HelpContext = 10044
- Align = alTop
- Color = clBtnFace
- ColCount = 2
- DefaultRowHeight = 20
- RowCount = 7
- FixedRows = 0
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goEditing, goTabs, goAlwaysShowEditor, goThumbTracking]
- TabOrder = 1
- OnEnter = gInfoEnter
- OnExit = gInfoExit
- OnMouseDown = gInfoMouseDown
- OnSelectCell = gInfoSelectCell
- SimpleLook = False
- OnAddressClick = gInfoAddressClick
- OnAddAddressClick = bAddAddrClick
- ColWidths = (
- 64
- 506)
- end
- end
- object EditMenu: TMainMenu
- Left = 464
- Top = 72
- object File1: TMenuItem
- Caption = '&Message'
- ShortCut = 0
- 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 = '-'
- ShortCut = 0
- end
- object mPrint: TMenuItem
- Caption = '&Print...'
- ShortCut = 16464
- OnClick = mPrintClick
- end
- object mPrintSetup: TMenuItem
- Caption = 'Print s&etup...'
- ShortCut = 0
- OnClick = mPrintSetupClick
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mCancel: TMenuItem
- Caption = 'Cancel'
- ShortCut = 0
- OnClick = mCancelClick
- end
- end
- object mEEdit: TMenuItem
- Caption = '&Edit'
- ShortCut = 0
- object Undo1: TMenuItem
- Tag = 2
- Caption = '&Undo'
- ShortCut = 0
- OnClick = Undo1Click
- end
- object N11: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mCut: TMenuItem
- Tag = 1
- Caption = 'Cu&t'
- ShortCut = 0
- OnClick = mCutClick
- end
- object mCopy: TMenuItem
- Tag = 1
- Caption = '&Copy'
- ShortCut = 0
- OnClick = mCopyClick
- end
- object mPaste: TMenuItem
- Caption = '&Paste'
- ShortCut = 0
- OnClick = mPasteClick
- end
- object mClear: TMenuItem
- Caption = '&Delete'
- ShortCut = 0
- OnClick = mClearClick
- end
- object N3: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mCopyTo: TMenuItem
- Tag = 1
- Caption = 'Cop&y to...'
- ShortCut = 0
- OnClick = mCopyToClick
- end
- object N21: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mPasteFrom: TMenuItem
- Caption = 'Paste &from...'
- ShortCut = 0
- OnClick = mPasteFromClick
- end
- object mQPaste: TMenuItem
- Caption = 'Paste as &Quotation'
- ShortCut = 32813
- OnClick = mQPasteClick
- end
- object mQPasteFrom: TMenuItem
- Caption = 'P&aste as Quotation from...'
- ShortCut = 0
- OnClick = mQPasteFromClick
- end
- object mPasteFormat: TMenuItem
- Caption = 'Pa&ste formatted'
- ShortCut = 24621
- OnClick = mPasteFormatClick
- end
- end
- object Search1: TMenuItem
- Caption = '&Search'
- ShortCut = 0
- 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 Reversesearch1: TMenuItem
- Caption = 'Re&verse search'
- ShortCut = 32886
- OnClick = Reversesearch1Click
- end
- end
- object Utilities1: TMenuItem
- Caption = '&Utilities'
- ShortCut = 0
- OnClick = Utilities1Click
- object mInsertDate: TMenuItem
- Caption = 'Insert &Date'
- ShortCut = 0
- OnClick = mInsertDateClick
- end
- object mInsertTime: TMenuItem
- Caption = 'Insert &Time'
- ShortCut = 0
- OnClick = mInsertDateClick
- end
- object mmInsCookie: TMenuItem
- Caption = 'Insert &Cookie'
- ShortCut = 0
- OnClick = mmInsCookieClick
- end
- object muQuick: TMenuItem
- Caption = 'Insert &Quick template'
- ShortCut = 0
- object none1: TMenuItem
- Caption = '(none)'
- Enabled = False
- ShortCut = 0
- end
- 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 = '-'
- ShortCut = 0
- end
- object mmFormat: TMenuItem
- Caption = '&Format Block'
- ShortCut = 0
- 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 = '-'
- ShortCut = 0
- end
- object muAttachvCard: TMenuItem
- Caption = 'Attach Personal vCard'
- ShortCut = 0
- OnClick = muAttachvCardClick
- end
- object Addafile1: TMenuItem
- Caption = '&Attach files'
- ShortCut = 0
- object MIMEcoded1: TMenuItem
- Caption = '&MIME-coded...'
- ShortCut = 32801
- OnClick = mAddMIMEClick
- end
- object QuotedPrintable1: TMenuItem
- Tag = 1
- Caption = '&Quoted-Printable...'
- ShortCut = 0
- OnClick = mAddMIMEClick
- end
- object N18: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object UUencoded1: TMenuItem
- Tag = 3
- Caption = '&UU-encoded...'
- ShortCut = 32802
- OnClick = mAddMIMEClick
- end
- end
- end
- object mbSpell: TMenuItem
- Caption = 'Spell C&hecker'
- ShortCut = 0
- 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 N29: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mbLng: TMenuItem
- Caption = '&Language'
- ShortCut = 0
- object mbAEnglish: TMenuItem
- Caption = 'American English'
- Checked = True
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object BritishEnglish1: TMenuItem
- Tag = 1
- Caption = 'British English'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Catalan1: TMenuItem
- Tag = 2
- Caption = 'Catalan'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Czech1: TMenuItem
- Tag = 3
- Caption = 'Czech'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Danish1: TMenuItem
- Tag = 4
- Caption = 'Danish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Dutch1: TMenuItem
- Tag = 5
- Caption = 'Dutch'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Finnish1: TMenuItem
- Tag = 6
- Caption = 'Finnish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object French1: TMenuItem
- Tag = 7
- Caption = 'French'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object German2: TMenuItem
- Tag = 8
- Caption = 'German'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Hungarian1: TMenuItem
- Tag = 9
- Caption = 'Hungarian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Italian1: TMenuItem
- Tag = 10
- Caption = 'Italian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Norwegian1: TMenuItem
- Tag = 11
- Caption = 'Norwegian (Bokmal)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object NorwegianNynorsk1: TMenuItem
- Tag = 12
- Caption = 'Norwegian (Nynorsk)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Polish1: TMenuItem
- Tag = 13
- Caption = 'Polish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object PortugeseBrasilian1: TMenuItem
- Tag = 14
- Caption = 'Portuguese (Brazilian)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object PortugeseIberian1: TMenuItem
- Tag = 15
- Caption = 'Portuguese (Iberian)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Russian1: TMenuItem
- Tag = 16
- Caption = 'Russian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Spanish1: TMenuItem
- Tag = 17
- Caption = 'Spanish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Swedish1: TMenuItem
- Tag = 18
- Caption = 'Swedish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object N8: TMenuItem
- Tag = -1
- Caption = '-'
- GroupIndex = 10
- ShortCut = 0
- end
- object AmericanEnglish1: TMenuItem
- Tag = 19
- Caption = 'American English'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object AustralianEnglish1: TMenuItem
- Tag = 20
- Caption = 'Australian English'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object BritishEnglish2: TMenuItem
- Tag = 21
- Caption = 'British English'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Catalan2: TMenuItem
- Tag = 22
- Caption = 'Catalan'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Czech2: TMenuItem
- Tag = 23
- Caption = 'Czech'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Danish2: TMenuItem
- Tag = 24
- Caption = 'Danish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Dutch2: TMenuItem
- Tag = 25
- Caption = 'Dutch'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Finnish2: TMenuItem
- Tag = 26
- Caption = 'Finnish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object French2: TMenuItem
- Tag = 27
- Caption = 'French'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object French3: TMenuItem
- Tag = 28
- Caption = 'French Canadian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object German1: TMenuItem
- Tag = 29
- Caption = 'German'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Hungarian2: TMenuItem
- Tag = 30
- Caption = 'Hungarian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Italian2: TMenuItem
- Tag = 31
- Caption = 'Italian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object NorwegianBokmal1: TMenuItem
- Tag = 32
- Caption = 'Norwegian (Bokmal)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object NorwegianNynorsk2: TMenuItem
- Tag = 33
- Caption = 'Norwegian (Nynorsk)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Polish2: TMenuItem
- Tag = 34
- Caption = 'Polish'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object PortugeseBrasilian2: TMenuItem
- Tag = 35
- Caption = 'Portuguese (Brazilian)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object PortugeseIberian2: TMenuItem
- Tag = 36
- Caption = 'Portuguese (Iberian)'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Russian2: TMenuItem
- Tag = 37
- Caption = 'Russian'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Spanish2: TMenuItem
- Tag = 38
- Caption = 'Spanish'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Swedish2: TMenuItem
- Tag = 39
- Caption = 'Swedish'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Afrikaans: TMenuItem
- Tag = 40
- Caption = 'Afrikaans'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Albanian: TMenuItem
- Tag = 41
- Caption = 'Albanian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Arabic: TMenuItem
- Tag = 42
- Caption = 'Arabic'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Basque: TMenuItem
- Tag = 43
- Caption = 'Basque'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Belarusian: TMenuItem
- Tag = 44
- Caption = 'Belarusian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Bulgarian: TMenuItem
- Tag = 45
- Caption = 'Bulgarian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Chinese: TMenuItem
- Tag = 46
- Caption = 'Chinese'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Croatian: TMenuItem
- Tag = 47
- Caption = 'Croatian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Estonian: TMenuItem
- Tag = 48
- Caption = 'Estonian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Faeroese: TMenuItem
- Tag = 49
- Caption = 'Faeroese'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Farsi: TMenuItem
- Tag = 50
- Caption = 'Farsi'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Greek: TMenuItem
- Tag = 51
- Caption = 'Greek'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Hebrew: TMenuItem
- Tag = 52
- Caption = 'Hebrew'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Icelandic: TMenuItem
- Tag = 53
- Caption = 'Icelandic'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Indonesian: TMenuItem
- Tag = 54
- Caption = 'Indonesian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Japanese: TMenuItem
- Tag = 55
- Caption = 'Japanese'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Korean: TMenuItem
- Tag = 56
- Caption = 'Korean'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Latvian: TMenuItem
- Tag = 57
- Caption = 'Latvian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Lithuanian: TMenuItem
- Tag = 58
- Caption = 'Lithuanian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Romanian: TMenuItem
- Tag = 59
- Caption = 'Romanian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Serbian: TMenuItem
- Tag = 60
- Caption = 'Serbian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Slovak: TMenuItem
- Tag = 61
- Caption = 'Slovak'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Slovenian: TMenuItem
- Tag = 62
- Caption = 'Slovenian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Thai: TMenuItem
- Tag = 63
- Caption = 'Thai'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Turkish: TMenuItem
- Tag = 64
- Caption = 'Turkish'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Ukrainian: TMenuItem
- Tag = 65
- Caption = 'Ukrainian'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- object Vietnamese: TMenuItem
- Tag = 66
- Caption = 'Vietnamese'
- GroupIndex = 10
- ShortCut = 0
- OnClick = mbAEnglishClick
- end
- end
- object mbSpellOpts: TMenuItem
- Caption = '&Options...'
- ShortCut = 0
- OnClick = mbSpellOptsClick
- end
- object mbSpellDict: TMenuItem
- Caption = '&Dictionaries...'
- ShortCut = 0
- OnClick = mbSpellDictClick
- end
- end
- object PGP1: TMenuItem
- Caption = '&Privacy'
- ShortCut = 0
- object mpOCrypt: TMenuItem
- Caption = '&Encrypt when Completed'
- ShortCut = 0
- OnClick = mpOSignClick
- end
- object mpOSign: TMenuItem
- Caption = '&Sign when Completed'
- ShortCut = 0
- OnClick = mpOSignClick
- end
- object N20: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mpApplyPGP: TMenuItem
- Caption = 'Enable OpenPGP'
- ShortCut = 0
- OnClick = mpOSignClick
- end
- object mpApplySMIME: TMenuItem
- Caption = 'Enable S/MIME'
- ShortCut = 0
- OnClick = mpOSignClick
- end
- object mpConfigure: TMenuItem
- Tag = 1111
- Caption = 'Set Defaults...'
- ShortCut = 0
- OnClick = mpConfigureClick
- end
- object N14: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mpPGP: TMenuItem
- Caption = 'OpenPGP'
- ShortCut = 0
- 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 = '-'
- ShortCut = 0
- end
- object mmPGPkeys: TMenuItem
- Caption = 'Key &Manager...'
- ShortCut = 0
- OnClick = mmPGPkeysClick
- end
- object mmPGPprefs: TMenuItem
- Caption = '&Preferences...'
- ShortCut = 0
- OnClick = mmPGPprefsClick
- end
- end
- end
- object View1: TMenuItem
- Caption = '&View'
- ShortCut = 0
- object mShowTools: TMenuItem
- Caption = '&Toolbar'
- Checked = True
- ShortCut = 0
- OnClick = mShowToolsClick
- end
- object mStorePos: TMenuItem
- Caption = '&Store window position'
- ShortCut = 0
- OnClick = mStorePosClick
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mShowFrom: TMenuItem
- Tag = 1
- Caption = '&From'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowReplyTo: TMenuItem
- Tag = 2
- Caption = '&Reply-to'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowCC: TMenuItem
- Tag = 3
- Caption = '&Carbon Copy'
- Checked = True
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowBCC: TMenuItem
- Tag = 5
- Caption = '&Blind CC'
- Checked = True
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowFollowup: TMenuItem
- Tag = 7
- Caption = '&Follow-up to'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowOrg: TMenuItem
- Tag = 8
- Caption = 'Org&anisation'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowReturn: TMenuItem
- Tag = 11
- Caption = 'Ret&urn-path'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object mShowComment: TMenuItem
- Tag = 9
- Caption = 'Co&mments'
- ShortCut = 0
- OnClick = mShowFromClick
- end
- object N16: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mShowOrigin: TMenuItem
- Caption = '&Original text'
- Enabled = False
- ShortCut = 0
- OnClick = mShowOriginClick
- end
- end
- object Options1: TMenuItem
- Caption = '&Options'
- ShortCut = 0
- object mRcptConfirm: TMenuItem
- Caption = '&Confirm Receipt'
- ShortCut = 0
- OnClick = mRcptConfirmClick
- end
- object mReadConfirm: TMenuItem
- Caption = '&Reading confirmation'
- ShortCut = 0
- OnClick = mReadConfirmClick
- end
- object N5: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mNormal: TMenuItem
- Caption = '&Normal Priority'
- Checked = True
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = mNormalClick
- end
- object mHigh: TMenuItem
- Caption = '&High Priority'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = mNormalClick
- end
- object mLow: TMenuItem
- Caption = '&Low priority'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = mNormalClick
- end
- object N13: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object mmXlat: TMenuItem
- Caption = '&Message encoding'
- GroupIndex = 2
- ShortCut = 0
- object mtNone: TMenuItem
- Caption = '&None'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = mtNoneClick
- end
- object N19: TMenuItem
- Caption = '-'
- Enabled = False
- GroupIndex = 10
- ShortCut = 0
- end
- end
- object N12: TMenuItem
- Caption = '-'
- GroupIndex = 2
- ShortCut = 0
- end
- object meAccount: TMenuItem
- Caption = '&Active account'
- GroupIndex = 2
- ShortCut = 0
- 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'
- ShortCut = 0
- 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 = '-'
- ShortCut = 0
- end
- object mAddUUE: TMenuItem
- Tag = 2
- Caption = '&UU-encoded'
- ShortCut = 16429
- OnClick = mAddMIMEClick
- end
- end
- object N6: TMenuItem
- Caption = '-'
- ShortCut = 0
- 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...'
- ShortCut = 0
- OnClick = maSaveClick
- end
- object MenuItem1: TMenuItem
- Caption = '-'
- ShortCut = 0
- 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 ViewPopup: TPopupMenu
- OnPopup = ViewPopupPopup
- Left = 16
- Top = 336
- object meNewMail: TMenuItem
- Tag = 11
- Caption = '&Write a message...'
- ShortCut = 0
- end
- object meReplyLink: TMenuItem
- Caption = 'R&eply to this address...'
- ShortCut = 8308
- end
- object meAddAddress: TMenuItem
- Caption = '&Add e-mail to address book'
- ShortCut = 0
- OnClick = meAddAddressClick
- end
- object meOpenLink: TMenuItem
- Caption = '&Open this link'
- ShortCut = 0
- OnClick = meOpenLinkClick
- end
- object meCopyLink: TMenuItem
- Caption = '&Location to Clipboard'
- ShortCut = 0
- OnClick = meCopyLinkClick
- end
- object meDivider: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mlCopy: TMenuItem
- Caption = '&Copy'
- ShortCut = 16429
- OnClick = mlCopyClick
- end
- object mlCopyTo: TMenuItem
- Caption = 'Copy &To...'
- ShortCut = 32813
- OnClick = mCopyToClick
- end
- object N9: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object meSaveAs: TMenuItem
- Caption = '&Save as...'
- ShortCut = 16467
- OnClick = bSaveAsClick
- end
- object MenuItem4: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object meProperties: TMenuItem
- Caption = '&Preferences...'
- ShortCut = 0
- OnClick = Editorpreferences1Click
- end
- object Popup2: TMenuItem
- Tag = 1
- Caption = 'Popup'
- ShortCut = 32889
- Visible = False
- OnClick = PopUp1Click
- end
- end
- object tmSave: TTimer
- Enabled = False
- OnTimer = tmSaveTimer
- Left = 366
- Top = 144
- end
- object EditPopup: TPopupMenu
- AutoPopup = False
- OnPopup = EditPopupPopup
- Left = 16
- Top = 152
- object meQuote: TMenuItem
- Caption = '&Quote'
- ShortCut = 0
- Visible = False
- OnClick = meQuoteClick
- end
- object meQuoteWO: TMenuItem
- Tag = 1
- Caption = 'Quote &Without Prefixes'
- ShortCut = 0
- 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'
- ShortCut = 0
- OnClick = mClearClick
- end
- object mInsCookie: TMenuItem
- Caption = 'I&nsert Cookie'
- ShortCut = 0
- OnClick = mmInsCookieClick
- end
- object meQuick: TMenuItem
- Caption = 'Insert Quick &Template'
- ShortCut = 16416
- OnClick = meQuickClick
- end
- object N24: TMenuItem
- Caption = '-'
- ShortCut = 0
- 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 = '-'
- ShortCut = 0
- end
- object Blocktype1: TMenuItem
- Caption = '&Block type'
- ShortCut = 0
- object meStream: TMenuItem
- Caption = '&Stream'
- Checked = True
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- object meColumn: TMenuItem
- Tag = 1
- Caption = '&Column'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- object meLinear: TMenuItem
- Tag = 2
- Caption = '&Linear'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- end
- object mePrefs: TMenuItem
- Caption = 'Pr&eferences...'
- ShortCut = 0
- OnClick = Editorpreferences1Click
- end
- object SelectAll1: TMenuItem
- Caption = 'Select All'
- ShortCut = 0
- 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 = Undo1Click
- end
- end
- object sbPop: TPopupMenu
- AutoPopup = False
- OnPopup = sbPopPopup
- Left = 264
- Top = 263
- object msbStream: TMenuItem
- Caption = '&Stream'
- GroupIndex = 1
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- object msbColumn: TMenuItem
- Tag = 1
- Caption = '&Column'
- GroupIndex = 1
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- object msbLinear: TMenuItem
- Tag = 2
- Caption = '&Linear'
- GroupIndex = 1
- RadioItem = True
- ShortCut = 0
- OnClick = meStreamClick
- end
- object msbInsert: TMenuItem
- Caption = '&Insert mode'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = msbInsertClick
- end
- object msbOverride: TMenuItem
- Tag = 1
- Caption = '&Overwrite mode'
- GroupIndex = 2
- RadioItem = True
- ShortCut = 0
- OnClick = msbInsertClick
- end
- object msbHigh: TMenuItem
- Caption = '&High priority'
- GroupIndex = 3
- RadioItem = True
- ShortCut = 0
- OnClick = msbHighClick
- end
- object msbNormal: TMenuItem
- Tag = 1
- Caption = '&Normal priority'
- GroupIndex = 3
- RadioItem = True
- ShortCut = 0
- OnClick = msbHighClick
- end
- object msbLow: TMenuItem
- Tag = 2
- Caption = '&Low priority'
- GroupIndex = 3
- RadioItem = True
- ShortCut = 0
- OnClick = msbHighClick
- end
- object msbDiv: TMenuItem
- Caption = '-'
- GroupIndex = 3
- ShortCut = 0
- end
- object msbRRQ: TMenuItem
- Caption = '&Confirm Receipt'
- GroupIndex = 4
- ShortCut = 0
- OnClick = msbRRQClick
- end
- object msbRead: TMenuItem
- Caption = '&Reading confirmation'
- GroupIndex = 4
- ShortCut = 0
- OnClick = msbReadClick
- end
- end
- object msbXlat: TPopupMenu
- Left = 366
- Top = 247
- object msbNone: TMenuItem
- Caption = '&None'
- GroupIndex = 10
- RadioItem = True
- ShortCut = 0
- OnClick = msbNoneClick
- end
- object N25: TMenuItem
- Caption = '-'
- Enabled = False
- GroupIndex = 10
- ShortCut = 0
- end
- end
- object SpellPopup: TPopupMenu
- Left = 16
- Top = 196
- object nosuggestions1: TMenuItem
- Caption = '(no suggestions)'
- Enabled = False
- ShortCut = 0
- Visible = False
- end
- object N28: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mspSuggest: TMenuItem
- Caption = '&Suggest more...'
- ShortCut = 0
- OnClick = mspSuggestClick
- end
- object N7: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mspIgnoreAll: TMenuItem
- Caption = '&Ignore all'
- ShortCut = 0
- OnClick = mspIgnoreAllClick
- end
- object mspAddWord: TMenuItem
- Caption = '&Add to dictionary'
- ShortCut = 0
- OnClick = mspAddWordClick
- end
- object Dictionarytoadd1: TMenuItem
- Caption = '&Dictionary to add to'
- ShortCut = 0
- end
- object mspOptions: TMenuItem
- Caption = '&Options...'
- ShortCut = 0
- OnClick = mbSpellOptsClick
- end
- end
- object pmUsers: TPopupMenu
- Left = 181
- Top = 224
- end
- end
-