Chip 2001 December/Chip_2001-12_cd1.bin/zkuste/delphi/kompon/d23456/CAJSCRTP.ZIP/demo_del/demo1.dfm/demo1.txt

Text File | 2001-10-03 | 3KB | 150 lines

object Main: TMain
  Left = 234
  Top = 137
  Width = 536
  Height = 354
  ActiveControl = Memo1
  Caption = 'Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = 11
  Font.Name = 'MS Sans Serif'
  Font.Pitch = fpVariable
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 153
    Width = 528
    Height = 3
    Cursor = crVSplit
    Align = alTop
    Color = clBtnFace
    ParentColor = False
  end
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 528
    Height = 153
    Align = alTop
    Lines.Strings = (
      'Program IFSTest;'
      'Begin'
      'End.')
    ScrollBars = ssBoth
    TabOrder = 0
    OnChange = Memo1Change
  end
  object memo2: TMemo
    Left = 0
    Top = 156
    Width = 528
    Height = 152
    Align = alClient
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 1
  end
  object MainMenu1: TMainMenu
    Left = 96
    Top = 128
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New'
        OnClick = New1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Open1: TMenuItem
        Caption = '&Open'
        ShortCut = 16463
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = '&Save'
        ShortCut = 16467
        OnClick = Save1Click
      end
      object Saveas1: TMenuItem
        Caption = 'Save &as'
        OnClick = Saveas1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        ShortCut = 32856
        OnClick = Exit1Click
      end
    end
    object Script1: TMenuItem
      Caption = '&Script'
      object StepOver1: TMenuItem
        Caption = 'Step &Over'
        ShortCut = 119
        OnClick = StepOver1Click
      end
      object Run1: TMenuItem
        Caption = '&Run'
        ShortCut = 120
        OnClick = Run1Click
      end
      object Stop1: TMenuItem
        Caption = '&Stop'
        ShortCut = 16497
        OnClick = Stop1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Runproceduretest1: TMenuItem
        Caption = 'Run &Procedure'
        OnClick = Runproceduretest1Click
      end
      object RunwithTestObject1: TMenuItem
        Caption = 'Run with &Class'
        OnClick = RunwithTestObject1Click
      end
      object RunwithaddedVariables1: TMenuItem
        Caption = 'Run with &Variables'
        OnClick = RunwithaddedVariables1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object RunWithTimer1: TMenuItem
        Caption = 'Run With &Timer'
        OnClick = RunWithTimer1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'ifs'
    Filter = 'IFS Files|*.ifs'
    Title = 'Open'
    Left = 256
    Top = 152
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'ifs'
    Filter = 'ifs Files|*.ifs'
    Title = 'Save As'
    Left = 264
    Top = 160
  end
end