home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 March / Chip_2002-03_cd1.bin / tema / thebat / download / update / thebat.exe / 0 / RCDATA / TMESSAGEFINDER / TMESSAGEFINDER.txt
Text File  |  2001-09-09  |  56KB  |  2,188 lines

  1. object MessageFinder: TMessageFinder
  2.   Left = 97
  3.   Top = 40
  4.   HelpContext = 11021
  5.   AutoScroll = False
  6.   Caption = 'Message Finder'
  7.   ClientHeight = 480
  8.   ClientWidth = 653
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   KeyPreview = True
  14.   Menu = ViewMenu
  15.   Position = poScreenCenter
  16.   OnActivate = FormActivate
  17.   OnClose = FormClose
  18.   OnCloseQuery = FormCloseQuery
  19.   OnCreate = FormCreate
  20.   OnKeyDown = FormKeyDown
  21.   OnShow = FormShow
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object MsgCtl: TMessageController
  25.     Left = 360
  26.     Top = 272
  27.     Width = 40
  28.     Height = 33
  29.     MsgView = MLV
  30.     InfoOptions = [mhoFrom, mhoReply, mhoTO, mhoCC, mhoBCC, mhoSubj]
  31.     InfoGrid = gAddr
  32.     ImagePanel = ImagePanel
  33.     NoteBook = BodyNotebook
  34.     AttachList = fList
  35.     AttachImages = AttachImages
  36.     HeaderPanel = pnHeader
  37.     LbSize = hdrSize
  38.     eMsg = eMsg
  39.     Tabs = ViewTabs
  40.     ViewPanel = MsgPanel
  41.     MsgPanel = pBookA
  42.     AttachVertical = True
  43.     AttachSplit = AttSplit
  44.     AttachPanel = AttPanel
  45.   end
  46.   object Split1: TSplitter
  47.     Left = 0
  48.     Top = 233
  49.     Width = 653
  50.     Height = 4
  51.     Cursor = crVSplit
  52.     Align = alTop
  53.   end
  54.   object bStatus: TStatusBar
  55.     Left = 0
  56.     Top = 461
  57.     Width = 653
  58.     Height = 19
  59.     Panels = <
  60.       item
  61.         Style = psOwnerDraw
  62.         Text = 'Progress'
  63.         Width = 100
  64.       end
  65.       item
  66.         Width = 50
  67.       end>
  68.     SimplePanel = False
  69.     OnDrawPanel = bStatusDrawPanel
  70.   end
  71.   object pBookA: TPanel
  72.     Left = 0
  73.     Top = 0
  74.     Width = 653
  75.     Height = 233
  76.     Align = alTop
  77.     BevelOuter = bvNone
  78.     TabOrder = 1
  79.     object pnBook: TPanel
  80.       Left = 0
  81.       Top = 0
  82.       Width = 653
  83.       Height = 233
  84.       Align = alClient
  85.       BevelOuter = bvNone
  86.       TabOrder = 0
  87.       object Book: TPageControl
  88.         Left = 0
  89.         Top = 0
  90.         Width = 570
  91.         Height = 233
  92.         HelpContext = 11021
  93.         ActivePage = tsSearch
  94.         Align = alClient
  95.         TabOrder = 0
  96.         TabStop = False
  97.         object tsSearch: TTabSheet
  98.           Caption = 'Options'
  99.           object sBox: TScrollBox
  100.             Left = 0
  101.             Top = 0
  102.             Width = 562
  103.             Height = 205
  104.             HorzScrollBar.Tracking = True
  105.             VertScrollBar.Tracking = True
  106.             Align = alClient
  107.             BorderStyle = bsNone
  108.             TabOrder = 0
  109.             object Label1: TLabel
  110.               Left = 8
  111.               Top = 12
  112.               Width = 52
  113.               Height = 13
  114.               Caption = '&Search for:'
  115.             end
  116.             object gbScope: TGroupBox
  117.               Left = 4
  118.               Top = 32
  119.               Width = 161
  120.               Height = 161
  121.               Caption = 'Scope'
  122.               TabOrder = 1
  123.               object cbAnywhere: TCheckBox
  124.                 Left = 8
  125.                 Top = 16
  126.                 Width = 145
  127.                 Height = 17
  128.                 Caption = 'Any&where'
  129.                 State = cbChecked
  130.                 TabOrder = 0
  131.               end
  132.               object cbSender: TCheckBox
  133.                 Left = 8
  134.                 Top = 36
  135.                 Width = 145
  136.                 Height = 17
  137.                 Caption = 'Se&nder'
  138.                 TabOrder = 1
  139.               end
  140.               object cbRecipient: TCheckBox
  141.                 Left = 8
  142.                 Top = 56
  143.                 Width = 145
  144.                 Height = 17
  145.                 Caption = '&Recipient'
  146.                 TabOrder = 2
  147.               end
  148.               object cbSubj: TCheckBox
  149.                 Left = 8
  150.                 Top = 76
  151.                 Width = 145
  152.                 Height = 17
  153.                 Caption = 'Sub&ject'
  154.                 TabOrder = 3
  155.               end
  156.               object cbHeaders: TCheckBox
  157.                 Left = 8
  158.                 Top = 96
  159.                 Width = 145
  160.                 Height = 17
  161.                 Caption = 'Hea&ders'
  162.                 TabOrder = 4
  163.               end
  164.               object cbBody: TCheckBox
  165.                 Left = 8
  166.                 Top = 140
  167.                 Width = 145
  168.                 Height = 17
  169.                 Caption = '&Body'
  170.                 TabOrder = 6
  171.               end
  172.               object cbMemo: TCheckBox
  173.                 Left = 8
  174.                 Top = 118
  175.                 Width = 97
  176.                 Height = 17
  177.                 Caption = '&Memo'
  178.                 TabOrder = 5
  179.               end
  180.             end
  181.             object gbLookIn: TGroupBox
  182.               Left = 174
  183.               Top = 32
  184.               Width = 273
  185.               Height = 161
  186.               Caption = 'Look in'
  187.               TabOrder = 2
  188.               object bBrowse: TToolbarButton97
  189.                 Left = 239
  190.                 Top = 36
  191.                 Width = 28
  192.                 Height = 28
  193.                 Hint = 'Browse'
  194.                 Flat = False
  195.                 ParentShowHint = False
  196.                 ShowHint = True
  197.                 OnClick = bBrowseClick
  198.               end
  199.               object cbFolder: TRadioButton
  200.                 Left = 8
  201.                 Top = 20
  202.                 Width = 217
  203.                 Height = 17
  204.                 Caption = 'F&older:'
  205.                 Checked = True
  206.                 TabOrder = 0
  207.                 TabStop = True
  208.                 OnClick = cbFolderClick
  209.               end
  210.               object eFolder: TEdit
  211.                 Left = 32
  212.                 Top = 40
  213.                 Width = 201
  214.                 Height = 21
  215.                 TabOrder = 1
  216.               end
  217.               object cbSubfolders: TCheckBox
  218.                 Left = 32
  219.                 Top = 64
  220.                 Width = 193
  221.                 Height = 17
  222.                 Caption = '&Include subfolders'
  223.                 TabOrder = 2
  224.               end
  225.               object cbCurUser: TRadioButton
  226.                 Left = 8
  227.                 Top = 88
  228.                 Width = 241
  229.                 Height = 17
  230.                 Caption = '&Current account'
  231.                 TabOrder = 4
  232.                 TabStop = True
  233.                 OnClick = cbFolderClick
  234.               end
  235.               object cbAllUsers: TRadioButton
  236.                 Left = 8
  237.                 Top = 112
  238.                 Width = 241
  239.                 Height = 17
  240.                 Caption = '&All accounts'
  241.                 TabOrder = 3
  242.                 TabStop = True
  243.                 OnClick = cbFolderClick
  244.               end
  245.             end
  246.             object eText: TComboBox
  247.               Left = 96
  248.               Top = 8
  249.               Width = 351
  250.               Height = 21
  251.               ItemHeight = 13
  252.               TabOrder = 0
  253.               OnKeyDown = eTextKeyDown
  254.             end
  255.           end
  256.         end
  257.         object tsResult: TTabSheet
  258.           Caption = 'Results'
  259.           object hMessages: THeaderControl
  260.             Left = 0
  261.             Top = 0
  262.             Width = 562
  263.             Height = 20
  264.             Hint = 'nograb'
  265.             Sections = <>
  266.             OnMouseDown = hMessagesMouseDown
  267.           end
  268.           object MLV: TMessageListView
  269.             Left = 0
  270.             Top = 20
  271.             Width = 562
  272.             Height = 185
  273.             HelpContext = 11013
  274.             Align = alClient
  275.             ColCount = 10
  276.             DefaultRowHeight = 16
  277.             DefaultDrawing = False
  278.             FixedCols = 0
  279.             RowCount = 1
  280.             FixedRows = 0
  281.             Options = [goThumbTracking]
  282.             PopupMenu = MessagePopup
  283.             TabOrder = 1
  284.             OnDblClick = MLVDblClick
  285.             OnKeyDown = MLVKeyDown
  286.             Sorting = 0
  287.             Threading = mlvtNone
  288.             Header = hMessages
  289.             OnColumnsChange = MLVColumnsChange
  290.             OnListChange = MLVListChange
  291.           end
  292.         end
  293.         object tsOptions: TTabSheet
  294.           Caption = 'Advanced'
  295.           object advBox: TScrollBox
  296.             Left = 0
  297.             Top = 0
  298.             Width = 562
  299.             Height = 205
  300.             VertScrollBar.Tracking = True
  301.             Align = alClient
  302.             BorderStyle = bsNone
  303.             TabOrder = 0
  304.             object lKbytes1: TLabel
  305.               Left = 312
  306.               Top = 128
  307.               Width = 35
  308.               Height = 13
  309.               Caption = 'K bytes'
  310.               Enabled = False
  311.             end
  312.             object lKbytes2: TLabel
  313.               Left = 312
  314.               Top = 152
  315.               Width = 35
  316.               Height = 13
  317.               Caption = 'K bytes'
  318.               Enabled = False
  319.             end
  320.             object lBeforeDMY: TLabel
  321.               Left = 288
  322.               Top = 80
  323.               Width = 64
  324.               Height = 13
  325.               Caption = '(dd/mm/yyyy)'
  326.               Enabled = False
  327.             end
  328.             object lAfterDMY: TLabel
  329.               Left = 288
  330.               Top = 102
  331.               Width = 64
  332.               Height = 13
  333.               Caption = '(dd/mm/yyyy)'
  334.               Enabled = False
  335.             end
  336.             object cbCase: TCheckBox
  337.               Left = 224
  338.               Top = 24
  339.               Width = 289
  340.               Height = 17
  341.               Caption = '&Case sensitive search'
  342.               TabOrder = 13
  343.             end
  344.             object cbAttach: TCheckBox
  345.               Left = 8
  346.               Top = 58
  347.               Width = 209
  348.               Height = 17
  349.               Caption = 'Message &has attachments'
  350.               TabOrder = 3
  351.             end
  352.             object cbReplied: TCheckBox
  353.               Left = 8
  354.               Top = 8
  355.               Width = 209
  356.               Height = 17
  357.               Caption = 'Message is ¬ replied'
  358.               TabOrder = 0
  359.             end
  360.             object cbBefore: TCheckBox
  361.               Left = 8
  362.               Top = 84
  363.               Width = 209
  364.               Height = 17
  365.               Caption = 'Received &BEFORE'
  366.               TabOrder = 4
  367.               OnClick = cbBeforeClick
  368.             end
  369.             object cbAfter: TCheckBox
  370.               Left = 8
  371.               Top = 100
  372.               Width = 209
  373.               Height = 17
  374.               Caption = 'Received &AFTER'
  375.               TabOrder = 6
  376.               OnClick = cbAfterClick
  377.             end
  378.             object cbLarger: TCheckBox
  379.               Left = 8
  380.               Top = 132
  381.               Width = 209
  382.               Height = 17
  383.               Caption = 'Size is &LARGER than'
  384.               TabOrder = 8
  385.               OnClick = cbLargerClick
  386.             end
  387.             object cbSmaller: TCheckBox
  388.               Left = 8
  389.               Top = 148
  390.               Width = 209
  391.               Height = 17
  392.               Caption = 'Size is &SMALLER than'
  393.               TabOrder = 10
  394.               OnClick = cbSmallerClick
  395.             end
  396.             object eSmaller: TSpinEdit
  397.               Left = 224
  398.               Top = 149
  399.               Width = 83
  400.               Height = 22
  401.               Enabled = False
  402.               MaxValue = 10000000
  403.               MinValue = 0
  404.               TabOrder = 11
  405.               Value = 0
  406.             end
  407.             object eLarger: TSpinEdit
  408.               Left = 224
  409.               Top = 125
  410.               Width = 83
  411.               Height = 22
  412.               Enabled = False
  413.               MaxValue = 10000000
  414.               MinValue = 0
  415.               TabOrder = 9
  416.               Value = 0
  417.             end
  418.             object cbParked: TCheckBox
  419.               Left = 8
  420.               Top = 41
  421.               Width = 209
  422.               Height = 17
  423.               Caption = 'Message is &parked'
  424.               TabOrder = 2
  425.             end
  426.             object cbUnread: TCheckBox
  427.               Left = 8
  428.               Top = 24
  429.               Width = 209
  430.               Height = 17
  431.               Caption = 'Message is &unread'
  432.               TabOrder = 1
  433.             end
  434.             object cbWords: TCheckBox
  435.               Left = 224
  436.               Top = 40
  437.               Width = 289
  438.               Height = 17
  439.               Caption = 'Search for &whole words only'
  440.               TabOrder = 14
  441.             end
  442.             object meBefore: TMaskEdit
  443.               Left = 224
  444.               Top = 76
  445.               Width = 61
  446.               Height = 21
  447.               Enabled = False
  448.               EditMask = '00/00/0000'
  449.               MaxLength = 10
  450.               TabOrder = 5
  451.               Text = '  .  .    '
  452.             end
  453.             object meAfter: TMaskEdit
  454.               Left = 224
  455.               Top = 100
  456.               Width = 61
  457.               Height = 21
  458.               Enabled = False
  459.               EditMask = '00/00/0000'
  460.               MaxLength = 10
  461.               TabOrder = 7
  462.               Text = '  .  .    '
  463.             end
  464.             object cbRegExp: TCheckBox
  465.               Left = 224
  466.               Top = 57
  467.               Width = 289
  468.               Height = 17
  469.               Caption = '&Regular expressions'
  470.               TabOrder = 15
  471.             end
  472.             object cbFlagged: TCheckBox
  473.               Left = 224
  474.               Top = 8
  475.               Width = 289
  476.               Height = 17
  477.               Caption = 'Message is &flagged'
  478.               TabOrder = 12
  479.             end
  480.             object cbIsColor: TCheckBox
  481.               Left = 8
  482.               Top = 184
  483.               Width = 217
  484.               Height = 17
  485.               Caption = 'Message colour is'
  486.               TabOrder = 16
  487.               OnClick = cbIsColorClick
  488.             end
  489.             object cbColor: TComboBox
  490.               Left = 224
  491.               Top = 182
  492.               Width = 161
  493.               Height = 21
  494.               Style = csDropDownList
  495.               Enabled = False
  496.               ItemHeight = 0
  497.               TabOrder = 17
  498.             end
  499.           end
  500.         end
  501.       end
  502.       object ButtonsPanel: TPanel
  503.         Left = 570
  504.         Top = 0
  505.         Width = 83
  506.         Height = 233
  507.         Align = alRight
  508.         BevelOuter = bvNone
  509.         TabOrder = 1
  510.         object bStart: TButton
  511.           Left = 4
  512.           Top = 20
  513.           Width = 75
  514.           Height = 25
  515.           Caption = 'Start'
  516.           Default = True
  517.           TabOrder = 0
  518.           OnClick = bStartClick
  519.         end
  520.         object bStop: TButton
  521.           Left = 4
  522.           Top = 52
  523.           Width = 75
  524.           Height = 25
  525.           Cancel = True
  526.           Caption = 'S&top'
  527.           Enabled = False
  528.           TabOrder = 1
  529.           OnClick = bStopClick
  530.         end
  531.         object bClose: TButton
  532.           Left = 4
  533.           Top = 116
  534.           Width = 75
  535.           Height = 25
  536.           Cancel = True
  537.           Caption = 'Close'
  538.           TabOrder = 2
  539.           OnClick = bCloseClick
  540.         end
  541.         object bHelp: TButton
  542.           Left = 4
  543.           Top = 84
  544.           Width = 75
  545.           Height = 25
  546.           Caption = '&Help'
  547.           TabOrder = 3
  548.           OnClick = bHelpClick
  549.         end
  550.         object bFollow: TButton
  551.           Left = 4
  552.           Top = 148
  553.           Width = 75
  554.           Height = 25
  555.           Cancel = True
  556.           Caption = '&Follow'
  557.           Enabled = False
  558.           TabOrder = 4
  559.           OnClick = bFollowClick
  560.         end
  561.       end
  562.     end
  563.   end
  564.   object MsgPanel: TPanel
  565.     Left = 0
  566.     Top = 237
  567.     Width = 653
  568.     Height = 224
  569.     Align = alClient
  570.     BevelOuter = bvNone
  571.     TabOrder = 2
  572.     object AttSplit: TSplitter
  573.       Left = 78
  574.       Top = 0
  575.       Width = 4
  576.       Height = 224
  577.       Cursor = crHSplit
  578.       Beveled = False
  579.     end
  580.     object AttPanel: TPanel
  581.       Left = 0
  582.       Top = 0
  583.       Width = 78
  584.       Height = 224
  585.       Align = alLeft
  586.       BevelOuter = bvNone
  587.       TabOrder = 1
  588.       object fList: TListView
  589.         Left = 0
  590.         Top = 0
  591.         Width = 78
  592.         Height = 224
  593.         HelpContext = 10041
  594.         Align = alClient
  595.         OnDblClick = fListDblClick
  596.         Columns = <>
  597.         ReadOnly = True
  598.         PopupMenu = AttachPopup
  599.         TabOrder = 0
  600.         LargeImages = AttachImages
  601.       end
  602.     end
  603.     object BodyPanel: TPanel
  604.       Left = 82
  605.       Top = 0
  606.       Width = 571
  607.       Height = 224
  608.       Align = alClient
  609.       BevelOuter = bvNone
  610.       TabOrder = 0
  611.       object pnMsg: TPanel
  612.         Left = 0
  613.         Top = 0
  614.         Width = 571
  615.         Height = 224
  616.         Align = alClient
  617.         BevelOuter = bvNone
  618.         TabOrder = 0
  619.         object ViewTabs: TTabSet
  620.           Left = 0
  621.           Top = 203
  622.           Width = 571
  623.           Height = 21
  624.           HelpContext = 11015
  625.           Align = alBottom
  626.           Font.Color = clWindowText
  627.           Font.Height = -12
  628.           Font.Name = 'MS Sans Serif'
  629.           Font.Style = []
  630.           Visible = False
  631.           OnChange = ViewTabsChange
  632.         end
  633.         object BodyNotebook: TNotebook
  634.           Left = 0
  635.           Top = 0
  636.           Width = 571
  637.           Height = 203
  638.           Align = alClient
  639.           TabOrder = 1
  640.           object TPage
  641.             Left = 0
  642.             Top = 0
  643.             Caption = 'Default'
  644.             object pnHeader: TPanel
  645.               Left = 0
  646.               Top = 0
  647.               Width = 571
  648.               Height = 48
  649.               HelpContext = 10044
  650.               Align = alTop
  651.               BorderWidth = 1
  652.               BorderStyle = bsSingle
  653.               TabOrder = 1
  654.               Visible = False
  655.               OnResize = pnHeaderResize
  656.               object hdrSize: TMemo
  657.                 Left = 505
  658.                 Top = 2
  659.                 Width = 60
  660.                 Height = 40
  661.                 TabStop = False
  662.                 Align = alRight
  663.                 Alignment = taRightJustify
  664.                 BorderStyle = bsNone
  665.                 Font.Color = clBlack
  666.                 Font.Height = -11
  667.                 Font.Name = 'MS Sans Serif'
  668.                 Font.Style = [fsBold]
  669.                 ParentColor = True
  670.                 ParentFont = False
  671.                 ReadOnly = True
  672.                 TabOrder = 0
  673.                 WordWrap = False
  674.               end
  675.               object gAddr: TAddressGrid
  676.                 Left = 2
  677.                 Top = 2
  678.                 Width = 503
  679.                 Height = 40
  680.                 TabStop = False
  681.                 Align = alClient
  682.                 BorderStyle = bsNone
  683.                 Color = clBtnFace
  684.                 ColCount = 2
  685.                 DefaultRowHeight = 13
  686.                 RowCount = 7
  687.                 FixedRows = 0
  688.                 Options = [goEditing, goAlwaysShowEditor]
  689.                 ScrollBars = ssNone
  690.                 TabOrder = 1
  691.                 SimpleLook = True
  692.                 ColWidths = (
  693.                   75
  694.                   428)
  695.               end
  696.             end
  697.             object eMsg: TTextEditor
  698.               Left = 0
  699.               Top = 48
  700.               Width = 571
  701.               Height = 155
  702.               HelpContext = 10027
  703.               BgColor = clWhite
  704.               TextColor = clBlack
  705.               SelColor = clWhite
  706.               SelBgColor = clBlack
  707.               QuoteColor = clBlue
  708.               RefColor = clBlue
  709.               Kludge1Color = clOlive
  710.               Kludge2Color = clOlive
  711.               Kludge3Color = clOlive
  712.               ReadOnly = True
  713.               FontCharset = 1
  714.               TabOrder = 0
  715.               Font.Color = clBlack
  716.               Font.Height = -15
  717.               Font.Name = 'Courier New'
  718.               Font.Pitch = fpFixed
  719.               Font.Style = []
  720.               Align = alClient
  721.               OnMouseMove = eMsgMouseMove
  722.               PopupMenu = ViewPopup
  723.               OnDblClick = eMsgDblClick
  724.             end
  725.           end
  726.           object TPage
  727.             Left = 0
  728.             Top = 0
  729.             Caption = 'Image'
  730.             object ImagePanel: TPanel
  731.               Left = 0
  732.               Top = 0
  733.               Width = 571
  734.               Height = 203
  735.               Align = alClient
  736.               BevelOuter = bvNone
  737.               TabOrder = 0
  738.             end
  739.           end
  740.         end
  741.       end
  742.     end
  743.   end
  744.   object AttachImages: TImageList
  745.     Height = 32
  746.     Width = 32
  747.     Left = 232
  748.     Top = 272
  749.   end
  750.   object AttachPopup: TPopupMenu
  751.     OnPopup = AttachPopupPopup
  752.     Left = 296
  753.     Top = 272
  754.     object MovetoNextUnread3: TMenuItem
  755.       Tag = 1
  756.       Caption = 'Move to &Next Unread'
  757.       ShortCut = 16605
  758.       Visible = False
  759.       OnClick = mNextURClick
  760.     end
  761.     object MovetoPreviousUnread3: TMenuItem
  762.       Tag = -1
  763.       Caption = 'Move to Pre&vious Unread'
  764.       ShortCut = 16603
  765.       Visible = False
  766.       OnClick = mNextURClick
  767.     end
  768.     object MovetoNextunread4: TMenuItem
  769.       Tag = 1
  770.       Caption = 'Move to &Next unread'
  771.       ShortCut = 49191
  772.       Visible = False
  773.       OnClick = mNextURClick
  774.     end
  775.     object MovetoPreviousunread4: TMenuItem
  776.       Tag = -1
  777.       Caption = '&Move to Previous unread'
  778.       ShortCut = 49189
  779.       Visible = False
  780.       OnClick = mNextURClick
  781.     end
  782.     object maView: TMenuItem
  783.       Tag = 1
  784.       Caption = '&Open...'
  785.       Default = True
  786.       ShortCut = 16397
  787.       OnClick = maSaveClick
  788.     end
  789.     object maSave: TMenuItem
  790.       Caption = '&Save...'
  791.       ShortCut = 13
  792.       OnClick = maSaveClick
  793.     end
  794.     object maDelete: TMenuItem
  795.       Tag = 3
  796.       Caption = '&Delete'
  797.       ShortCut = 46
  798.       OnClick = maSaveClick
  799.     end
  800.     object maPrint: TMenuItem
  801.       Tag = 2
  802.       Caption = '&Print...'
  803.       ShortCut = 0
  804.       OnClick = maSaveClick
  805.     end
  806.     object maImportKey: TMenuItem
  807.       Tag = 4
  808.       Caption = '&Import Key or Certificate'
  809.       ShortCut = 0
  810.       OnClick = maSaveClick
  811.     end
  812.     object N11: TMenuItem
  813.       Caption = '-'
  814.       ShortCut = 0
  815.     end
  816.     object maSaveAllAttachments: TMenuItem
  817.       Caption = 'Save &All Attachments'
  818.       ShortCut = 24641
  819.       OnClick = maSaveAllAttachmentsClick
  820.     end
  821.     object maForward: TMenuItem
  822.       Caption = '&Forward...'
  823.       ShortCut = 16454
  824.       Visible = False
  825.     end
  826.     object Popup1: TMenuItem
  827.       Caption = 'Popup'
  828.       ShortCut = 32889
  829.       Visible = False
  830.       OnClick = Popup1Click
  831.     end
  832.   end
  833.   object MessagePopup: TPopupMenu
  834.     OnPopup = MessagePopupPopup
  835.     Left = 328
  836.     Top = 272
  837.     object mmNextUR: TMenuItem
  838.       Tag = 1
  839.       Caption = 'Move to &Next Unread'
  840.       ShortCut = 16605
  841.       Visible = False
  842.       OnClick = mNextURClick
  843.     end
  844.     object mmPrevUR: TMenuItem
  845.       Tag = -1
  846.       Caption = 'Move to Pre&vious Unread'
  847.       ShortCut = 16603
  848.       Visible = False
  849.       OnClick = mNextURClick
  850.     end
  851.     object MovetoNextunread2: TMenuItem
  852.       Tag = 1
  853.       Caption = 'Move to &Next unread'
  854.       ShortCut = 49191
  855.       OnClick = mNextURClick
  856.     end
  857.     object MovetoPreviousunread2: TMenuItem
  858.       Tag = -1
  859.       Caption = '&Move to Previous unread'
  860.       ShortCut = 49189
  861.       OnClick = mNextURClick
  862.     end
  863.     object MovetoNextunread8: TMenuItem
  864.       Tag = 1
  865.       Caption = 'Move to &Next unread'
  866.       ShortCut = 16423
  867.       Visible = False
  868.     end
  869.     object MovetoPreviousunread8: TMenuItem
  870.       Tag = -1
  871.       Caption = '&Move to Previous unread'
  872.       ShortCut = 16421
  873.       Visible = False
  874.     end
  875.     object N21: TMenuItem
  876.       Caption = '-'
  877.       ShortCut = 0
  878.     end
  879.     object mpCreate: TMenuItem
  880.       Caption = 'Create a Ne&w Message...'
  881.       Default = True
  882.       ShortCut = 16462
  883.       OnClick = mpCreateClick
  884.     end
  885.     object mOpenMessage: TMenuItem
  886.       Caption = '&Open '
  887.       ShortCut = 13
  888.       OnClick = mOpenMessageClick
  889.     end
  890.     object mpReplyA: TMenuItem
  891.       Caption = '&Reply...'
  892.       ShortCut = 16466
  893.       Visible = False
  894.       OnClick = mpReplyAClick
  895.     end
  896.     object mReplyMessage: TMenuItem
  897.       Caption = '&Reply...'
  898.       ShortCut = 16397
  899.       OnClick = mpReplyAClick
  900.     end
  901.     object mFwdMessage: TMenuItem
  902.       Tag = 1
  903.       Caption = '&Forward...'
  904.       ShortCut = 8205
  905.       OnClick = mpReplyAClick
  906.     end
  907.     object mmRedirect: TMenuItem
  908.       Tag = 4
  909.       Caption = 'R&edirect'
  910.       ShortCut = 16453
  911.       OnClick = mpReplyAClick
  912.     end
  913.     object mmThread: TMenuItem
  914.       Caption = '&Thread'
  915.       ShortCut = 0
  916.       object mmtCopy: TMenuItem
  917.         Caption = '&Copy'
  918.         ShortCut = 16468
  919.         OnClick = mmtCopyClick
  920.       end
  921.       object mmtMove: TMenuItem
  922.         Tag = 1
  923.         Caption = '&Move'
  924.         ShortCut = 24662
  925.         OnClick = mmtCopyClick
  926.       end
  927.       object mmtDelete: TMenuItem
  928.         Tag = 2
  929.         Caption = '&Delete'
  930.         ShortCut = 24622
  931.         OnClick = mmtCopyClick
  932.       end
  933.       object N22: TMenuItem
  934.         Caption = '-'
  935.         ShortCut = 0
  936.       end
  937.       object mmtMarkRead: TMenuItem
  938.         Tag = 3
  939.         Caption = 'Mark as &Read'
  940.         ShortCut = 24653
  941.         OnClick = mmtCopyClick
  942.       end
  943.       object mmtMarkUnread: TMenuItem
  944.         Tag = 4
  945.         Caption = 'Mark as &Unread'
  946.         ShortCut = 24661
  947.         OnClick = mmtCopyClick
  948.       end
  949.       object mmtPark: TMenuItem
  950.         Tag = 5
  951.         Caption = '&Park'
  952.         ShortCut = 0
  953.         OnClick = mmtCopyClick
  954.       end
  955.       object mmtUnpark: TMenuItem
  956.         Tag = 6
  957.         Caption = 'Unp&ark'
  958.         ShortCut = 0
  959.         OnClick = mmtCopyClick
  960.       end
  961.     end
  962.     object N17: TMenuItem
  963.       Caption = '-'
  964.       ShortCut = 0
  965.     end
  966.     object mvCopy: TMenuItem
  967.       Tag = 1
  968.       Caption = '&Copy to Folder...'
  969.       ShortCut = 16451
  970.       OnClick = mvCopyClick
  971.     end
  972.     object mvMove: TMenuItem
  973.       Caption = '&Move to Folder...'
  974.       ShortCut = 16470
  975.       OnClick = mvCopyClick
  976.     end
  977.     object mSaveMessage: TMenuItem
  978.       Caption = '&Save as...'
  979.       ShortCut = 16467
  980.       OnClick = mSaveMessageClick
  981.     end
  982.     object mDelMessageList: TMenuItem
  983.       Caption = '&Delete from List'
  984.       ShortCut = 0
  985.       OnClick = mDelMessageListClick
  986.     end
  987.     object mDelMessageBase: TMenuItem
  988.       Caption = '&Delete from Base'
  989.       ShortCut = 16430
  990.       OnClick = mDelMessageBaseClick
  991.     end
  992.     object mSpecials: TMenuItem
  993.       Caption = 'Specials'
  994.       ShortCut = 0
  995.       object mmAddAddress: TMenuItem
  996.         Caption = '&Add sender to Address Book'
  997.         ShortCut = 16471
  998.         OnClick = msAddSenderClick
  999.       end
  1000.       object mmDeleteAddress: TMenuItem
  1001.         Caption = '&Delete from Address Book'
  1002.         ShortCut = 16459
  1003.         OnClick = msDelSenderClick
  1004.       end
  1005.       object mmMakeFilter: TMenuItem
  1006.         Caption = '&Create filter...'
  1007.         ShortCut = 24646
  1008.         OnClick = msCreateFilterClick
  1009.       end
  1010.       object mmFindReply: TMenuItem
  1011.         Caption = '&Open reply'
  1012.         ShortCut = 16392
  1013.         OnClick = msOpenReplyClick
  1014.       end
  1015.       object mvPGPDecrypt: TMenuItem
  1016.         Caption = 'P&GP Decrypt'
  1017.         ShortCut = 24644
  1018.         OnClick = mvPGPDecryptClick
  1019.       end
  1020.       object N29: TMenuItem
  1021.         Caption = '-'
  1022.         ShortCut = 0
  1023.       end
  1024.       object mmPark: TMenuItem
  1025.         Caption = '&Park'
  1026.         ShortCut = 16458
  1027.         OnClick = mmParkClick
  1028.       end
  1029.       object mmUnpark: TMenuItem
  1030.         Tag = 1
  1031.         Caption = '&Unpark'
  1032.         ShortCut = 16452
  1033.         OnClick = mmParkClick
  1034.       end
  1035.       object N32: TMenuItem
  1036.         Caption = '-'
  1037.         ShortCut = 0
  1038.       end
  1039.       object ReplyQuotingselectedtext1: TMenuItem
  1040.         Tag = 7
  1041.         Caption = 'Reply &Quoting selected text'
  1042.         ShortCut = 115
  1043.         OnClick = mpReplyAClick
  1044.       end
  1045.       object Replywithoutquotation1: TMenuItem
  1046.         Tag = 5
  1047.         Caption = 'Reply &without quotation'
  1048.         ShortCut = 8307
  1049.         OnClick = mpReplyAClick
  1050.       end
  1051.       object ReplytotheSender1: TMenuItem
  1052.         Tag = 6
  1053.         Caption = 'Reply to the &Sender'
  1054.         ShortCut = 16499
  1055.         OnClick = mpReplyAClick
  1056.       end
  1057.       object AlternativeForward1: TMenuItem
  1058.         Tag = 10
  1059.         Caption = 'Alternative &Forward'
  1060.         ShortCut = 41076
  1061.         OnClick = mpReplyAClick
  1062.       end
  1063.     end
  1064.     object N5: TMenuItem
  1065.       Caption = '-'
  1066.       ShortCut = 0
  1067.     end
  1068.     object mmMarkunread: TMenuItem
  1069.       Caption = 'Mark as &Unread'
  1070.       ShortCut = 16469
  1071.       OnClick = mmMarkunreadClick
  1072.     end
  1073.     object mmMarkRead: TMenuItem
  1074.       Tag = 1
  1075.       Caption = 'Mark &as Read'
  1076.       ShortCut = 16461
  1077.       OnClick = mmMarkunreadClick
  1078.     end
  1079.     object mmFlags: TMenuItem
  1080.       Caption = '&Flags'
  1081.       ShortCut = 0
  1082.       Visible = False
  1083.       object mmf_Flagged: TMenuItem
  1084.         Tag = 2
  1085.         Caption = '&Flagged'
  1086.         ShortCut = 0
  1087.         OnClick = mf_FlaggedClick
  1088.       end
  1089.       object mmf_Replied: TMenuItem
  1090.         Tag = 1
  1091.         Caption = '&Replied'
  1092.         ShortCut = 0
  1093.         OnClick = mf_FlaggedClick
  1094.       end
  1095.       object mmf_Forwarded: TMenuItem
  1096.         Tag = 3
  1097.         Caption = 'F&orwarded/Redirected'
  1098.         ShortCut = 0
  1099.         OnClick = mf_FlaggedClick
  1100.       end
  1101.       object N26: TMenuItem
  1102.         Caption = '-'
  1103.         ShortCut = 0
  1104.         OnClick = mf_FlaggedClick
  1105.       end
  1106.       object mmf_NormalPty: TMenuItem
  1107.         Tag = 5
  1108.         Caption = '&Normal priority'
  1109.         GroupIndex = 10
  1110.         RadioItem = True
  1111.         ShortCut = 0
  1112.         OnClick = mf_FlaggedClick
  1113.       end
  1114.       object mmf_HighPty: TMenuItem
  1115.         Tag = 7
  1116.         Caption = '&High priority'
  1117.         GroupIndex = 10
  1118.         RadioItem = True
  1119.         ShortCut = 0
  1120.         OnClick = mf_FlaggedClick
  1121.       end
  1122.       object mmf_LowPty: TMenuItem
  1123.         Tag = 6
  1124.         Caption = '&Low priority'
  1125.         GroupIndex = 10
  1126.         RadioItem = True
  1127.         ShortCut = 0
  1128.         OnClick = mf_FlaggedClick
  1129.       end
  1130.     end
  1131.     object mmColors: TMenuItem
  1132.       Caption = 'Colour &Group'
  1133.       ShortCut = 0
  1134.     end
  1135.     object N27: TMenuItem
  1136.       Caption = '-'
  1137.       ShortCut = 0
  1138.     end
  1139.     object mlSelectAll: TMenuItem
  1140.       Caption = 'Selec&t all'
  1141.       ShortCut = 16449
  1142.       OnClick = mlSelectAllClick
  1143.     end
  1144.     object mlMovedown: TMenuItem
  1145.       Caption = 'Move down'
  1146.       ShortCut = 32
  1147.       Visible = False
  1148.       OnClick = mlMovedownClick
  1149.     end
  1150.     object Popup3: TMenuItem
  1151.       Tag = 2
  1152.       Caption = 'Popup'
  1153.       ShortCut = 32889
  1154.       Visible = False
  1155.       OnClick = Popup1Click
  1156.     end
  1157.     object mFindWord: TMenuItem
  1158.       Caption = 'Find a word...'
  1159.       ShortCut = 16454
  1160.       OnClick = mFindWordClick
  1161.     end
  1162.     object Findnextword1: TMenuItem
  1163.       Caption = 'Find next word'
  1164.       ShortCut = 114
  1165.       Visible = False
  1166.       OnClick = mvFindNextWordClick
  1167.     end
  1168.     object mvFindNextWord: TMenuItem
  1169.       Caption = 'Find next word'
  1170.       ShortCut = 16460
  1171.       OnClick = mvFindNextWordClick
  1172.     end
  1173.   end
  1174.   object ViewMenu: TMainMenu
  1175.     Left = 264
  1176.     Top = 272
  1177.     object mmMessage: TMenuItem
  1178.       Caption = '&Message'
  1179.       ShortCut = 0
  1180.       OnClick = mmMessageClick
  1181.       object mvNew: TMenuItem
  1182.         Caption = '&New'
  1183.         ShortCut = 16462
  1184.         OnClick = mpCreateClick
  1185.       end
  1186.       object mvReply: TMenuItem
  1187.         Caption = 'Repl&y...'
  1188.         ShortCut = 16397
  1189.         OnClick = mpReplyAClick
  1190.       end
  1191.       object Reply1: TMenuItem
  1192.         Caption = '&Reply'
  1193.         ShortCut = 16500
  1194.         Visible = False
  1195.         OnClick = mpReplyAClick
  1196.       end
  1197.       object mvReplyAll: TMenuItem
  1198.         Tag = 2
  1199.         Caption = 'Reply to &All'
  1200.         ShortCut = 24589
  1201.         OnClick = mpReplyAClick
  1202.       end
  1203.       object ReplytoAll1: TMenuItem
  1204.         Tag = 2
  1205.         Caption = 'Reply to &All'
  1206.         ShortCut = 24692
  1207.         Visible = False
  1208.         OnClick = mpReplyAClick
  1209.       end
  1210.       object mvForward: TMenuItem
  1211.         Tag = 1
  1212.         Caption = 'For&ward...'
  1213.         ShortCut = 8205
  1214.         OnClick = mpReplyAClick
  1215.       end
  1216.       object Forward1: TMenuItem
  1217.         Tag = 1
  1218.         Caption = 'For&ward'
  1219.         ShortCut = 8308
  1220.         Visible = False
  1221.         OnClick = mpReplyAClick
  1222.       end
  1223.       object mvResend: TMenuItem
  1224.         Caption = 'R&e-send'
  1225.         ShortCut = 24612
  1226.         OnClick = mvResendClick
  1227.       end
  1228.       object Resend1: TMenuItem
  1229.         Caption = 'Re-s&end'
  1230.         ShortCut = 8309
  1231.         Visible = False
  1232.         OnClick = mvResendClick
  1233.       end
  1234.       object mvRedirect: TMenuItem
  1235.         Tag = 4
  1236.         Caption = 'Red&irect'
  1237.         ShortCut = 16453
  1238.         OnClick = mpReplyAClick
  1239.       end
  1240.       object Redirect1: TMenuItem
  1241.         Tag = 4
  1242.         Caption = 'Redirec&t'
  1243.         ShortCut = 16501
  1244.         Visible = False
  1245.       end
  1246.       object N28: TMenuItem
  1247.         Caption = '-'
  1248.         ShortCut = 0
  1249.       end
  1250.       object mCopyToFolder: TMenuItem
  1251.         Tag = 1
  1252.         Caption = '&Copy to folder...'
  1253.         ShortCut = 0
  1254.         OnClick = mvCopyClick
  1255.       end
  1256.       object mMoveToFolder: TMenuItem
  1257.         Caption = '&Move to folder...'
  1258.         ShortCut = 0
  1259.         OnClick = mvCopyClick
  1260.       end
  1261.       object mvSaveAs: TMenuItem
  1262.         Caption = '&Save as...'
  1263.         ShortCut = 16467
  1264.         OnClick = mSaveMessageClick
  1265.       end
  1266.       object SaveAs1: TMenuItem
  1267.         Caption = '&Save As...'
  1268.         ShortCut = 32884
  1269.         Visible = False
  1270.         OnClick = mSaveMessageClick
  1271.       end
  1272.       object mmDeleteList: TMenuItem
  1273.         Caption = 'Delete from the &List'
  1274.         ShortCut = 0
  1275.         OnClick = mDelMessageListClick
  1276.       end
  1277.       object mmDeleteBase: TMenuItem
  1278.         Caption = '&Delete from Base'
  1279.         ShortCut = 16430
  1280.         OnClick = mDelMessageBaseClick
  1281.       end
  1282.       object mvPrint: TMenuItem
  1283.         Caption = '&Print...'
  1284.         ShortCut = 16464
  1285.         OnClick = mvPrintClick
  1286.       end
  1287.       object mViewsource: TMenuItem
  1288.         Caption = '&View source'
  1289.         ShortCut = 120
  1290.         OnClick = mViewsourceClick
  1291.       end
  1292.       object mAttachments: TMenuItem
  1293.         Caption = 'Attachments'
  1294.         ShortCut = 0
  1295.         object mAttOpen: TMenuItem
  1296.           Tag = 1
  1297.           Caption = '&Open...'
  1298.           ShortCut = 0
  1299.           OnClick = maSaveClick
  1300.         end
  1301.         object mAttSave: TMenuItem
  1302.           Caption = '&Save...'
  1303.           ShortCut = 0
  1304.           OnClick = maSaveClick
  1305.         end
  1306.         object mAttDelete: TMenuItem
  1307.           Tag = 3
  1308.           Caption = '&Delete'
  1309.           ShortCut = 0
  1310.           OnClick = maSaveClick
  1311.         end
  1312.         object mAttPrint: TMenuItem
  1313.           Tag = 2
  1314.           Caption = '&Print...'
  1315.           ShortCut = 0
  1316.           OnClick = maSaveClick
  1317.         end
  1318.         object mAttImportKey: TMenuItem
  1319.           Tag = 4
  1320.           Caption = '&Import Key'
  1321.           ShortCut = 0
  1322.           OnClick = maSaveClick
  1323.         end
  1324.         object N31: TMenuItem
  1325.           Caption = '-'
  1326.           ShortCut = 0
  1327.         end
  1328.         object mAttSaveAllAttachments: TMenuItem
  1329.           Caption = 'Save &All Attachments...'
  1330.           ShortCut = 0
  1331.           OnClick = maSaveAllAttachmentsClick
  1332.         end
  1333.       end
  1334.       object N1: TMenuItem
  1335.         Caption = '-'
  1336.         ShortCut = 0
  1337.       end
  1338.       object mvMarkUnread: TMenuItem
  1339.         Caption = 'Mark as &Unread'
  1340.         ShortCut = 16469
  1341.         OnClick = mmMarkunreadClick
  1342.       end
  1343.       object mvMarkRead: TMenuItem
  1344.         Tag = 1
  1345.         Caption = 'Mark as &Read'
  1346.         ShortCut = 16461
  1347.         OnClick = mmMarkunreadClick
  1348.       end
  1349.       object mFlags: TMenuItem
  1350.         Caption = '&Flags'
  1351.         ShortCut = 0
  1352.         object mf_Flagged: TMenuItem
  1353.           Tag = 2
  1354.           Caption = '&Flagged'
  1355.           ShortCut = 16455
  1356.           OnClick = mf_FlaggedClick
  1357.         end
  1358.         object mf_Replied: TMenuItem
  1359.           Tag = 1
  1360.           Caption = '&Replied'
  1361.           ShortCut = 0
  1362.           OnClick = mf_FlaggedClick
  1363.         end
  1364.         object mf_Forwarded: TMenuItem
  1365.           Tag = 3
  1366.           Caption = 'F&orwarded/Redirected'
  1367.           ShortCut = 0
  1368.           OnClick = mf_FlaggedClick
  1369.         end
  1370.         object N12: TMenuItem
  1371.           Caption = '-'
  1372.           ShortCut = 0
  1373.           OnClick = mf_FlaggedClick
  1374.         end
  1375.         object mf_NormalPty: TMenuItem
  1376.           Tag = 5
  1377.           Caption = '&Normal priority'
  1378.           GroupIndex = 10
  1379.           RadioItem = True
  1380.           ShortCut = 0
  1381.           OnClick = mf_FlaggedClick
  1382.         end
  1383.         object mf_HighPty: TMenuItem
  1384.           Tag = 7
  1385.           Caption = '&High priority'
  1386.           GroupIndex = 10
  1387.           RadioItem = True
  1388.           ShortCut = 0
  1389.           OnClick = mf_FlaggedClick
  1390.         end
  1391.         object mf_LowPty: TMenuItem
  1392.           Tag = 6
  1393.           Caption = '&Low priority'
  1394.           GroupIndex = 10
  1395.           RadioItem = True
  1396.           ShortCut = 0
  1397.           OnClick = mf_FlaggedClick
  1398.         end
  1399.       end
  1400.       object mColors: TMenuItem
  1401.         Caption = 'Colour &Group'
  1402.         ShortCut = 0
  1403.       end
  1404.       object N9: TMenuItem
  1405.         Caption = '-'
  1406.         ShortCut = 0
  1407.       end
  1408.       object mvExit: TMenuItem
  1409.         Caption = 'E&xit'
  1410.         ShortCut = 27
  1411.         OnClick = mvExitClick
  1412.       end
  1413.     end
  1414.     object mmEdit: TMenuItem
  1415.       Caption = '&Edit'
  1416.       ShortCut = 0
  1417.       OnClick = mmEditClick
  1418.       object meCopy: TMenuItem
  1419.         Tag = 1
  1420.         Caption = '&Copy'
  1421.         ShortCut = 0
  1422.         OnClick = meCopyClick
  1423.       end
  1424.       object meCopyTo: TMenuItem
  1425.         Tag = 1
  1426.         Caption = 'Copy &to...'
  1427.         ShortCut = 0
  1428.         OnClick = meCopyToClick
  1429.       end
  1430.       object N6: TMenuItem
  1431.         Caption = '-'
  1432.         ShortCut = 0
  1433.       end
  1434.       object meFindWord: TMenuItem
  1435.         Caption = 'Find a &word...'
  1436.         ShortCut = 16454
  1437.         OnClick = mFindWordClick
  1438.       end
  1439.       object meFindWordA: TMenuItem
  1440.         Caption = 'Find &next word'
  1441.         ShortCut = 114
  1442.         Visible = False
  1443.         OnClick = mvFindNextWordClick
  1444.       end
  1445.       object meFindWordB: TMenuItem
  1446.         Caption = 'Find &next word'
  1447.         ShortCut = 16460
  1448.         OnClick = mvFindNextWordClick
  1449.       end
  1450.       object N33: TMenuItem
  1451.         Caption = '-'
  1452.         ShortCut = 0
  1453.       end
  1454.       object mOldSearch: TMenuItem
  1455.         Caption = '&Use previous conditions'
  1456.         ShortCut = 0
  1457.       end
  1458.     end
  1459.     object mmSpecials: TMenuItem
  1460.       Caption = '&Specials'
  1461.       ShortCut = 0
  1462.       object MovetoNextunread1: TMenuItem
  1463.         Tag = 1
  1464.         Caption = 'Move to &Next unread'
  1465.         ShortCut = 49191
  1466.         OnClick = mNextURClick
  1467.       end
  1468.       object MovetoPreviousunread1: TMenuItem
  1469.         Tag = -1
  1470.         Caption = '&Move to Previous unread'
  1471.         ShortCut = 49189
  1472.         OnClick = mNextURClick
  1473.       end
  1474.       object MovetoNextunread7: TMenuItem
  1475.         Tag = 1
  1476.         Caption = 'Move to &Next unread'
  1477.         ShortCut = 16605
  1478.         Visible = False
  1479.       end
  1480.       object MovetoPreviousunread7: TMenuItem
  1481.         Tag = -1
  1482.         Caption = '&Move to Previous unread'
  1483.         ShortCut = 16603
  1484.         Visible = False
  1485.       end
  1486.       object N13: TMenuItem
  1487.         Caption = '-'
  1488.         ShortCut = 0
  1489.       end
  1490.       object msAddSender: TMenuItem
  1491.         Caption = '&Add sender to Address Book'
  1492.         ShortCut = 16471
  1493.         OnClick = msAddSenderClick
  1494.       end
  1495.       object msDelSender: TMenuItem
  1496.         Caption = '&Delete from Address Book'
  1497.         ShortCut = 16459
  1498.         OnClick = msDelSenderClick
  1499.       end
  1500.       object msCreateFilter: TMenuItem
  1501.         Caption = '&Create filter...'
  1502.         ShortCut = 24646
  1503.         OnClick = msCreateFilterClick
  1504.       end
  1505.       object msOpenReply: TMenuItem
  1506.         Caption = '&Open reply'
  1507.         ShortCut = 16392
  1508.         OnClick = msOpenReplyClick
  1509.       end
  1510.       object N25: TMenuItem
  1511.         Caption = '-'
  1512.         ShortCut = 0
  1513.       end
  1514.       object msReplySelected: TMenuItem
  1515.         Tag = 7
  1516.         Caption = 'Reply &Quoting selected text'
  1517.         ShortCut = 115
  1518.         OnClick = mpReplyAClick
  1519.       end
  1520.       object msReplyNoQuotes: TMenuItem
  1521.         Tag = 5
  1522.         Caption = 'Reply &without quotation'
  1523.         ShortCut = 8307
  1524.         OnClick = mpReplyAClick
  1525.       end
  1526.       object msReplySender: TMenuItem
  1527.         Tag = 6
  1528.         Caption = 'Reply to the &Sender'
  1529.         ShortCut = 16499
  1530.         OnClick = mpReplyAClick
  1531.       end
  1532.       object mAltForward: TMenuItem
  1533.         Tag = 10
  1534.         Caption = 'Alternative &Forward'
  1535.         ShortCut = 41076
  1536.         OnClick = mpReplyAClick
  1537.       end
  1538.       object N2: TMenuItem
  1539.         Caption = '-'
  1540.         ShortCut = 0
  1541.       end
  1542.       object msCheckPGP: TMenuItem
  1543.         Caption = '&Check OpenPGP Signature'
  1544.         ShortCut = 24643
  1545.         OnClick = msCheckPGPClick
  1546.       end
  1547.       object mmPGPDecrypt: TMenuItem
  1548.         Caption = 'OpenPGP Decryp&t'
  1549.         ShortCut = 0
  1550.         OnClick = mvPGPDecryptClick
  1551.       end
  1552.       object msImportKey: TMenuItem
  1553.         Caption = '&Import Key or Certificate'
  1554.         ShortCut = 0
  1555.         OnClick = msImportKeyClick
  1556.       end
  1557.       object N34: TMenuItem
  1558.         Caption = '-'
  1559.         ShortCut = 0
  1560.       end
  1561.       object msPark: TMenuItem
  1562.         Caption = '&Park'
  1563.         ShortCut = 16458
  1564.         OnClick = mmParkClick
  1565.       end
  1566.       object msUnpark: TMenuItem
  1567.         Tag = 1
  1568.         Caption = '&Unpark'
  1569.         ShortCut = 16452
  1570.         OnClick = mmParkClick
  1571.       end
  1572.       object N23: TMenuItem
  1573.         Caption = '-'
  1574.         ShortCut = 0
  1575.       end
  1576.       object mmFollow: TMenuItem
  1577.         Caption = 'Follow'
  1578.         ShortCut = 0
  1579.         OnClick = bFollowClick
  1580.       end
  1581.     end
  1582.     object mmView: TMenuItem
  1583.       Caption = '&View'
  1584.       ShortCut = 0
  1585.       object mvAttached: TMenuItem
  1586.         Caption = '&Attached files'
  1587.         ShortCut = 0
  1588.         object mvShowAuto: TMenuItem
  1589.           Caption = 'Show &Automatically'
  1590.           GroupIndex = 2
  1591.           RadioItem = True
  1592.           ShortCut = 0
  1593.           OnClick = mvShowAutoClick
  1594.         end
  1595.         object mvShowAlways: TMenuItem
  1596.           Tag = 1
  1597.           Caption = '&Show always'
  1598.           GroupIndex = 2
  1599.           RadioItem = True
  1600.           ShortCut = 0
  1601.           OnClick = mvShowAutoClick
  1602.         end
  1603.         object mvHideAttach: TMenuItem
  1604.           Tag = 2
  1605.           Caption = '&Hide'
  1606.           GroupIndex = 2
  1607.           RadioItem = True
  1608.           ShortCut = 0
  1609.           OnClick = mvShowAutoClick
  1610.         end
  1611.       end
  1612.       object N8: TMenuItem
  1613.         Caption = '-'
  1614.         ShortCut = 0
  1615.       end
  1616.       object mmfDisplay: TMenuItem
  1617.         Caption = '&Display'
  1618.         ShortCut = 0
  1619.         OnClick = mmfDisplayClick
  1620.         object mmfAll: TMenuItem
  1621.           Caption = '&All messages'
  1622.           GroupIndex = 8
  1623.           RadioItem = True
  1624.           ShortCut = 16571
  1625.           OnClick = mmfAllClick
  1626.         end
  1627.         object mmfUnread: TMenuItem
  1628.           Caption = 'Only &Unread messages'
  1629.           GroupIndex = 20
  1630.           RadioItem = True
  1631.           ShortCut = 0
  1632.           OnClick = mmfUnreadClick
  1633.         end
  1634.         object mmfRead: TMenuItem
  1635.           Tag = 1
  1636.           Caption = 'Only &Read messages'
  1637.           GroupIndex = 20
  1638.           RadioItem = True
  1639.           ShortCut = 0
  1640.           OnClick = mmfUnreadClick
  1641.         end
  1642.         object mmfFlagged: TMenuItem
  1643.           Tag = 6
  1644.           Caption = 'Only &Flagged messages'
  1645.           GroupIndex = 20
  1646.           ShortCut = 0
  1647.           OnClick = mmfUnreadClick
  1648.         end
  1649.         object mmfUnFlagged: TMenuItem
  1650.           Tag = 7
  1651.           Caption = 'Only Non-f&lagged messages'
  1652.           GroupIndex = 20
  1653.           ShortCut = 0
  1654.           OnClick = mmfUnreadClick
  1655.         end
  1656.         object mmfParked: TMenuItem
  1657.           Tag = 2
  1658.           Caption = 'Only &Parked messages'
  1659.           GroupIndex = 21
  1660.           RadioItem = True
  1661.           ShortCut = 0
  1662.           OnClick = mmfUnreadClick
  1663.         end
  1664.         object mmfUnparked: TMenuItem
  1665.           Tag = 3
  1666.           Caption = 'Only U&nparked messages'
  1667.           GroupIndex = 21
  1668.           RadioItem = True
  1669.           ShortCut = 0
  1670.           OnClick = mmfUnreadClick
  1671.         end
  1672.         object mmfAttach: TMenuItem
  1673.           Tag = 4
  1674.           Caption = 'Only messages with &Attachments'
  1675.           GroupIndex = 22
  1676.           RadioItem = True
  1677.           ShortCut = 0
  1678.           OnClick = mmfUnreadClick
  1679.         end
  1680.         object mmfNoAttach: TMenuItem
  1681.           Tag = 5
  1682.           Caption = 'Only messages &without Attachments'
  1683.           GroupIndex = 22
  1684.           RadioItem = True
  1685.           ShortCut = 0
  1686.           OnClick = mmfUnreadClick
  1687.         end
  1688.         object N19: TMenuItem
  1689.           Caption = '-'
  1690.           GroupIndex = 22
  1691.           ShortCut = 0
  1692.         end
  1693.         object mmfAdvanced: TMenuItem
  1694.           Caption = 'Ad&vanced filtering...'
  1695.           GroupIndex = 23
  1696.           ShortCut = 0
  1697.           OnClick = mmfAdvancedClick
  1698.         end
  1699.       end
  1700.       object mmsSort: TMenuItem
  1701.         Caption = '&Sort by'
  1702.         ShortCut = 0
  1703.         OnClick = mmsSortClick
  1704.         object mmsReceived: TMenuItem
  1705.           Tag = 6
  1706.           Caption = '&Received time'
  1707.           GroupIndex = 10
  1708.           RadioItem = True
  1709.           ShortCut = 16433
  1710.           OnClick = mmsReceivedClick
  1711.         end
  1712.         object mmsCreation: TMenuItem
  1713.           Tag = 5
  1714.           Caption = '&Creation time'
  1715.           GroupIndex = 10
  1716.           RadioItem = True
  1717.           ShortCut = 16434
  1718.           OnClick = mmsReceivedClick
  1719.         end
  1720.         object mmsSize: TMenuItem
  1721.           Tag = 9
  1722.           Caption = 'Si&ze'
  1723.           GroupIndex = 10
  1724.           RadioItem = True
  1725.           ShortCut = 16435
  1726.           OnClick = mmsReceivedClick
  1727.         end
  1728.         object mmsSender: TMenuItem
  1729.           Tag = 2
  1730.           Caption = '&From'
  1731.           GroupIndex = 10
  1732.           RadioItem = True
  1733.           ShortCut = 16436
  1734.           OnClick = mmsReceivedClick
  1735.         end
  1736.         object mmsRecipient: TMenuItem
  1737.           Tag = 3
  1738.           Caption = '&To'
  1739.           GroupIndex = 10
  1740.           RadioItem = True
  1741.           ShortCut = 16437
  1742.           OnClick = mmsReceivedClick
  1743.         end
  1744.         object mmsSubject: TMenuItem
  1745.           Tag = 4
  1746.           Caption = '&Subject'
  1747.           GroupIndex = 10
  1748.           RadioItem = True
  1749.           ShortCut = 16438
  1750.           OnClick = mmsReceivedClick
  1751.         end
  1752.         object mmsFlags: TMenuItem
  1753.           Tag = 1
  1754.           Caption = '&Message Flags'
  1755.           GroupIndex = 10
  1756.           RadioItem = True
  1757.           ShortCut = 16439
  1758.           OnClick = mmsReceivedClick
  1759.         end
  1760.         object mmsAttachment: TMenuItem
  1761.           Tag = 8
  1762.           Caption = '&Attachment presence'
  1763.           GroupIndex = 10
  1764.           RadioItem = True
  1765.           ShortCut = 16440
  1766.           OnClick = mmsReceivedClick
  1767.         end
  1768.         object mmsParking: TMenuItem
  1769.           Tag = 9
  1770.           Caption = '&Parking/Draft flag'
  1771.           GroupIndex = 10
  1772.           RadioItem = True
  1773.           ShortCut = 16441
  1774.           OnClick = mmsReceivedClick
  1775.         end
  1776.         object N16: TMenuItem
  1777.           Caption = '-'
  1778.           GroupIndex = 11
  1779.           ShortCut = 0
  1780.         end
  1781.         object mmsDescending: TMenuItem
  1782.           Caption = '&Descending order'
  1783.           GroupIndex = 11
  1784.           ShortCut = 16432
  1785.           OnClick = mmsDescendingClick
  1786.         end
  1787.       end
  1788.       object mmtThread: TMenuItem
  1789.         Caption = '&View threads by'
  1790.         ShortCut = 0
  1791.         OnClick = mmtThreadClick
  1792.         object mmtNone: TMenuItem
  1793.           Caption = '&None'
  1794.           GroupIndex = 12
  1795.           RadioItem = True
  1796.           ShortCut = 32816
  1797.           OnClick = mmtNoneClick
  1798.         end
  1799.         object N18: TMenuItem
  1800.           Caption = '-'
  1801.           GroupIndex = 12
  1802.           ShortCut = 0
  1803.         end
  1804.         object mmtStandard: TMenuItem
  1805.           Tag = 1
  1806.           Caption = '&References (standard)'
  1807.           GroupIndex = 12
  1808.           RadioItem = True
  1809.           ShortCut = 32817
  1810.           OnClick = mmtNoneClick
  1811.         end
  1812.         object mmtSubject: TMenuItem
  1813.           Tag = 2
  1814.           Caption = '&Subject'
  1815.           GroupIndex = 12
  1816.           RadioItem = True
  1817.           ShortCut = 32818
  1818.           OnClick = mmtNoneClick
  1819.         end
  1820.         object mmtFrom: TMenuItem
  1821.           Tag = 3
  1822.           Caption = '&From'
  1823.           GroupIndex = 12
  1824.           RadioItem = True
  1825.           ShortCut = 32819
  1826.           OnClick = mmtNoneClick
  1827.         end
  1828.         object mmtTo: TMenuItem
  1829.           Tag = 4
  1830.           Caption = '&To'
  1831.           GroupIndex = 12
  1832.           RadioItem = True
  1833.           ShortCut = 32820
  1834.           OnClick = mmtNoneClick
  1835.         end
  1836.       end
  1837.       object mmColumns: TMenuItem
  1838.         Caption = '&Columns...'
  1839.         ShortCut = 0
  1840.         OnClick = mmColumnsClick
  1841.       end
  1842.       object N10: TMenuItem
  1843.         Caption = '-'
  1844.         ShortCut = 0
  1845.       end
  1846.       object mmHeaderMenu: TMenuItem
  1847.         Caption = 'Message &Header'
  1848.         GroupIndex = 11
  1849.         ShortCut = 0
  1850.         object mHeaderVisible: TMenuItem
  1851.           Caption = '&Show'
  1852.           ShortCut = 24648
  1853.           OnClick = mHeaderVisibleClick
  1854.         end
  1855.         object N30: TMenuItem
  1856.           Caption = '-'
  1857.           ShortCut = 0
  1858.         end
  1859.         object mhfFrom: TMenuItem
  1860.           Caption = '&From'
  1861.           Checked = True
  1862.           ShortCut = 0
  1863.           OnClick = mhfFromClick
  1864.         end
  1865.         object mhfReplyTo: TMenuItem
  1866.           Tag = 1
  1867.           Caption = '&Reply-To'
  1868.           Checked = True
  1869.           ShortCut = 0
  1870.           OnClick = mhfFromClick
  1871.         end
  1872.         object mhfSender: TMenuItem
  1873.           Tag = 2
  1874.           Caption = '&X-Sender'
  1875.           ShortCut = 0
  1876.           OnClick = mhfFromClick
  1877.         end
  1878.         object mhfTO: TMenuItem
  1879.           Tag = 3
  1880.           Caption = '&TO'
  1881.           Checked = True
  1882.           ShortCut = 0
  1883.           OnClick = mhfFromClick
  1884.         end
  1885.         object mhfCC: TMenuItem
  1886.           Tag = 4
  1887.           Caption = '&CC'
  1888.           Checked = True
  1889.           ShortCut = 0
  1890.           OnClick = mhfFromClick
  1891.         end
  1892.         object mhfBCC: TMenuItem
  1893.           Tag = 5
  1894.           Caption = '&BCC'
  1895.           Checked = True
  1896.           ShortCut = 0
  1897.           OnClick = mhfFromClick
  1898.         end
  1899.         object mhfMailer: TMenuItem
  1900.           Tag = 7
  1901.           Caption = '&Mailer'
  1902.           ShortCut = 0
  1903.           OnClick = mhfFromClick
  1904.         end
  1905.         object mhfCreated: TMenuItem
  1906.           Tag = 8
  1907.           Caption = 'Cr&eation time'
  1908.           ShortCut = 0
  1909.           OnClick = mhfFromClick
  1910.         end
  1911.         object mhfReceived: TMenuItem
  1912.           Tag = 9
  1913.           Caption = 'Recei&ved Time'
  1914.           ShortCut = 0
  1915.           OnClick = mhfFromClick
  1916.         end
  1917.         object mhfComments: TMenuItem
  1918.           Tag = 10
  1919.           Caption = 'C&omments'
  1920.           ShortCut = 0
  1921.           OnClick = mhfFromClick
  1922.         end
  1923.         object mhfMessageID: TMenuItem
  1924.           Tag = 11
  1925.           Caption = 'Message &ID'
  1926.           ShortCut = 0
  1927.           OnClick = mhfFromClick
  1928.         end
  1929.       end
  1930.       object mShowKludges: TMenuItem
  1931.         Caption = 'RFC-&822 headers'
  1932.         GroupIndex = 11
  1933.         ShortCut = 24651
  1934.         OnClick = mShowKludgesClick
  1935.       end
  1936.       object N14: TMenuItem
  1937.         Caption = '-'
  1938.         GroupIndex = 11
  1939.         ShortCut = 0
  1940.       end
  1941.       object mmXlat: TMenuItem
  1942.         Caption = 'Charact&er set'
  1943.         GroupIndex = 11
  1944.         ShortCut = 0
  1945.         object mtNone: TMenuItem
  1946.           Caption = '&None'
  1947.           GroupIndex = 11
  1948.           RadioItem = True
  1949.           ShortCut = 0
  1950.           OnClick = mtNoneClick
  1951.         end
  1952.         object N20: TMenuItem
  1953.           Caption = '-'
  1954.           GroupIndex = 11
  1955.           ShortCut = 0
  1956.         end
  1957.         object N7: TMenuItem
  1958.           Caption = '-'
  1959.           GroupIndex = 12
  1960.           ShortCut = 0
  1961.         end
  1962.         object mAutodetect: TMenuItem
  1963.           Caption = '&Auto-detect'
  1964.           GroupIndex = 12
  1965.           ShortCut = 32821
  1966.           OnClick = mAutodetectClick
  1967.         end
  1968.         object mSetAsDeafault: TMenuItem
  1969.           Caption = '&Set as default'
  1970.           GroupIndex = 12
  1971.           ShortCut = 0
  1972.           OnClick = mSetAsDeafaultClick
  1973.         end
  1974.       end
  1975.     end
  1976.   end
  1977.   object ViewPopup: TPopupMenu
  1978.     OnPopup = ViewPopupPopup
  1979.     Left = 376
  1980.     Top = 272
  1981.     object MovetoNextUnread5: TMenuItem
  1982.       Tag = 1
  1983.       Caption = 'Move to &Next Unread'
  1984.       ShortCut = 16605
  1985.       Visible = False
  1986.       OnClick = mNextURClick
  1987.     end
  1988.     object MovetoPreviousUnread5: TMenuItem
  1989.       Tag = -1
  1990.       Caption = 'Move to Pre&vious Unread'
  1991.       ShortCut = 16603
  1992.       Visible = False
  1993.       OnClick = mNextURClick
  1994.     end
  1995.     object MovetoNextunread6: TMenuItem
  1996.       Tag = 1
  1997.       Caption = 'Move to &Next unread'
  1998.       ShortCut = 49191
  1999.       OnClick = mNextURClick
  2000.     end
  2001.     object MovetoPreviousunread6: TMenuItem
  2002.       Tag = -1
  2003.       Caption = '&Move to Previous unread'
  2004.       ShortCut = 49189
  2005.       OnClick = mNextURClick
  2006.     end
  2007.     object N35: TMenuItem
  2008.       Caption = '-'
  2009.       ShortCut = 0
  2010.     end
  2011.     object meNewMail: TMenuItem
  2012.       Tag = 11
  2013.       Caption = '&Write message to address...'
  2014.       ShortCut = 0
  2015.       OnClick = mpCreateClick
  2016.     end
  2017.     object meReplyLink: TMenuItem
  2018.       Caption = 'R&eply to address...'
  2019.       ShortCut = 0
  2020.       OnClick = meReplyLinkClick
  2021.     end
  2022.     object meAddAddress: TMenuItem
  2023.       Caption = 'Add to Address &Book'
  2024.       ShortCut = 0
  2025.       OnClick = meAddAddressClick
  2026.     end
  2027.     object meOpenLink: TMenuItem
  2028.       Caption = '&Open URL'
  2029.       ShortCut = 0
  2030.       OnClick = meOpenLinkClick
  2031.     end
  2032.     object meCopyLink: TMenuItem
  2033.       Caption = '&Copy URL'
  2034.       ShortCut = 0
  2035.       OnClick = meCopyLinkClick
  2036.     end
  2037.     object meDivider: TMenuItem
  2038.       Caption = '-'
  2039.       ShortCut = 0
  2040.     end
  2041.     object mmReply2: TMenuItem
  2042.       Caption = '&Reply...'
  2043.       ShortCut = 16397
  2044.       OnClick = mpReplyAClick
  2045.     end
  2046.     object Reply2: TMenuItem
  2047.       Caption = '&Reply...'
  2048.       ShortCut = 16466
  2049.       Visible = False
  2050.       OnClick = mpReplyAClick
  2051.     end
  2052.     object MenuItem2: TMenuItem
  2053.       Tag = 2
  2054.       Caption = 'Re&ply to All'
  2055.       ShortCut = 24589
  2056.       OnClick = mpReplyAClick
  2057.     end
  2058.     object MenuItem3: TMenuItem
  2059.       Tag = 1
  2060.       Caption = '&Forward...'
  2061.       ShortCut = 8308
  2062.       Visible = False
  2063.       OnClick = mpReplyAClick
  2064.     end
  2065.     object mvForward2: TMenuItem
  2066.       Tag = 1
  2067.       Caption = '&Forward...'
  2068.       ShortCut = 8205
  2069.       OnClick = mpReplyAClick
  2070.     end
  2071.     object mpSaveAs: TMenuItem
  2072.       Caption = '&Save as...'
  2073.       ShortCut = 16467
  2074.       OnClick = mSaveMessageClick
  2075.     end
  2076.     object mvDelete: TMenuItem
  2077.       Caption = 'Delete'
  2078.       ShortCut = 46
  2079.       Visible = False
  2080.       OnClick = mDelMessageBaseClick
  2081.     end
  2082.     object N24: TMenuItem
  2083.       Caption = '-'
  2084.       ShortCut = 0
  2085.     end
  2086.     object mlCopy: TMenuItem
  2087.       Caption = '&Copy'
  2088.       ShortCut = 16429
  2089.       OnClick = meCopyClick
  2090.     end
  2091.     object mlCopyTo: TMenuItem
  2092.       Caption = 'Copy &To...'
  2093.       ShortCut = 32813
  2094.       OnClick = meCopyToClick
  2095.     end
  2096.     object ml_SelectAll: TMenuItem
  2097.       Caption = 'Select &All'
  2098.       ShortCut = 16449
  2099.       OnClick = ml_SelectAllClick
  2100.     end
  2101.     object mvMoveDown: TMenuItem
  2102.       Caption = 'Move Down'
  2103.       ShortCut = 32
  2104.       Visible = False
  2105.       OnClick = mlMovedownClick
  2106.     end
  2107.     object MenuItem4: TMenuItem
  2108.       Caption = '-'
  2109.       ShortCut = 0
  2110.     end
  2111.     object mlPGPDecrypt: TMenuItem
  2112.       Caption = '&OpenPGP Decrypt'
  2113.       ShortCut = 24644
  2114.       Visible = False
  2115.     end
  2116.     object mlFind: TMenuItem
  2117.       Caption = 'Find...'
  2118.       ShortCut = 16454
  2119.       OnClick = mFindWordClick
  2120.     end
  2121.     object mFindNext: TMenuItem
  2122.       Caption = 'Find Next'
  2123.       ShortCut = 114
  2124.       Visible = False
  2125.       OnClick = mvFindNextWordClick
  2126.     end
  2127.     object mlFindNext: TMenuItem
  2128.       Caption = 'Find Next'
  2129.       ShortCut = 16460
  2130.       OnClick = mvFindNextWordClick
  2131.     end
  2132.     object meProperties: TMenuItem
  2133.       Caption = '&Preferences...'
  2134.       ShortCut = 0
  2135.       OnClick = mePropertiesClick
  2136.     end
  2137.     object N15: TMenuItem
  2138.       Caption = '-'
  2139.       ShortCut = 0
  2140.     end
  2141.     object ml_Kludges: TMenuItem
  2142.       Caption = 'RFC-&822 headers'
  2143.       ShortCut = 0
  2144.       OnClick = mShowKludgesClick
  2145.     end
  2146.     object mlXlat: TMenuItem
  2147.       Caption = 'C&haracter set'
  2148.       ShortCut = 0
  2149.       object mlNone: TMenuItem
  2150.         Caption = 'None'
  2151.         GroupIndex = 9
  2152.         RadioItem = True
  2153.         ShortCut = 0
  2154.         OnClick = mtNoneClick
  2155.       end
  2156.       object N4: TMenuItem
  2157.         Caption = '-'
  2158.         GroupIndex = 9
  2159.         ShortCut = 0
  2160.       end
  2161.       object N3: TMenuItem
  2162.         Caption = '-'
  2163.         GroupIndex = 12
  2164.         ShortCut = 0
  2165.       end
  2166.       object mlAutodetect: TMenuItem
  2167.         Caption = '&Auto-detect'
  2168.         GroupIndex = 12
  2169.         ShortCut = 32821
  2170.         OnClick = mAutodetectClick
  2171.       end
  2172.       object mlSetAsDefault: TMenuItem
  2173.         Caption = '&Set as default'
  2174.         GroupIndex = 12
  2175.         ShortCut = 0
  2176.         OnClick = mSetAsDeafaultClick
  2177.       end
  2178.     end
  2179.     object Popup2: TMenuItem
  2180.       Tag = 1
  2181.       Caption = 'Popup'
  2182.       ShortCut = 32889
  2183.       Visible = False
  2184.       OnClick = Popup1Click
  2185.     end
  2186.   end
  2187. end
  2188.