MathExpression_frMain.lfm 2.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102
  1. object frMain: TfrMain
  2. Left = 259
  3. Height = 230
  4. Top = 149
  5. Width = 410
  6. Caption = 'Math expression example'
  7. ClientHeight = 230
  8. ClientWidth = 410
  9. OnCreate = FormCreate
  10. Position = poDesktopCenter
  11. LCLVersion = '2.0.10.0'
  12. object lbExpression: TLabel
  13. Left = 4
  14. Height = 15
  15. Top = 2
  16. Width = 402
  17. Align = alTop
  18. BorderSpacing.Left = 4
  19. BorderSpacing.Top = 2
  20. BorderSpacing.Right = 4
  21. BorderSpacing.Bottom = 2
  22. Caption = 'Expression:'
  23. FocusControl = edExpression
  24. ParentColor = False
  25. end
  26. object edExpression: TEdit
  27. Left = 4
  28. Height = 23
  29. Top = 19
  30. Width = 402
  31. Align = alTop
  32. BorderSpacing.Left = 4
  33. BorderSpacing.Top = 2
  34. BorderSpacing.Right = 4
  35. BorderSpacing.Bottom = 2
  36. TabOrder = 0
  37. end
  38. object lbVariables: TLabel
  39. Left = 4
  40. Height = 15
  41. Top = 44
  42. Width = 402
  43. Align = alTop
  44. BorderSpacing.Left = 4
  45. BorderSpacing.Top = 2
  46. BorderSpacing.Right = 4
  47. BorderSpacing.Bottom = 2
  48. Caption = 'Variables:'
  49. FocusControl = gdVariables
  50. ParentColor = False
  51. end
  52. object gdVariables: TStringGrid
  53. Left = 4
  54. Height = 138
  55. Top = 61
  56. Width = 402
  57. Align = alClient
  58. BorderSpacing.Left = 4
  59. BorderSpacing.Top = 2
  60. BorderSpacing.Right = 4
  61. BorderSpacing.Bottom = 2
  62. ColCount = 2
  63. FixedCols = 0
  64. Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goSmoothScroll]
  65. RowCount = 100
  66. TabOrder = 1
  67. ColWidths = (
  68. 160
  69. 160
  70. )
  71. Cells = (
  72. 2
  73. 0
  74. 0
  75. 'Name'
  76. 1
  77. 0
  78. 'Value'
  79. )
  80. end
  81. object btCalculate: TButton
  82. Left = 4
  83. Height = 25
  84. Top = 201
  85. Width = 402
  86. Align = alBottom
  87. BorderSpacing.Left = 4
  88. BorderSpacing.Top = 2
  89. BorderSpacing.Right = 4
  90. BorderSpacing.Bottom = 4
  91. Caption = 'Calculate now!'
  92. Default = True
  93. OnClick = btCalculateClick
  94. TabOrder = 2
  95. end
  96. object BrookMathExpression1: TBrookMathExpression
  97. OnExtension = BrookMathExpression1Extension
  98. OnError = BrookMathExpression1Error
  99. Left = 96
  100. Top = 112
  101. end
  102. end