home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 April / CMCD0404.ISO / Software / Shareware / Comunicatii / thebat / the_bat2.04.07.exe / thebat.exe / 0 / RCDATA / TFOLDERVIEWFORM / TFOLDERVIEWFORM.txt
Encoding:
Text File  |  2004-02-23  |  41.0 KB  |  1,582 lines

  1. object FolderViewForm: TFolderViewForm
  2.   Left = 315
  3.   Top = 246
  4.   AutoScroll = False
  5.   Caption = 'View Message Folder'
  6.   ClientHeight = 518
  7.   ClientWidth = 554
  8.   Color = clBtnFace
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   KeyPreview = True
  15.   Menu = ViewMenu
  16.   OldCreateOrder = True
  17.   OnActivate = FormActivate
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   OnKeyDown = FormKeyDown
  21.   OnShow = FormShow
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object MsgCtl: TMessageController
  25.     Left = 153
  26.     Top = 272
  27.     Width = 47
  28.     Height = 56
  29.     MsgView = MLV
  30.   end
  31.   object dTools: TDock97
  32.     Left = 0
  33.     Top = 0
  34.     Width = 554
  35.     Height = 33
  36.     BoundLines = [blTop]
  37.     object tbTools: TToolbar97
  38.       Left = 0
  39.       Top = 0
  40.       Caption = 'Toolbar'
  41.       DefaultDock = dTools
  42.       DockedTo = dTools
  43.       DockPos = 0
  44.       FullSize = True
  45.       TabOrder = 0
  46.       object bReply: TToolbarButton97
  47.         Tag = 9
  48.         Left = 0
  49.         Top = 0
  50.         Width = 30
  51.         Height = 28
  52.         Hint = 'Reply'
  53.         ParentShowHint = False
  54.         ShowHint = True
  55.         OnClick = mvReplyClick
  56.       end
  57.       object bReplyAll: TToolbarButton97
  58.         Tag = 2
  59.         Left = 30
  60.         Top = 0
  61.         Width = 30
  62.         Height = 28
  63.         Hint = 'Reply to All'
  64.         ParentShowHint = False
  65.         ShowHint = True
  66.         OnClick = mvReplyClick
  67.       end
  68.       object bForward: TToolbarButton97
  69.         Tag = 11
  70.         Left = 60
  71.         Top = 0
  72.         Width = 30
  73.         Height = 28
  74.         Hint = 'Forward'
  75.         ParentShowHint = False
  76.         ShowHint = True
  77.         OnClick = mvReplyClick
  78.       end
  79.       object ToolbarSep971: TToolbarSep97
  80.         Left = 120
  81.         Top = 0
  82.       end
  83.       object bSaveAs: TToolbarButton97
  84.         Left = 154
  85.         Top = 0
  86.         Width = 30
  87.         Height = 28
  88.         Hint = 'Save as...'
  89.         ParentShowHint = False
  90.         ShowHint = True
  91.         OnClick = mvSaveAsClick
  92.       end
  93.       object bvPrint: TToolbarButton97
  94.         Tag = 1
  95.         Left = 184
  96.         Top = 0
  97.         Width = 30
  98.         Height = 28
  99.         Hint = 'Print'
  100.         ParentShowHint = False
  101.         ShowHint = True
  102.         OnClick = mvPrintClick
  103.       end
  104.       object ToolbarSep972: TToolbarSep97
  105.         Left = 214
  106.         Top = 0
  107.       end
  108.       object bVCopy: TToolbarButton97
  109.         Left = 220
  110.         Top = 0
  111.         Width = 30
  112.         Height = 28
  113.         Hint = 'Copy'
  114.         Enabled = False
  115.         ParentShowHint = False
  116.         ShowHint = True
  117.         OnClick = meCopyClick
  118.       end
  119.       object bVCopyTo: TToolbarButton97
  120.         Left = 250
  121.         Top = 0
  122.         Width = 30
  123.         Height = 28
  124.         Hint = 'Copy to...'
  125.         Enabled = False
  126.         ParentShowHint = False
  127.         ShowHint = True
  128.         OnClick = meCopyToClick
  129.       end
  130.       object bVSearch: TToolbarButton97
  131.         Left = 280
  132.         Top = 0
  133.         Width = 30
  134.         Height = 28
  135.         Hint = 'Search'
  136.         ParentShowHint = False
  137.         ShowHint = True
  138.         OnClick = xbVSearchClick
  139.       end
  140.       object ToolbarSep973: TToolbarSep97
  141.         Left = 310
  142.         Top = 0
  143.       end
  144.       object bPrev: TToolbarButton97
  145.         Left = 316
  146.         Top = 0
  147.         Width = 30
  148.         Height = 28
  149.         Hint = 'Previous'
  150.         ParentShowHint = False
  151.         ShowHint = True
  152.         OnClick = mnPrevClick
  153.       end
  154.       object bNext: TToolbarButton97
  155.         Left = 346
  156.         Top = 0
  157.         Width = 30
  158.         Height = 28
  159.         Hint = 'Next'
  160.         ParentShowHint = False
  161.         ShowHint = True
  162.         OnClick = mnNextClick
  163.       end
  164.       object ToolbarSep974: TToolbarSep97
  165.         Left = 376
  166.         Top = 0
  167.       end
  168.       object bDelUp: TToolbarButton97
  169.         Tag = -1
  170.         Left = 382
  171.         Top = 0
  172.         Width = 30
  173.         Height = 28
  174.         Hint = 'Delete message(s) and move up'
  175.         ParentShowHint = False
  176.         ShowHint = True
  177.         OnClick = mnDelPrevClick
  178.       end
  179.       object bDelete: TToolbarButton97
  180.         Left = 412
  181.         Top = 0
  182.         Width = 30
  183.         Height = 28
  184.         Hint = 'Delete message(s)'
  185.         ParentShowHint = False
  186.         ShowHint = True
  187.         OnClick = bDeleteClick
  188.       end
  189.       object bDelDown: TToolbarButton97
  190.         Tag = 1
  191.         Left = 442
  192.         Top = 0
  193.         Width = 30
  194.         Height = 28
  195.         Hint = 'Delete message(s) and move down'
  196.         ParentShowHint = False
  197.         ShowHint = True
  198.         OnClick = xbDelDownClick
  199.       end
  200.       object bRedirect: TToolbarButton97
  201.         Tag = 4
  202.         Left = 90
  203.         Top = 0
  204.         Width = 30
  205.         Height = 28
  206.         Hint = 'Redirect'
  207.         ParentShowHint = False
  208.         ShowHint = True
  209.         OnClick = mvReplyClick
  210.       end
  211.       object bAbacus: TToolbarButton97
  212.         Left = 126
  213.         Top = 0
  214.         Width = 28
  215.         Height = 28
  216.         Glyph.Data = {
  217.           0E060000424D0E06000000000000360000002800000016000000160000000100
  218.           180000000000D805000000000000000000000000000000000000FFFFFFFFFFFF
  219.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  220.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFF
  221.           FF000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFF
  222.           FFFFFFFFFFFFFFFF000000000000000000000000000000000000000000FFFFFF
  223.           0000FFFFFFFFFFFF000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF
  224.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000FFFF
  225.           FFFFFFFF0000FFFFFFFFFFFFFFFFFF000000000000C0C0C0FFFFFFFFFFFFFFFF
  226.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000FF
  227.           FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C0FFFFFFFF
  228.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
  229.           FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFF000000000000
  230.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000
  231.           00000000FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFC0C0
  232.           C0000000FFFFFFFFFFFFFFFFFF0000FF0000FFC0C0C0FFFFFFFFFFFFC0C0C000
  233.           0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFC0C0C000000000
  234.           0000000000000000C0C0C00000000000FF0000FF0000FF0000FF000000000000
  235.           000000000000000000000000000000000000C0C0C0FFFFFF0000FFFFFFC0C0C0
  236.           C0C0C0C0C0C0C0C0C0000000000000C0C0C00000FF0000FF0000FF0000FFC0C0
  237.           C0C0C0C0000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFF0000FFFF
  238.           FFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0000000C0C0C0C0C0C00000FF0000FFC0
  239.           C0C0FFFFFFC0C0C0000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  240.           0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF
  241.           FFFFFFFFFFFFC0C0C0000000000000C0C0C0FFFFFFFFFFFFFFFFFFFFFFFFFFFF
  242.           FFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0000000C0C0
  243.           C0FFFFFFFFFFFFFFFFFFC0C0C0000000000000C0C0C0FFFFFFFFFFFFFFFFFFFF
  244.           FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
  245.           0000000000FFFFFFFFFFFFFFFFFFC0C0C0000000000000FFFFFFFFFFFFFFFFFF
  246.           FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  247.           FFFFFFC0C0C0000000FFFFFFFFFFFFFFFFFF000000000000C0C0C0FFFFFFFFFF
  248.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
  249.           FFFFFFFFFFFFFFFFFFFF000000C0C0C0FFFFFFC0C0C0000000000000FFFFFFFF
  250.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
  251.           FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF000000000000C0C0C0
  252.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
  253.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C00000000000
  254.           00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFF
  255.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000000000
  256.           0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  257.           0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0
  258.           000000000000C0C0C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  259.           FFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  260.           FFFFFFFFC0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  261.           FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  262.           FFFFFFFFFFFFFFFFC0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  263.           FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  264.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  265.           FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
  266.         GlyphMask.Data = {00000000}
  267.         OnClick = bAbacusClick
  268.       end
  269.     end
  270.   end
  271.   object dockLeft: TDock97
  272.     Left = 0
  273.     Top = 33
  274.     Width = 9
  275.     Height = 476
  276.     Position = dpLeft
  277.   end
  278.   object dockRight: TDock97
  279.     Left = 545
  280.     Top = 33
  281.     Width = 9
  282.     Height = 476
  283.     Position = dpRight
  284.   end
  285.   object dockBottom: TDock97
  286.     Left = 0
  287.     Top = 509
  288.     Width = 554
  289.     Height = 9
  290.     Position = dpBottom
  291.   end
  292.   object pnWindow: TPanel
  293.     Left = 9
  294.     Top = 33
  295.     Width = 536
  296.     Height = 476
  297.     Align = alClient
  298.     BevelOuter = bvNone
  299.     TabOrder = 0
  300.     object Split1: TSplitter
  301.       Left = 0
  302.       Top = 161
  303.       Width = 536
  304.       Height = 4
  305.       Cursor = crVSplit
  306.       Align = alTop
  307.       AutoSnap = False
  308.       MinSize = 1
  309.       ResizeStyle = rsUpdate
  310.     end
  311.     object pnMLV: TPanel
  312.       Tag = 11
  313.       Left = 0
  314.       Top = 0
  315.       Width = 536
  316.       Height = 161
  317.       Align = alTop
  318.       BevelOuter = bvNone
  319.       BorderWidth = 2
  320.       TabOrder = 0
  321.       object MLV: TMessageListView
  322.         Left = 2
  323.         Top = 19
  324.         Width = 532
  325.         Height = 140
  326.         HelpContext = 11013
  327.         Align = alClient
  328.         BorderStyle = bsNone
  329.         ColCount = 10
  330.         DefaultRowHeight = 16
  331.         DefaultDrawing = False
  332.         FixedCols = 0
  333.         RowCount = 1
  334.         FixedRows = 0
  335.         Options = [goThumbTracking]
  336.         PopupMenu = MessagePopup
  337.         TabOrder = 0
  338.         OnClick = MLVClick
  339.         OnDblClick = MLVDblClick
  340.         OnKeyDown = MLVKeyDown
  341.         Sorting = 0
  342.         Threading = mlvtNone
  343.         Header = hMLV
  344.         OnColumnsChange = MLVColumnsChange
  345.         OnListChange = MLVListChange
  346.       end
  347.       object hMLV: THeaderControl
  348.         Left = 2
  349.         Top = 2
  350.         Width = 532
  351.         Height = 17
  352.         Hint = 'nograb'
  353.         Sections = <>
  354.         OnMouseDown = hMLVMouseDown
  355.         OnMouseUp = hMLVMouseUp
  356.       end
  357.     end
  358.     object MsgPanel: TPanel
  359.       Left = 0
  360.       Top = 165
  361.       Width = 536
  362.       Height = 311
  363.       Align = alClient
  364.       BevelOuter = bvNone
  365.       TabOrder = 1
  366.       inline VFrame: TMsgViewFrame
  367.         Left = 0
  368.         Top = 0
  369.         Width = 536
  370.         Height = 311
  371.         Align = alClient
  372.         Constraints.MinHeight = 100
  373.         Constraints.MinWidth = 100
  374.         TabOrder = 0
  375.         inherited pnRece: TPanel
  376.           Top = 262
  377.           Width = 536
  378.           inherited pbRece: TProgressBar
  379.             Width = 534
  380.           end
  381.         end
  382.         inherited pnHeader: TPanel
  383.           Tag = 11
  384.           Width = 536
  385.           BorderWidth = 0
  386.           inherited eSize: TMemo
  387.             Left = 396
  388.             Top = 2
  389.             Height = 53
  390.           end
  391.           inherited gAddr: TAddressGrid
  392.             Left = 2
  393.             Top = 2
  394.             Width = 394
  395.             Height = 53
  396.             ColWidths = (
  397.               16
  398.               378)
  399.           end
  400.           inherited pnAttachButton: TPanel
  401.             Left = 503
  402.             Top = 2
  403.             Height = 53
  404.           end
  405.           inherited pnSecurity: TPanel
  406.             Left = 467
  407.             Top = 2
  408.             Height = 53
  409.           end
  410.         end
  411.         inherited pnMsg: TPanel
  412.           Width = 536
  413.           Height = 205
  414.           inherited Split1: TSplitter
  415.             Height = 205
  416.           end
  417.           inherited pnView: TPanel
  418.             Width = 401
  419.             Height = 205
  420.             inherited tsTabs: TTabSet
  421.               Top = 182
  422.               Width = 397
  423.             end
  424.           end
  425.           inherited pnAttachAligner: TPanel
  426.             Height = 205
  427.             inherited lvFiles: TListView
  428.               Height = 201
  429.             end
  430.           end
  431.         end
  432.       end
  433.     end
  434.   end
  435.   object AttachImages: TImageList
  436.     Height = 32
  437.     Width = 32
  438.     Left = 232
  439.     Top = 272
  440.   end
  441.   object MessagePopup: TPopupMenu
  442.     OnPopup = MessagePopupPopup
  443.     Left = 336
  444.     Top = 272
  445.     object mmNextUR: TMenuItem
  446.       Tag = 1
  447.       Caption = 'Move to &Next Unread'
  448.       ShortCut = 16605
  449.       Visible = False
  450.       OnClick = mNextURClick
  451.     end
  452.     object mmPrevUR: TMenuItem
  453.       Tag = -1
  454.       Caption = 'Move to Pre&vious Unread'
  455.       ShortCut = 16603
  456.       Visible = False
  457.       OnClick = mNextURClick
  458.     end
  459.     object Movetonextunread2: TMenuItem
  460.       Tag = 1
  461.       Caption = 'Move to next unread'
  462.       ShortCut = 49191
  463.       OnClick = mNextURClick
  464.     end
  465.     object Movetopreviousunread2: TMenuItem
  466.       Tag = -1
  467.       Caption = 'Move to previous unread'
  468.       ShortCut = 49189
  469.       OnClick = mNextURClick
  470.     end
  471.     object Movetonextunread4: TMenuItem
  472.       Tag = 1
  473.       Caption = 'Move to next unread'
  474.       ShortCut = 16423
  475.       Visible = False
  476.       OnClick = mNextURClick
  477.     end
  478.     object Movetopreviousunread4: TMenuItem
  479.       Tag = -1
  480.       Caption = 'Move to previous unread'
  481.       ShortCut = 16421
  482.       Visible = False
  483.       OnClick = mNextURClick
  484.     end
  485.     object N21: TMenuItem
  486.       Caption = '-'
  487.     end
  488.     object mpNew: TMenuItem
  489.       Caption = 'Create a Ne&w Message...'
  490.       Default = True
  491.       ShortCut = 16462
  492.       OnClick = mpNewClick
  493.     end
  494.     object mmFindMsg: TMenuItem
  495.       Caption = '&Find a message'
  496.       ShortCut = 16454
  497.       Visible = False
  498.       OnClick = mmFindMsgClick
  499.     end
  500.     object mOpenMessage: TMenuItem
  501.       Caption = '&Open '
  502.       ShortCut = 13
  503.       OnClick = mOpenMessageClick
  504.     end
  505.     object mpReply: TMenuItem
  506.       Caption = '&Reply...'
  507.       ShortCut = 16466
  508.       Visible = False
  509.       OnClick = mvReplyClick
  510.     end
  511.     object mReplyMessage: TMenuItem
  512.       Caption = '&Reply...'
  513.       ShortCut = 16397
  514.       OnClick = mvReplyClick
  515.     end
  516.     object mFwdMessage: TMenuItem
  517.       Tag = 1
  518.       Caption = '&Forward...'
  519.       ShortCut = 8205
  520.       OnClick = mvReplyClick
  521.     end
  522.     object mmRedirect: TMenuItem
  523.       Tag = 4
  524.       Caption = 'R&edirect'
  525.       ShortCut = 16453
  526.       OnClick = mvReplyClick
  527.     end
  528.     object mmThread: TMenuItem
  529.       Caption = '&Thread'
  530.       object mmtCopy: TMenuItem
  531.         Caption = '&Copy'
  532.         ShortCut = 16468
  533.         OnClick = mmtCopyClick
  534.       end
  535.       object mmtMove: TMenuItem
  536.         Tag = 1
  537.         Caption = '&Move'
  538.         ShortCut = 24662
  539.         OnClick = mmtCopyClick
  540.       end
  541.       object mmtDelete: TMenuItem
  542.         Tag = 2
  543.         Caption = '&Delete'
  544.         ShortCut = 24622
  545.         OnClick = mmtCopyClick
  546.       end
  547.       object N22: TMenuItem
  548.         Caption = '-'
  549.       end
  550.       object mmtMarkRead: TMenuItem
  551.         Tag = 3
  552.         Caption = 'Mark as &Read'
  553.         ShortCut = 24653
  554.         OnClick = mmtCopyClick
  555.       end
  556.       object mmtMarkUnread: TMenuItem
  557.         Tag = 4
  558.         Caption = 'Mark as &Unread'
  559.         ShortCut = 24661
  560.         OnClick = mmtCopyClick
  561.       end
  562.       object mmtPark: TMenuItem
  563.         Tag = 5
  564.         Caption = '&Park'
  565.         OnClick = mmtCopyClick
  566.       end
  567.       object mmtUnpark: TMenuItem
  568.         Tag = 6
  569.         Caption = 'Unp&ark'
  570.         OnClick = mmtCopyClick
  571.       end
  572.     end
  573.     object N17: TMenuItem
  574.       Caption = '-'
  575.     end
  576.     object mvCopy: TMenuItem
  577.       Tag = 1
  578.       Caption = '&Copy to Folder...'
  579.       ShortCut = 16451
  580.       OnClick = mvCopyClick
  581.     end
  582.     object mvMove: TMenuItem
  583.       Caption = '&Move to Folder...'
  584.       ShortCut = 16470
  585.       OnClick = mvCopyClick
  586.     end
  587.     object mSaveMessage: TMenuItem
  588.       Caption = '&Save as...'
  589.       ShortCut = 16467
  590.       OnClick = mSaveMessageClick
  591.     end
  592.     object mDelMessage: TMenuItem
  593.       Caption = '&Delete'
  594.       ShortCut = 46
  595.       OnClick = mvDeleteClick
  596.     end
  597.     object mmAltDel: TMenuItem
  598.       Tag = 1
  599.       Caption = 'Alternative Delete'
  600.       ShortCut = 8238
  601.       Visible = False
  602.       OnClick = mvDeleteClick
  603.     end
  604.     object mpSpecials: TMenuItem
  605.       Caption = 'Specials'
  606.       object mmAddAddress: TMenuItem
  607.         Caption = '&Add sender to Address Book'
  608.         ShortCut = 16471
  609.         OnClick = msAddAddrClick
  610.       end
  611.       object mmAddRecipient: TMenuItem
  612.         Tag = 1
  613.         Caption = 'Add &recipient to Address Book'
  614.         ShortCut = 24663
  615.         OnClick = msAddAddrClick
  616.       end
  617.       object mmDeleteAddress: TMenuItem
  618.         Caption = '&Delete from Address Book'
  619.         ShortCut = 16450
  620.         OnClick = msDelAddrClick
  621.       end
  622.       object mmDelRecipient: TMenuItem
  623.         Tag = 1
  624.         Caption = 'D&elete recipient from Address Book'
  625.         ShortCut = 24642
  626.         OnClick = msDelAddrClick
  627.       end
  628.       object mmMakeFilter: TMenuItem
  629.         Caption = '&Create Filter...'
  630.         ShortCut = 24646
  631.         OnClick = msCreateFilterClick
  632.       end
  633.       object mmFindReply: TMenuItem
  634.         Caption = '&Open Reply'
  635.         ShortCut = 16392
  636.         OnClick = msOpenReplyClick
  637.       end
  638.       object N11: TMenuItem
  639.         Caption = '-'
  640.       end
  641.       object mmMarkSPAM: TMenuItem
  642.         Tag = 1
  643.         Caption = 'Mark as Junk'
  644.         OnClick = mMarkSPAMClick
  645.       end
  646.       object mmMarkHAM: TMenuItem
  647.         Caption = 'Mark as NOT Junk'
  648.         OnClick = mMarkSPAMClick
  649.       end
  650.       object N29: TMenuItem
  651.         Caption = '-'
  652.       end
  653.       object mmPark: TMenuItem
  654.         Caption = '&Park'
  655.         ShortCut = 16458
  656.         OnClick = msParkClick
  657.       end
  658.       object mmUnpark: TMenuItem
  659.         Tag = 1
  660.         Caption = '&Unpark'
  661.         ShortCut = 16452
  662.         OnClick = msParkClick
  663.       end
  664.       object N32: TMenuItem
  665.         Caption = '-'
  666.       end
  667.       object ReplyQuotingselectedtext1: TMenuItem
  668.         Tag = 7
  669.         Caption = 'Reply &Quoting selected text'
  670.         ShortCut = 115
  671.         OnClick = mvReplyClick
  672.       end
  673.       object Replywithoutquotation1: TMenuItem
  674.         Tag = 5
  675.         Caption = 'Reply &without quotation'
  676.         ShortCut = 8307
  677.         OnClick = mvReplyClick
  678.       end
  679.       object ReplytotheSender1: TMenuItem
  680.         Tag = 6
  681.         Caption = 'Reply to the &Sender'
  682.         ShortCut = 16499
  683.         OnClick = mvReplyClick
  684.       end
  685.       object mlAlternativeForward: TMenuItem
  686.         Tag = 10
  687.         Caption = 'Alternative &Forward'
  688.         ShortCut = 41076
  689.         OnClick = mvReplyClick
  690.       end
  691.     end
  692.     object N5: TMenuItem
  693.       Caption = '-'
  694.     end
  695.     object mmMarkunread: TMenuItem
  696.       Caption = 'Mark as &Unread'
  697.       ShortCut = 16469
  698.       OnClick = mvUnreadClick
  699.     end
  700.     object mmMarkRead: TMenuItem
  701.       Tag = 1
  702.       Caption = 'Mark &as Read'
  703.       ShortCut = 16461
  704.       OnClick = mvUnreadClick
  705.     end
  706.     object mmFlags: TMenuItem
  707.       Caption = 'F&lags'
  708.       Visible = False
  709.       object mmf_Flagged: TMenuItem
  710.         Tag = 2
  711.         Caption = '&Flagged'
  712.         ShortCut = 16455
  713.         OnClick = mf_FlaggedClick
  714.       end
  715.       object mmf_Replied: TMenuItem
  716.         Tag = 1
  717.         Caption = '&Replied'
  718.         OnClick = mf_FlaggedClick
  719.       end
  720.       object mmf_Forwarded: TMenuItem
  721.         Tag = 3
  722.         Caption = 'F&orwarded/Redirected'
  723.         OnClick = mf_FlaggedClick
  724.       end
  725.       object N27: TMenuItem
  726.         Caption = '-'
  727.         OnClick = mf_FlaggedClick
  728.       end
  729.       object mmf_NormalPty: TMenuItem
  730.         Tag = 5
  731.         Caption = '&Normal priority'
  732.         GroupIndex = 10
  733.         RadioItem = True
  734.         OnClick = mf_FlaggedClick
  735.       end
  736.       object mmf_HighPty: TMenuItem
  737.         Tag = 7
  738.         Caption = '&High priority'
  739.         GroupIndex = 10
  740.         RadioItem = True
  741.         OnClick = mf_FlaggedClick
  742.       end
  743.       object mmf_LowPty: TMenuItem
  744.         Tag = 6
  745.         Caption = '&Low priority'
  746.         GroupIndex = 10
  747.         RadioItem = True
  748.         OnClick = mf_FlaggedClick
  749.       end
  750.     end
  751.     object mmColors: TMenuItem
  752.       Caption = 'Colour &Group'
  753.     end
  754.     object mmRemindLater: TMenuItem
  755.       Caption = 'Remind later'
  756.     end
  757.     object mlMovedown: TMenuItem
  758.       Caption = 'Move Down'
  759.       ShortCut = 32
  760.       Visible = False
  761.       OnClick = mlMovedownClick
  762.     end
  763.     object Popup3: TMenuItem
  764.       Tag = 2
  765.       Caption = 'Popup'
  766.       ShortCut = 32889
  767.       Visible = False
  768.       OnClick = Popup1Click
  769.     end
  770.     object N6: TMenuItem
  771.       Caption = '-'
  772.     end
  773.     object mlSelectAll: TMenuItem
  774.       Caption = 'Selec&t All'
  775.       ShortCut = 16449
  776.       OnClick = mlSelectAllClick
  777.     end
  778.   end
  779.   object ViewMenu: TMainMenu
  780.     Left = 264
  781.     Top = 272
  782.     object mMessage: TMenuItem
  783.       Caption = '&Message'
  784.       OnClick = mMessageClick
  785.       object mvNew: TMenuItem
  786.         Caption = '&New'
  787.         ShortCut = 16462
  788.         OnClick = mpNewClick
  789.       end
  790.       object mvReply: TMenuItem
  791.         Caption = 'Repl&y...'
  792.         ShortCut = 16500
  793.         OnClick = mvReplyClick
  794.       end
  795.       object Reply1: TMenuItem
  796.         Caption = '&Reply...'
  797.         ShortCut = 16466
  798.         Visible = False
  799.         OnClick = mvReplyClick
  800.       end
  801.       object mvReplyAll: TMenuItem
  802.         Tag = 2
  803.         Caption = 'Reply to &All'
  804.         ShortCut = 24692
  805.         OnClick = mvReplyClick
  806.       end
  807.       object mvForward: TMenuItem
  808.         Tag = 1
  809.         Caption = 'For&ward...'
  810.         ShortCut = 8308
  811.         OnClick = mvReplyClick
  812.       end
  813.       object mvResend: TMenuItem
  814.         Caption = 'R&e-send'
  815.         ShortCut = 24612
  816.         OnClick = mvResendClick
  817.       end
  818.       object Resend1: TMenuItem
  819.         Caption = 'Re-s&end'
  820.         ShortCut = 8309
  821.         Visible = False
  822.         OnClick = mvResendClick
  823.       end
  824.       object mvRedirect: TMenuItem
  825.         Tag = 4
  826.         Caption = 'Redirec&t'
  827.         ShortCut = 16501
  828.         OnClick = mvReplyClick
  829.       end
  830.       object N28: TMenuItem
  831.         Caption = '-'
  832.       end
  833.       object mvDelete: TMenuItem
  834.         Caption = '&Delete'
  835.         ShortCut = 46
  836.         OnClick = mvDeleteClick
  837.       end
  838.       object mAltDel: TMenuItem
  839.         Tag = 1
  840.         Caption = 'Alternative Delete'
  841.         ShortCut = 8238
  842.         Visible = False
  843.         OnClick = mvDeleteClick
  844.       end
  845.       object mCopytoFolder: TMenuItem
  846.         Tag = 1
  847.         Caption = '&Copy to Folder...'
  848.         OnClick = mCopytoFolderClick
  849.       end
  850.       object mMovetoFolder: TMenuItem
  851.         Caption = '&Move to Folder...'
  852.         OnClick = mCopytoFolderClick
  853.       end
  854.       object mvSaveAs: TMenuItem
  855.         Caption = '&Save as...'
  856.         ShortCut = 32884
  857.         OnClick = mvSaveAsClick
  858.       end
  859.       object mvPrint: TMenuItem
  860.         Caption = '&Print...'
  861.         ShortCut = 16464
  862.         OnClick = mvPrintClick
  863.       end
  864.       object mAttachments: TMenuItem
  865.         Caption = 'Attachments'
  866.         Visible = False
  867.         object mAttOpen: TMenuItem
  868.           Tag = 1
  869.           Caption = '&Open...'
  870.         end
  871.         object mAttSave: TMenuItem
  872.           Caption = '&Save...'
  873.         end
  874.         object mAttDelete: TMenuItem
  875.           Tag = 3
  876.           Caption = '&Delete'
  877.         end
  878.         object mAttPrint: TMenuItem
  879.           Tag = 2
  880.           Caption = '&Print...'
  881.         end
  882.         object mAttImportKey: TMenuItem
  883.           Tag = 4
  884.           Caption = '&Import Key'
  885.         end
  886.         object N31: TMenuItem
  887.           Caption = '-'
  888.         end
  889.         object mAttSaveAllAttachments: TMenuItem
  890.           Tag = 44
  891.           Caption = 'Save &All Attachments...'
  892.         end
  893.       end
  894.       object N1: TMenuItem
  895.         Caption = '-'
  896.       end
  897.       object mvUnread: TMenuItem
  898.         Caption = 'Mark as &Unread'
  899.         ShortCut = 16469
  900.         OnClick = mvUnreadClick
  901.       end
  902.       object mvRead: TMenuItem
  903.         Tag = 1
  904.         Caption = 'Mark as &Read'
  905.         ShortCut = 16461
  906.         OnClick = mvUnreadClick
  907.       end
  908.       object msPark: TMenuItem
  909.         Caption = 'Par&k'
  910.         ShortCut = 16458
  911.         OnClick = msParkClick
  912.       end
  913.       object msUnpark: TMenuItem
  914.         Tag = 1
  915.         Caption = 'Unpark'
  916.         ShortCut = 16452
  917.         OnClick = msParkClick
  918.       end
  919.       object mFlags: TMenuItem
  920.         Caption = '&Flags'
  921.         object mf_Flagged: TMenuItem
  922.           Tag = 2
  923.           Caption = '&Flagged'
  924.           OnClick = mf_FlaggedClick
  925.         end
  926.         object mf_Replied: TMenuItem
  927.           Tag = 1
  928.           Caption = '&Replied'
  929.           OnClick = mf_FlaggedClick
  930.         end
  931.         object mf_Forwarded: TMenuItem
  932.           Tag = 3
  933.           Caption = 'F&orwarded/Redirected'
  934.           OnClick = mf_FlaggedClick
  935.         end
  936.         object N13: TMenuItem
  937.           Caption = '-'
  938.           OnClick = mf_FlaggedClick
  939.         end
  940.         object mf_NormalPty: TMenuItem
  941.           Tag = 5
  942.           Caption = '&Normal priority'
  943.           GroupIndex = 10
  944.           RadioItem = True
  945.           OnClick = mf_FlaggedClick
  946.         end
  947.         object mf_HighPty: TMenuItem
  948.           Tag = 7
  949.           Caption = '&High priority'
  950.           GroupIndex = 10
  951.           RadioItem = True
  952.           OnClick = mf_FlaggedClick
  953.         end
  954.         object mf_LowPty: TMenuItem
  955.           Tag = 6
  956.           Caption = '&Low priority'
  957.           GroupIndex = 10
  958.           RadioItem = True
  959.           OnClick = mf_FlaggedClick
  960.         end
  961.       end
  962.       object mColors: TMenuItem
  963.         Caption = 'Colour &Group'
  964.       end
  965.       object N9: TMenuItem
  966.         Caption = '-'
  967.       end
  968.       object mvExit: TMenuItem
  969.         Caption = 'E&xit'
  970.         ShortCut = 27
  971.         OnClick = mvExitClick
  972.       end
  973.     end
  974.     object mEdit: TMenuItem
  975.       Caption = '&Edit'
  976.       OnClick = mEditClick
  977.       object meCopy: TMenuItem
  978.         Tag = 1
  979.         Caption = '&Copy'
  980.         Enabled = False
  981.         OnClick = meCopyClick
  982.       end
  983.       object meCopyTo: TMenuItem
  984.         Tag = 1
  985.         Caption = 'Copy &to...'
  986.         Enabled = False
  987.         OnClick = meCopyToClick
  988.       end
  989.       object N15: TMenuItem
  990.         Caption = '-'
  991.       end
  992.       object mfFind: TMenuItem
  993.         Caption = '&Find...'
  994.         ShortCut = 16454
  995.         OnClick = mfFindClick
  996.       end
  997.       object mf_FindNext: TMenuItem
  998.         Caption = 'Find Next'
  999.         ShortCut = 114
  1000.         Visible = False
  1001.         OnClick = mfFindNextClick
  1002.       end
  1003.       object mfFindNext: TMenuItem
  1004.         Caption = 'Find &Next'
  1005.         ShortCut = 16460
  1006.         OnClick = mfFindNextClick
  1007.       end
  1008.     end
  1009.     object mSpecials: TMenuItem
  1010.       Caption = '&Specials'
  1011.       OnClick = mSpecialsClick
  1012.       object msAddAddr: TMenuItem
  1013.         Caption = '&Add Sender to Address Book'
  1014.         ShortCut = 16471
  1015.         OnClick = msAddAddrClick
  1016.       end
  1017.       object msAddrecipient: TMenuItem
  1018.         Tag = 1
  1019.         Caption = 'Add &Recipient to Address Book'
  1020.         ShortCut = 24663
  1021.         OnClick = msAddAddrClick
  1022.       end
  1023.       object msDelAddr: TMenuItem
  1024.         Caption = '&Delete from Address Book'
  1025.         ShortCut = 16450
  1026.         OnClick = msDelAddrClick
  1027.       end
  1028.       object msDeleteRecipient: TMenuItem
  1029.         Tag = 1
  1030.         Caption = 'D&elete recipient from Address Book'
  1031.         ShortCut = 24642
  1032.         OnClick = msDelAddrClick
  1033.       end
  1034.       object msCreateFilter: TMenuItem
  1035.         Caption = '&Create filter...'
  1036.         ShortCut = 24646
  1037.         OnClick = msCreateFilterClick
  1038.       end
  1039.       object msOpenReply: TMenuItem
  1040.         Caption = '&Open reply'
  1041.         ShortCut = 16392
  1042.         OnClick = msOpenReplyClick
  1043.       end
  1044.       object mRemindLater: TMenuItem
  1045.         Caption = 'Remind later'
  1046.       end
  1047.       object N2: TMenuItem
  1048.         Caption = '-'
  1049.       end
  1050.       object mMarkSPAM: TMenuItem
  1051.         Tag = 1
  1052.         Caption = 'Mark as Junk'
  1053.         OnClick = mMarkSPAMClick
  1054.       end
  1055.       object mMarkHAM: TMenuItem
  1056.         Caption = 'Mark as NOT Junk'
  1057.         OnClick = mMarkSPAMClick
  1058.       end
  1059.       object N23: TMenuItem
  1060.         Caption = '-'
  1061.       end
  1062.       object mvReplySelected: TMenuItem
  1063.         Tag = 7
  1064.         Caption = 'Reply &Quoting selected text'
  1065.         ShortCut = 115
  1066.         OnClick = mvReplyClick
  1067.       end
  1068.       object mvReplyNoQuotes: TMenuItem
  1069.         Tag = 5
  1070.         Caption = 'Reply &without quotation'
  1071.         ShortCut = 8307
  1072.         OnClick = mvReplyClick
  1073.       end
  1074.       object mvReplySender: TMenuItem
  1075.         Tag = 6
  1076.         Caption = 'Reply to the &Sender'
  1077.         ShortCut = 16499
  1078.         OnClick = mvReplyClick
  1079.       end
  1080.       object mAltForward: TMenuItem
  1081.         Tag = 10
  1082.         Caption = 'Alternative &Forward'
  1083.         ShortCut = 41076
  1084.         OnClick = mvReplyClick
  1085.       end
  1086.       object N10: TMenuItem
  1087.         Caption = '-'
  1088.       end
  1089.       object mViewSource: TMenuItem
  1090.         Caption = '&View source'
  1091.         ShortCut = 120
  1092.         OnClick = mViewSourceClick
  1093.       end
  1094.       object N33: TMenuItem
  1095.         Caption = '-'
  1096.       end
  1097.       object mMailList: TMenuItem
  1098.         Caption = '&Mailing list'
  1099.         object mlmGetHelp: TMenuItem
  1100.           Tag = 1
  1101.           Caption = '&Get help'
  1102.         end
  1103.         object mlmUnsubscribe: TMenuItem
  1104.           Tag = 2
  1105.           Caption = '&Unsubscribe'
  1106.         end
  1107.         object mlmSubscribe: TMenuItem
  1108.           Tag = 3
  1109.           Caption = '&Subscribe'
  1110.         end
  1111.         object mlmPost: TMenuItem
  1112.           Tag = 4
  1113.           Caption = '&Post message'
  1114.         end
  1115.         object mlmViewArchive: TMenuItem
  1116.           Tag = 6
  1117.           Caption = '&View archive'
  1118.         end
  1119.         object mlmContactListOwner: TMenuItem
  1120.           Tag = 5
  1121.           Caption = '&Contact List Owner'
  1122.         end
  1123.       end
  1124.     end
  1125.     object mNavigation: TMenuItem
  1126.       Caption = '&Navigation'
  1127.       OnClick = mNavigationClick
  1128.       object mnPrev: TMenuItem
  1129.         Caption = '&Follow previous'
  1130.         ShortCut = 16422
  1131.         OnClick = mnPrevClick
  1132.       end
  1133.       object mnNext: TMenuItem
  1134.         Caption = 'Follo&w next'
  1135.         ShortCut = 16424
  1136.         OnClick = mnNextClick
  1137.       end
  1138.       object Movetonextunread1: TMenuItem
  1139.         Tag = 1
  1140.         Caption = 'Move to next unread'
  1141.         ShortCut = 49191
  1142.         OnClick = mNextURClick
  1143.       end
  1144.       object Movetopreviousunread1: TMenuItem
  1145.         Tag = -1
  1146.         Caption = 'Move to previous unread'
  1147.         ShortCut = 49189
  1148.         OnClick = mNextURClick
  1149.       end
  1150.       object mnGoPrevRead: TMenuItem
  1151.         Tag = -1
  1152.         Caption = 'Move to Previously viewed'
  1153.         ShortCut = 32805
  1154.         OnClick = mnGoPrevReadClick
  1155.       end
  1156.       object mnGoNextRead: TMenuItem
  1157.         Tag = 1
  1158.         Caption = 'Move to Next viewed'
  1159.         ShortCut = 32807
  1160.         OnClick = mnGoPrevReadClick
  1161.       end
  1162.       object N4: TMenuItem
  1163.         Caption = '-'
  1164.       end
  1165.       object mnDelNext: TMenuItem
  1166.         Tag = 1
  1167.         Caption = 'Delete and follow &next'
  1168.         ShortCut = 24614
  1169.         OnClick = mvDeleteClick
  1170.       end
  1171.       object mnDelPrev: TMenuItem
  1172.         Tag = -1
  1173.         Caption = 'Delete and follow pr&evious'
  1174.         ShortCut = 24616
  1175.         OnClick = mnDelPrevClick
  1176.       end
  1177.       object N7: TMenuItem
  1178.         Caption = '-'
  1179.       end
  1180.       object mChangeFolder: TMenuItem
  1181.         Caption = '&Go to a folder...'
  1182.         ShortCut = 24647
  1183.         OnClick = mChangeFolderClick
  1184.       end
  1185.     end
  1186.     object mSecurity: TMenuItem
  1187.       Caption = '&Privacy'
  1188.       OnClick = mSecurityClick
  1189.       object VerifySignature1: TMenuItem
  1190.         Caption = '&Verify Signature'
  1191.         ShortCut = 24643
  1192.       end
  1193.       object Decrypt1: TMenuItem
  1194.         Tag = 1
  1195.         Caption = '&Decrypt'
  1196.         ShortCut = 24644
  1197.       end
  1198.       object ImportKeyCertificate1: TMenuItem
  1199.         Tag = 2
  1200.         Caption = '&Import Key/Certificate'
  1201.       end
  1202.     end
  1203.     object mView: TMenuItem
  1204.       Caption = '&View'
  1205.       OnClick = mViewClick
  1206.       object mvShowToolbar: TMenuItem
  1207.         Tag = 9
  1208.         Caption = '&Toolbar'
  1209.         Checked = True
  1210.         OnClick = mvShowToolbarClick
  1211.       end
  1212.       object mvShowMsgList: TMenuItem
  1213.         Tag = 8
  1214.         Caption = '&Message List'
  1215.         Checked = True
  1216.         OnClick = mvShowMsgListClick
  1217.       end
  1218.       object N12: TMenuItem
  1219.         Caption = '-'
  1220.       end
  1221.       object mmfDisplay: TMenuItem
  1222.         Caption = '&Display'
  1223.         OnClick = mmfDisplayClick
  1224.         object mmfAll: TMenuItem
  1225.           Caption = '&All messages'
  1226.           GroupIndex = 8
  1227.           RadioItem = True
  1228.           ShortCut = 16571
  1229.           OnClick = mmfAllClick
  1230.         end
  1231.         object mmfUnread: TMenuItem
  1232.           Caption = 'Only &Unread messages'
  1233.           GroupIndex = 20
  1234.           RadioItem = True
  1235.           OnClick = mmfUnreadClick
  1236.         end
  1237.         object mmfRead: TMenuItem
  1238.           Tag = 1
  1239.           Caption = 'Only &Read messages'
  1240.           GroupIndex = 20
  1241.           RadioItem = True
  1242.           OnClick = mmfUnreadClick
  1243.         end
  1244.         object mmfFlagged: TMenuItem
  1245.           Tag = 6
  1246.           Caption = 'Only &Flagged messages'
  1247.           GroupIndex = 20
  1248.           OnClick = mmfUnreadClick
  1249.         end
  1250.         object mmfUnflagged: TMenuItem
  1251.           Tag = 7
  1252.           Caption = 'Only Non-f&lagged messages'
  1253.           GroupIndex = 20
  1254.           OnClick = mmfUnreadClick
  1255.         end
  1256.         object mmfParked: TMenuItem
  1257.           Tag = 2
  1258.           Caption = 'Only &Parked messages'
  1259.           GroupIndex = 21
  1260.           RadioItem = True
  1261.           OnClick = mmfUnreadClick
  1262.         end
  1263.         object mmfUnparked: TMenuItem
  1264.           Tag = 3
  1265.           Caption = 'Only U&nparked messages'
  1266.           GroupIndex = 21
  1267.           RadioItem = True
  1268.           OnClick = mmfUnreadClick
  1269.         end
  1270.         object mmfAttach: TMenuItem
  1271.           Tag = 4
  1272.           Caption = 'Only messages with &Attachments'
  1273.           GroupIndex = 22
  1274.           RadioItem = True
  1275.           OnClick = mmfUnreadClick
  1276.         end
  1277.         object mmfNoAttach: TMenuItem
  1278.           Tag = 5
  1279.           Caption = 'Only messages &without Attachments'
  1280.           GroupIndex = 22
  1281.           RadioItem = True
  1282.           OnClick = mmfUnreadClick
  1283.         end
  1284.         object N19: TMenuItem
  1285.           Caption = '-'
  1286.           GroupIndex = 22
  1287.         end
  1288.         object mmfAdvanced: TMenuItem
  1289.           Caption = 'Ad&vanced filtering...'
  1290.           GroupIndex = 23
  1291.           OnClick = mmfAdvancedClick
  1292.         end
  1293.       end
  1294.       object mmsSort: TMenuItem
  1295.         Caption = '&Sort by'
  1296.         OnClick = mmsSortClick
  1297.         object mmsReceived: TMenuItem
  1298.           Tag = 6
  1299.           Caption = '&Received time'
  1300.           GroupIndex = 10
  1301.           RadioItem = True
  1302.           ShortCut = 16433
  1303.           OnClick = mmsReceivedClick
  1304.         end
  1305.         object mmsCreation: TMenuItem
  1306.           Tag = 5
  1307.           Caption = '&Creation time'
  1308.           GroupIndex = 10
  1309.           RadioItem = True
  1310.           ShortCut = 16434
  1311.           OnClick = mmsReceivedClick
  1312.         end
  1313.         object mmsSize: TMenuItem
  1314.           Tag = 9
  1315.           Caption = 'Si&ze'
  1316.           GroupIndex = 10
  1317.           RadioItem = True
  1318.           ShortCut = 16435
  1319.           OnClick = mmsReceivedClick
  1320.         end
  1321.         object mmsSender: TMenuItem
  1322.           Tag = 2
  1323.           Caption = '&From'
  1324.           GroupIndex = 10
  1325.           RadioItem = True
  1326.           ShortCut = 16436
  1327.           OnClick = mmsReceivedClick
  1328.         end
  1329.         object mmsRecipient: TMenuItem
  1330.           Tag = 3
  1331.           Caption = '&To'
  1332.           GroupIndex = 10
  1333.           RadioItem = True
  1334.           ShortCut = 16437
  1335.           OnClick = mmsReceivedClick
  1336.         end
  1337.         object mmsSubject: TMenuItem
  1338.           Tag = 4
  1339.           Caption = '&Subject'
  1340.           GroupIndex = 10
  1341.           RadioItem = True
  1342.           ShortCut = 16438
  1343.           OnClick = mmsReceivedClick
  1344.         end
  1345.         object mmsFlags: TMenuItem
  1346.           Tag = 1
  1347.           Caption = '&Message Flags'
  1348.           GroupIndex = 10
  1349.           RadioItem = True
  1350.           ShortCut = 16439
  1351.           OnClick = mmsReceivedClick
  1352.         end
  1353.         object mmsAttachment: TMenuItem
  1354.           Tag = 8
  1355.           Caption = '&Attachment presence'
  1356.           GroupIndex = 10
  1357.           RadioItem = True
  1358.           ShortCut = 16440
  1359.           OnClick = mmsReceivedClick
  1360.         end
  1361.         object mmsParking: TMenuItem
  1362.           Tag = 9
  1363.           Caption = '&Parking/Draft flag'
  1364.           GroupIndex = 10
  1365.           RadioItem = True
  1366.           ShortCut = 16441
  1367.           OnClick = mmsReceivedClick
  1368.         end
  1369.         object N16: TMenuItem
  1370.           Caption = '-'
  1371.           GroupIndex = 11
  1372.         end
  1373.         object mmsDescending: TMenuItem
  1374.           Caption = '&Descending order'
  1375.           GroupIndex = 11
  1376.           ShortCut = 16432
  1377.           OnClick = mmsDescendingClick
  1378.         end
  1379.       end
  1380.       object mmtThread: TMenuItem
  1381.         Caption = '&View threads by'
  1382.         OnClick = mmtThreadClick
  1383.         object mmtNone: TMenuItem
  1384.           Caption = '&None'
  1385.           GroupIndex = 12
  1386.           RadioItem = True
  1387.           ShortCut = 32816
  1388.           OnClick = mmtNoneClick
  1389.         end
  1390.         object N18: TMenuItem
  1391.           Caption = '-'
  1392.           GroupIndex = 12
  1393.         end
  1394.         object mmtStandard: TMenuItem
  1395.           Tag = 1
  1396.           Caption = '&References (standard)'
  1397.           GroupIndex = 12
  1398.           RadioItem = True
  1399.           ShortCut = 32817
  1400.           OnClick = mmtNoneClick
  1401.         end
  1402.         object mmtSubject: TMenuItem
  1403.           Tag = 2
  1404.           Caption = '&Subject'
  1405.           GroupIndex = 12
  1406.           RadioItem = True
  1407.           ShortCut = 32818
  1408.           OnClick = mmtNoneClick
  1409.         end
  1410.         object mmtFrom: TMenuItem
  1411.           Tag = 3
  1412.           Caption = '&From'
  1413.           GroupIndex = 12
  1414.           RadioItem = True
  1415.           ShortCut = 32819
  1416.           OnClick = mmtNoneClick
  1417.         end
  1418.         object mmtTo: TMenuItem
  1419.           Tag = 4
  1420.           Caption = '&To'
  1421.           GroupIndex = 12
  1422.           RadioItem = True
  1423.           ShortCut = 32820
  1424.           OnClick = mmtNoneClick
  1425.         end
  1426.       end
  1427.       object mvAttach: TMenuItem
  1428.         Caption = '&Attachments'
  1429.         OnClick = mvAttachClick
  1430.         object mvShowAsPane: TMenuItem
  1431.           Caption = 'Show as a &Pane'
  1432.           GroupIndex = 2
  1433.           RadioItem = True
  1434.           OnClick = mvAttPaneTopClick
  1435.         end
  1436.         object mvAttShowAsButton: TMenuItem
  1437.           Tag = 1
  1438.           Caption = 'Show as a &Button'
  1439.           GroupIndex = 2
  1440.           RadioItem = True
  1441.           OnClick = mvAttPaneTopClick
  1442.         end
  1443.         object mvAttachAlwaysHide: TMenuItem
  1444.           Tag = 2
  1445.           Caption = '&Hide'
  1446.           GroupIndex = 2
  1447.           RadioItem = True
  1448.           OnClick = mvAttPaneTopClick
  1449.         end
  1450.         object N30: TMenuItem
  1451.           Tag = -1
  1452.           Caption = '-'
  1453.           GroupIndex = 2
  1454.           OnClick = mvAttPaneTopClick
  1455.         end
  1456.         object mvAttLargeIcons: TMenuItem
  1457.           Caption = '&Large icons'
  1458.           Checked = True
  1459.           GroupIndex = 3
  1460.           RadioItem = True
  1461.           OnClick = mvAttPaneTopClick
  1462.         end
  1463.         object mvAttSmallIcons: TMenuItem
  1464.           Tag = 1
  1465.           Caption = '&Small icons'
  1466.           GroupIndex = 3
  1467.           RadioItem = True
  1468.           OnClick = mvAttPaneTopClick
  1469.         end
  1470.         object N34: TMenuItem
  1471.           Tag = -1
  1472.           Caption = '-'
  1473.           GroupIndex = 3
  1474.           OnClick = mvAttPaneTopClick
  1475.         end
  1476.         object mvAttPaneLeft: TMenuItem
  1477.           Caption = 'Pane on the L&eft'
  1478.           GroupIndex = 4
  1479.           RadioItem = True
  1480.           OnClick = mvAttPaneTopClick
  1481.         end
  1482.         object mvAttPanBottom: TMenuItem
  1483.           Tag = 3
  1484.           Caption = 'Pane on the &Bottom'
  1485.           GroupIndex = 4
  1486.           RadioItem = True
  1487.           OnClick = mvAttPaneTopClick
  1488.         end
  1489.         object mvAttPaneRight: TMenuItem
  1490.           Tag = 1
  1491.           Caption = 'Pane on the &Right'
  1492.           GroupIndex = 4
  1493.           RadioItem = True
  1494.           OnClick = mvAttPaneTopClick
  1495.         end
  1496.         object mvAttPaneTop: TMenuItem
  1497.           Tag = 2
  1498.           Caption = 'Pane on the &Top'
  1499.           GroupIndex = 4
  1500.           RadioItem = True
  1501.           OnClick = mvAttPaneTopClick
  1502.         end
  1503.       end
  1504.       object mmHeaderMenu: TMenuItem
  1505.         Caption = 'Message &Header'
  1506.         GroupIndex = 11
  1507.         OnClick = mmHeaderMenuClick
  1508.       end
  1509.       object mmColumns: TMenuItem
  1510.         Caption = '&Columns...'
  1511.         GroupIndex = 11
  1512.         OnClick = mmColumnsClick
  1513.       end
  1514.       object mvKludges: TMenuItem
  1515.         Caption = 'RFC-&822 headers'
  1516.         GroupIndex = 11
  1517.         ShortCut = 24651
  1518.         OnClick = mvKludgesClick
  1519.       end
  1520.       object N3: TMenuItem
  1521.         Caption = '-'
  1522.         GroupIndex = 11
  1523.       end
  1524.       object mEditShortcuts: TMenuItem
  1525.         Caption = '&Edit shortcuts'
  1526.         GroupIndex = 11
  1527.         ShortCut = 32891
  1528.         OnClick = mEditShortcutsClick
  1529.       end
  1530.       object mRefresh: TMenuItem
  1531.         Caption = '&Refresh'
  1532.         GroupIndex = 11
  1533.         ShortCut = 24658
  1534.         OnClick = mRefreshClick
  1535.       end
  1536.       object N14: TMenuItem
  1537.         Caption = '-'
  1538.         GroupIndex = 11
  1539.       end
  1540.       object mmXlat: TMenuItem
  1541.         Caption = 'Charact&er set'
  1542.         GroupIndex = 11
  1543.         object mtNone: TMenuItem
  1544.           Caption = '&None'
  1545.           GroupIndex = 11
  1546.           RadioItem = True
  1547.         end
  1548.         object N20: TMenuItem
  1549.           Caption = '-'
  1550.           GroupIndex = 11
  1551.         end
  1552.         object N8: TMenuItem
  1553.           Caption = '-'
  1554.           GroupIndex = 12
  1555.         end
  1556.         object mAutodetect: TMenuItem
  1557.           Caption = '&Auto-detect'
  1558.           GroupIndex = 12
  1559.           ShortCut = 32821
  1560.           OnClick = mAutodetectClick
  1561.         end
  1562.         object mSetAsDefault: TMenuItem
  1563.           Caption = '&Set as default'
  1564.           GroupIndex = 12
  1565.           OnClick = mSetAsDefaultClick
  1566.         end
  1567.       end
  1568.       object mmVModes: TMenuItem
  1569.         Caption = 'View mode'
  1570.         GroupIndex = 11
  1571.         object N24: TMenuItem
  1572.           Caption = '-'
  1573.         end
  1574.       end
  1575.     end
  1576.   end
  1577.   object MenuNavigator: TMenuNavigator
  1578.     Left = 325
  1579.     Top = 362
  1580.   end
  1581. end
  1582.