PC World Komputer 1997 May/Pcwk0597.iso/borland/cb/setup/cbuilder/data.z/MDIEDIT.DFM/MDIEDIT.txt

Text File | 1997-02-28 | 5KB | 208 lines

object EditForm: TEditForm
  Left = 317
  Top = 238
  Width = 435
  Height = 300
  Caption = 'Untitled'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Menu = MainMenu1
  PopupMenu = PopupMenu1
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Editor: TRichEdit
    Left = 0
    Top = 0
    Width = 427
    Height = 248
    Align = alClient
    BorderStyle = bsNone
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object MainMenu1: TMainMenu
    Left = 184
    Top = 112
    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 = Left1Click
      end
      object Right1: TMenuItem
        Caption = '&Right'
        ShortCut = 0
        OnClick = Left1Click
      end
      object Center1: TMenuItem
        Caption = '&Center'
        ShortCut = 0
        OnClick = Left1Click
      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
    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
    DefaultExt = 'rtf'
    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.Charset = DEFAULT_CHARSET
    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