home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 December / Chip_2001-12_cd1.bin / zkuste / delphi / kompon / d23456 / CAJSCRTP.ZIP / demo_del / demo1.dfm / demo1.txt
Encoding:
Text File  |  2001-10-03  |  3.2 KB  |  150 lines
  1. object Main: TMain
  2.   Left = 234
  3.   Top = 137
  4.   Width = 536
  5.   Height = 354
  6.   ActiveControl = Memo1
  7.   Caption = 'Demo'
  8.   Color = clBtnFace
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = 11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Pitch = fpVariable
  14.   Font.Style = []
  15.   Menu = MainMenu1
  16.   OldCreateOrder = True
  17.   Position = poScreenCenter
  18.   Scaled = False
  19.   OnClose = FormClose
  20.   OnCloseQuery = FormCloseQuery
  21.   OnCreate = FormCreate
  22.   OnDestroy = FormDestroy
  23.   PixelsPerInch = 96
  24.   TextHeight = 13
  25.   object Splitter1: TSplitter
  26.     Left = 0
  27.     Top = 153
  28.     Width = 528
  29.     Height = 3
  30.     Cursor = crVSplit
  31.     Align = alTop
  32.     Color = clBtnFace
  33.     ParentColor = False
  34.   end
  35.   object Memo1: TMemo
  36.     Left = 0
  37.     Top = 0
  38.     Width = 528
  39.     Height = 153
  40.     Align = alTop
  41.     Lines.Strings = (
  42.       'Program IFSTest;'
  43.       'Begin'
  44.       'End.')
  45.     ScrollBars = ssBoth
  46.     TabOrder = 0
  47.     OnChange = Memo1Change
  48.   end
  49.   object memo2: TMemo
  50.     Left = 0
  51.     Top = 156
  52.     Width = 528
  53.     Height = 152
  54.     Align = alClient
  55.     ReadOnly = True
  56.     ScrollBars = ssBoth
  57.     TabOrder = 1
  58.   end
  59.   object MainMenu1: TMainMenu
  60.     Left = 96
  61.     Top = 128
  62.     object File1: TMenuItem
  63.       Caption = '&File'
  64.       object New1: TMenuItem
  65.         Caption = '&New'
  66.         OnClick = New1Click
  67.       end
  68.       object N2: TMenuItem
  69.         Caption = '-'
  70.       end
  71.       object Open1: TMenuItem
  72.         Caption = '&Open'
  73.         ShortCut = 16463
  74.         OnClick = Open1Click
  75.       end
  76.       object Save1: TMenuItem
  77.         Caption = '&Save'
  78.         ShortCut = 16467
  79.         OnClick = Save1Click
  80.       end
  81.       object Saveas1: TMenuItem
  82.         Caption = 'Save &as'
  83.         OnClick = Saveas1Click
  84.       end
  85.       object N1: TMenuItem
  86.         Caption = '-'
  87.       end
  88.       object Exit1: TMenuItem
  89.         Caption = 'E&xit'
  90.         ShortCut = 32856
  91.         OnClick = Exit1Click
  92.       end
  93.     end
  94.     object Script1: TMenuItem
  95.       Caption = '&Script'
  96.       object StepOver1: TMenuItem
  97.         Caption = 'Step &Over'
  98.         ShortCut = 119
  99.         OnClick = StepOver1Click
  100.       end
  101.       object Run1: TMenuItem
  102.         Caption = '&Run'
  103.         ShortCut = 120
  104.         OnClick = Run1Click
  105.       end
  106.       object Stop1: TMenuItem
  107.         Caption = '&Stop'
  108.         ShortCut = 16497
  109.         OnClick = Stop1Click
  110.       end
  111.       object N3: TMenuItem
  112.         Caption = '-'
  113.       end
  114.       object Runproceduretest1: TMenuItem
  115.         Caption = 'Run &Procedure'
  116.         OnClick = Runproceduretest1Click
  117.       end
  118.       object RunwithTestObject1: TMenuItem
  119.         Caption = 'Run with &Class'
  120.         OnClick = RunwithTestObject1Click
  121.       end
  122.       object RunwithaddedVariables1: TMenuItem
  123.         Caption = 'Run with &Variables'
  124.         OnClick = RunwithaddedVariables1Click
  125.       end
  126.       object N4: TMenuItem
  127.         Caption = '-'
  128.       end
  129.       object RunWithTimer1: TMenuItem
  130.         Caption = 'Run With &Timer'
  131.         OnClick = RunWithTimer1Click
  132.       end
  133.     end
  134.   end
  135.   object OpenDialog1: TOpenDialog
  136.     DefaultExt = 'ifs'
  137.     Filter = 'IFS Files|*.ifs'
  138.     Title = 'Open'
  139.     Left = 256
  140.     Top = 152
  141.   end
  142.   object SaveDialog1: TSaveDialog
  143.     DefaultExt = 'ifs'
  144.     Filter = 'ifs Files|*.ifs'
  145.     Title = 'Save As'
  146.     Left = 264
  147.     Top = 160
  148.   end
  149. end
  150.