DOS/V Power Report 1996 August/VPR9608A.BIN/del20try/install/data.z/MDIEDIT.DFM/MDIEDIT.txt

Text File | 1996-05-08 | 5KB | 211 lines

object EditForm: TEditForm
  Left = 196
  Top = 112
  Width = 435
  Height = 308
  Caption = 'Untitled'
  Font.Color = clBlack
  Font.Height = -12
  Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
  Font.Style = []
  FormStyle = fsMDIChild
  Menu = MainMenu1
  PopupMenu = PopupMenu1
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Editor: TRichEdit
    Left = 0
    Top = 0
    Width = 427
    Height = 262
    Align = alClient
    BorderStyle = bsNone
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
    Font.Style = []
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object MainMenu1: TMainMenu
    Left = 16
    Top = 248
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object New1: TMenuItem
        Caption = '&New'
        ShortCut = 0
        OnClick = New1Click
      end
      object Open1: TMenuItem
        Caption = '&Open...'
        ShortCut = 0
        OnClick = Open1Click
      end
      object Close1: TMenuItem
        Caption = '&Close'
        ShortCut = 0
        OnClick = Close1Click
      end
      object Save1: TMenuItem
        Caption = '&Save'
        ShortCut = 0
        OnClick = Save1Click
      end
      object Saveas1: TMenuItem
        Caption = 'Save &as...'
        ShortCut = 0
        OnClick = Saveas1Click
      end
      object Print1: TMenuItem
        Caption = '&Print...'
        ShortCut = 0
        OnClick = Print1Click
      end
      object Printersetup1: TMenuItem
        Caption = 'Printer setup...'
        ShortCut = 0
        OnClick = Printersetup1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = Exit1Click
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      GroupIndex = 1
      ShortCut = 0
      OnClick = Edit1Click
      object Cut1: TMenuItem
        Caption = 'Cu&t'
        ShortCut = 16472
        OnClick = Cut1Click
      end
      object Copy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
      object Paste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = Paste1Click
      end
      object Delete1: TMenuItem
        Caption = 'De&lete'
        ShortCut = 16452
        OnClick = Delete1Click
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Selectall1: TMenuItem
        Caption = 'Select &all'
        ShortCut = 16449
        OnClick = Selectall1Click
      end
    end
    object Character1: TMenuItem
      Caption = '&Character'
      GroupIndex = 1
      ShortCut = 0
      object Left1: TMenuItem
        Caption = '&Left'
        Checked = True
        ShortCut = 0
        OnClick = AlignClick
      end
      object Right1: TMenuItem
        Caption = '&Right'
        ShortCut = 0
        OnClick = AlignClick
      end
      object Center1: TMenuItem
        Caption = '&Center'
        ShortCut = 0
        OnClick = AlignClick
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Wordwrap1: TMenuItem
        Caption = '&Word wrap'
        Checked = True
        ShortCut = 0
        OnClick = Wordwrap1Click
      end
      object N5: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Font1: TMenuItem
        Caption = '&Font...'
        ShortCut = 0
        OnClick = Font1Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    OnPopup = Edit1Click
    Left = 96
    Top = 64
    object Cut2: TMenuItem
      Caption = 'Cu&t'
      ShortCut = 0
      OnClick = Cut1Click
    end
    object Copy2: TMenuItem
      Caption = '&Copy'
      ShortCut = 0
      OnClick = Copy1Click
    end
    object Paste2: TMenuItem
      Caption = '&Paste'
      ShortCut = 0
      OnClick = Paste1Click
    end
  end
  object SaveFileDialog: TSaveDialog
    FileEditStyle = fsEdit
    Filter =
      'Rich text files (*.rtf)|*.rtf|Plain text files (*.txt)|*.txt|All' +
      ' files|*.*'
    Options = [ofHideReadOnly, ofFileMustExist, ofNoReadOnlyReturn]
    Left = 56
    Top = 64
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 136
    Top = 64
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 176
    Top = 64
  end
  object PrintDialog1: TPrintDialog
    Left = 216
    Top = 64
  end
end