Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/komunik/cqwk/install.lib/CYQWK32.EXE/0/RCDATA/TMSGDISPLAYFORM/TMSGDISPLAYFORM.txt

Text File | 1997-04-21 | 10KB | 458 lines

object MsgDisplayForm: TMsgDisplayForm
  Left = 130
  Top = 151
  Width = 601
  Height = 323
  HelpContext = 8111
  Caption = 'Msg Viewer'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  FormStyle = fsMDIChild
  Menu = MainMenu1
  Position = poDefault
  Scaled = False
  Visible = True
  OnActivate = FormActivate
  OnClick = FormClick
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 593
    Height = 81
    HelpContext = 8111
    Align = alTop
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = [fsBold]
    ParentFont = False
    PopupMenu = ViewPopUp
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 58
      Height = 16
      Caption = 'Posted :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 24
      Width = 44
      Height = 16
      Caption = 'From :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 40
      Width = 28
      Height = 16
      Caption = 'To :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 56
      Width = 61
      Height = 16
      Caption = 'Subject :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 352
      Top = 8
      Width = 63
      Height = 16
      Caption = 'Number :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 352
      Top = 24
      Width = 55
      Height = 16
      Caption = 'Refer# :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 352
      Top = 40
      Width = 52
      Height = 16
      Caption = 'Status :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label8: TLabel
      Left = 352
      Top = 56
      Width = 40
      Height = 16
      Caption = 'Conf :'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DateTime: TLabel
      Left = 78
      Top = 8
      Width = 259
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object UpFrom: TLabel
      Left = 78
      Top = 24
      Width = 251
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object UpTo: TLabel
      Left = 78
      Top = 40
      Width = 235
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Subject: TLabel
      Left = 78
      Top = 56
      Width = 203
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object MSGNum: TLabel
      Left = 419
      Top = 8
      Width = 54
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object ReferNum: TLabel
      Left = 419
      Top = 24
      Width = 66
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Status: TLabel
      Left = 419
      Top = 40
      Width = 78
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Conf: TLabel
      Left = 419
      Top = 56
      Width = 94
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object IDX: TLabel
      Left = 472
      Top = 8
      Width = 25
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 504
      Top = 8
      Width = 14
      Height = 16
      Caption = 'of'
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Total: TLabel
      Left = 524
      Top = 8
      Width = 29
      Height = 16
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
  end
  object Memo1: TDCViewer
    Left = 0
    Top = 81
    Width = 593
    Height = 190
    HelpContext = 8111
    Align = alClient
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    HideSelection = False
    ParentFont = False
    PopupMenu = ViewPopUp
    ReadOnly = True
    TabOrder = 1
    Wanttabs = True
    OnChange = Memo1Change
    OnDblClick = Memo1DblClick
    OnKeyDown = Memo1KeyDown
    AutoSize = False
    CancelTask = False
    CurrX = 1
    CurrY = 1
    DblClickSel = dcsWord
    MonitorTask = [mtSearching]
    SearchDirection = sdDown
    SearchOptions = [soF3Next]
    SearchMode = smFind
    OnTaskError = Memo1TaskError
    OnTaskFail = Memo1TaskFail
    QuoteColor = clGreen
  end
  object PrintDialog1: TPrintDialog
    Options = [poPrintToFile, poWarning]
    Left = 48
    Top = 168
  end
  object SaveMsgDlg: TSaveDialog
    FileEditStyle = fsEdit
    Filter = 'Text|*.txt|All|*.*'
    Options = [ofOverwritePrompt]
    Title = 'Save Msg to File'
    Left = 88
    Top = 168
  end
  object ViewPopUp: TPopupMenu
    Left = 24
    Top = 104
    object Next1: TMenuItem
      Caption = '      Next   ->'
      HelpContext = 8211
      Hint = 'Move to next message'
      ShortCut = 0
      OnClick = Next1Click
    end
    object Prev1: TMenuItem
      Caption = '<-   Prev'
      HelpContext = 8201
      Hint = 'Move to previous message'
      ShortCut = 0
      OnClick = Prev1Click
    end
    object Close1: TMenuItem
      Caption = 'Close Viewer'
      HelpContext = 8351
      Hint = 'Close message viewer'
      ShortCut = 0
      OnClick = Close1Click
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object New1: TMenuItem
      Caption = 'New ...'
      HelpContext = 8131
      Hint = 'Enter new message'
      ShortCut = 0
      OnClick = New1Click
    end
    object Reply1: TMenuItem
      Caption = 'Reply  ...'
      HelpContext = 8141
      Hint = 'Reply to current message'
      ShortCut = 0
      OnClick = Reply1Click
    end
    object Search1: TMenuItem
      Caption = 'Grep'
      HelpContext = 8601
      Hint = 'Search messages for text'
      ShortCut = 0
      OnClick = Search1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Copy1: TMenuItem
      Caption = 'Copy'
      HelpContext = 8481
      Hint = 'Copy highlighted text to clipboard'
      ShortCut = 0
      OnClick = Copy1Click
    end
    object Selectall1: TMenuItem
      Caption = 'Select all'
      HelpContext = 8541
      Hint = 'Sellect all text in current message'
      ShortCut = 0
      OnClick = Selectall1Click
    end
    object Print1: TMenuItem
      Caption = 'Print'
      HelpContext = 8161
      Hint = 'Print current message'
      ShortCut = 0
      OnClick = Print1Click
    end
    object N3: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object OpenPacket1: TMenuItem
      Caption = 'Open Packet'
      HelpContext = 8021
      Hint = 'Open mail packet and load messages into reader'
      ShortCut = 0
      OnClick = OpenPacket1Click
    end
    object ClosePacket1: TMenuItem
      Caption = 'Close Packet'
      HelpContext = 8031
      Hint = 'Close the current open mail packet'
      ShortCut = 0
      OnClick = ClosePacket1Click
    end
    object ExitMailreader1: TMenuItem
      Caption = 'Exit Mail Reader'
      HelpContext = 8321
      Hint = 'Exit the application'
      ShortCut = 0
      OnClick = ExitMailreader1Click
    end
  end
  object ResolutionFix1: TResolutionFix
    DesignRes = 96
    Left = 168
    Top = 176
  end
  object FindDialog1: TFindDialog
    HelpContext = 8571
    OnFind = FindDialog1Find
    Left = 16
    Top = 168
  end
  object MainMenu1: TMainMenu
    Left = 72
    Top = 104
    object Edit1: TMenuItem
      Caption = '&Edit'
      GroupIndex = 1
      ShortCut = 0
      object Copy2: TMenuItem
        Caption = '&Copy'
        GroupIndex = 1
        Hint = 'Copy sellected text to clipboard'
        ShortCut = 16451
        OnClick = Copy2Click
      end
      object SelectAll2: TMenuItem
        Caption = '&Select All'
        GroupIndex = 1
        Hint = 'Sellect all text in message'
        ShortCut = 16449
        OnClick = SelectAll2Click
      end
      object N4: TMenuItem
        Caption = '-'
        GroupIndex = 1
        ShortCut = 0
      end
      object Wordwrap1: TMenuItem
        Caption = '&Wordwrap'
        Checked = True
        GroupIndex = 1
        Hint = 'Turn wordwrap on and off'
        ShortCut = 16471
        OnClick = Wordwrap1Click
      end
    end
  end
  object Uucode1: TUucode
    CodeType = True
    Left = 128
    Top = 104
  end
end