fmailview.dfm

siMail, siMail, siMail, siMail

    ClientAreaHeight = 18
    ClientAreaWidth = 514
    TabOrder = 7
    object Label1: TLabel
      Left = 4
      Top = -2
      Width = 90
      Height = 20
      Caption = 'Mail view'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 6394522
      Font.Height = -17
      Font.Name = 'Courier New'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object TBXToolbar1: TTBXToolbar
      Left = 495
      Top = 0
      Width = 19
      Height = 18
      Align = alRight
      BorderStyle = bsNone
      DockableTo = []
      DockMode = dmCannotFloat
      DragHandleStyle = dhNone
      Resizable = False
      ShowCaption = False
      TabOrder = 0
      object cmdShowMenu: TTBXItem
        ImageIndex = 0
        Images = dmImages.ilArrow
        OnClick = cmdShowMenuClick
      end
    end
    object chkHtmlAsText: TTBXCheckBox
      Left = 345
      Top = 0
      Width = 150
      Height = 18
      Hint = 'text/html message part is shown as text'
      Align = alRight
      Caption = 'Display html as text'
      State = cbChecked
      TabOrder = 1
      Wrapping = twEndEllipsis
      OnClick = chkHtmlAsTextClick
    end
  end
  object alMenus: TActionList
    Left = 352
    Top = 200
    object actSaveAttach: TAction
      Caption = 'Save attachments ...'
      OnExecute = actSaveAttachExecute
    end
    object actFilePrintPrint: TAction
      Category = 'File'
      Caption = 'Print ...'
      ShortCut = 16464
      OnExecute = actFilePrintPrintExecute
      OnUpdate = actFilePrintPrintUpdate
    end
    object actFilePrintPreview: TAction
      Category = 'File'
      Caption = 'Print preview ...'
      OnExecute = actFilePrintPreviewExecute
      OnUpdate = actFilePrintPreviewUpdate
    end
    object actFilePrintSetup: TAction
      Category = 'File'
      Caption = 'Print setup ...'
      OnExecute = actFilePrintSetupExecute
      OnUpdate = actFilePrintSetupUpdate
    end
    object Action2: TAction
      Category = 'File'
      Caption = 'Action2'
    end
    object Action3: TAction
      Category = 'File'
      Caption = 'Action3'
    end
    object Action4: TAction
      Category = 'File'
      Caption = 'Action4'
    end
    object Action5: TAction
      Category = 'File'
      Caption = 'Action5'
    end
    object actDOOffline: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Offline'
      Hint = 'Set view html component to offline mode'
      OnExecute = actDOOfflineExecute
      OnUpdate = actDOOfflineUpdate
    end
    object actDORemoveNonembedded: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Remove nonembedded images'
      OnExecute = actDORemoveNonembeddedExecute
      OnUpdate = actDORemoveNonembeddedUpdate
    end
    object actDOImages: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Images'
      Hint = 'Download images'
      OnExecute = actDOImagesExecute
      OnUpdate = actDOImagesUpdate
    end
    object actDOBackgroundMusic: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Background music'
      Hint = 'Download background music'
      OnExecute = actDOBackgroundMusicExecute
      OnUpdate = actDOBackgroundMusicUpdate
    end
    object actDOVideos: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Videos'
      Hint = 'Download videos'
      OnExecute = actDOVideosExecute
      OnUpdate = actDOVideosUpdate
    end
    object actDOActiveX: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'ActiveX controls'
      Hint = 'Download ActiveX controls'
      OnExecute = actDOActiveXExecute
      OnUpdate = actDOActiveXUpdate
    end
    object actDOScripts: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Scripts'
      Hint = 'Execute page scripts'
      OnExecute = actDOScriptsExecute
      OnUpdate = actDOScriptsUpdate
    end
    object actDOJava: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'Java'
      Hint = 'Execute java applets'
      OnExecute = actDOJavaExecute
      OnUpdate = actDOJavaUpdate
    end
    object actDOActiveXRun: TAction
      Category = 'DownloadOptions'
      AutoCheck = True
      Caption = 'ActiveX controls'
      Hint = 'Do not use ActiveX controls'
      OnExecute = actDOActiveXRunExecute
      OnUpdate = actDOActiveXRunUpdate
    end
  end
  object ilFiles: TImageList
    Left = 352
    Top = 168
  end
  object SaveDialog1: TSaveDialog
    Filter = 'All files (*.*)|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 384
    Top = 168
  end
  object popAttach: TTBXPopupMenu
    Left = 384
    Top = 232
    object Saveattachment1: TTBXItem
      Action = actSaveAttach
    end
  end
  object alToolbar: TActionList
    Images = dmImages.ilMainToolbar
    Left = 384
    Top = 200
    object actTBReply: TAction
      Category = 'Toolbar'
      Caption = '&Reply ...'
      Hint = 'Reply'
      ImageIndex = 1
      OnExecute = actTBReplyExecute
      OnUpdate = actTBReplyUpdate
    end
    object actTBReplyAll: TAction
      Category = 'Toolbar'
      Caption = 'Reply to &all ...'
      Hint = 'Reply to all'
      ImageIndex = 3
      OnExecute = actTBReplyAllExecute
      OnUpdate = actTBReplyUpdate
    end
    object actTBForward: TAction
      Category = 'Toolbar'
      Caption = '&Forward ...'
      Hint = 'Forward'
      ImageIndex = 2
      OnExecute = actTBForwardExecute
      OnUpdate = actTBReplyUpdate
    end
    object actTBPrint: TAction
      Category = 'Toolbar'
      Caption = '&Print ...'
      Hint = 'Print'
      ImageIndex = 4
      OnExecute = actTBPrintExecute
      OnUpdate = actTBPrintUpdate
    end
    object actTBPrevious: TAction
      Category = 'Toolbar'
      Caption = '&Previous'
      Hint = 'Show previous message'
      ImageIndex = 16
    end
    object actTBNext: TAction
      Category = 'Toolbar'
      Caption = '&Next'
      Hint = 'Show next message'
      ImageIndex = 17
    end
    object actTBDelete: TAction
      Category = 'Toolbar'
      Caption = 'Delete'
      Hint = 'Delete message'
      ImageIndex = 18
    end
    object actTBFlag: TAction
      Category = 'Toolbar'
      Caption = 'Flag'
    end
    object actTBCreateRule: TAction
      Category = 'Toolbar'
      Caption = 'Rule ...'
      Hint = 'Create rule'
      ImageIndex = 19
    end
    object actTBAddressBook: TAction
      Category = 'Toolbar'
      Caption = 'actAddressBook'
      Hint = 'Show address book'
      ImageIndex = 9
      OnExecute = actTBAddressBookExecute
    end
    object actTBClose: TAction
      Category = 'Toolbar'
      Caption = '&Close'
      Hint = 'Close window'
      ImageIndex = 15
      OnExecute = actTBCloseExecute
    end
  end
  object popDO: TTBXPopupMenu
    Left = 352
    Top = 232
    object TBXItem16: TTBXItem
      Action = actDOOffline
    end
    object TBXItem22: TTBXItem
      Action = actDORemoveNonembedded
    end
    object TBXItem20: TTBXItem
      Caption = '----- Download -----'
      Enabled = False
      FontSettings.Size = 95
    end
    object TBXItem15: TTBXItem
      Action = actDOImages
    end
    object TBXItem14: TTBXItem
      Action = actDOBackgroundMusic
    end
    object TBXItem13: TTBXItem
      Action = actDOVideos
    end
    object TBXItem17: TTBXItem
      Action = actDOActiveX
    end
    object TBXItem21: TTBXItem
      Caption = '----- Execute -----'
      Enabled = False
      FontSettings.Size = 95
    end
    object TBXItem5: TTBXItem
      Action = actDOScripts
    end
    object TBXItem18: TTBXItem
      Action = actDOJava
    end
    object TBXItem19: TTBXItem
      Action = actDOActiveXRun
    end
  end
end