home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap11 / realstr2 / main.dfm / main.txt < prev   
Encoding:
Text File  |  1995-03-21  |  2.5 KB  |  128 lines
  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 105
  4.   ActiveControl = Edit1
  5.   AutoScroll = False
  6.   Caption = 'Reals and Strings 2'
  7.   ClientHeight = 156
  8.   ClientWidth = 359
  9.   Color = 4194304
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   Icon.Data = {<image000.ico>}
  15.   PixelsPerInch = 96
  16.   Visible = True
  17.   TextHeight = 16
  18.   object Label1: TLabel
  19.     Left = 18
  20.     Top = 6
  21.     Width = 105
  22.     Height = 28
  23.     AutoSize = False
  24.     Caption = 'Enter a number'
  25.     Font.Color = clTeal
  26.     Font.Height = -13
  27.     Font.Name = 'System'
  28.     Font.Style = [fsBold]
  29.     ParentFont = False
  30.   end
  31.   object Label2: TLabel
  32.     Left = 42
  33.     Top = 44
  34.     Width = 81
  35.     Height = 28
  36.     AutoSize = False
  37.     Caption = 'The Square'
  38.     Font.Color = clTeal
  39.     Font.Height = -13
  40.     Font.Name = 'System'
  41.     Font.Style = [fsBold]
  42.     ParentFont = False
  43.   end
  44.   object Label4: TLabel
  45.     Left = 10
  46.     Top = 82
  47.     Width = 113
  48.     Height = 25
  49.     AutoSize = False
  50.     Caption = 'The Square Root'
  51.     Font.Color = clTeal
  52.     Font.Height = -13
  53.     Font.Name = 'System'
  54.     Font.Style = [fsBold]
  55.     ParentFont = False
  56.   end
  57.   object Edit1: TEdit
  58.     Left = 125
  59.     Top = 6
  60.     Width = 220
  61.     Height = 25
  62.     Color = clNavy
  63.     Font.Color = clYellow
  64.     Font.Height = -11
  65.     Font.Name = 'System'
  66.     Font.Style = [fsBold]
  67.     ParentFont = False
  68.     TabOrder = 0
  69.     Text = 'Edit1'
  70.   end
  71.   object BCalc: TButton
  72.     Left = 94
  73.     Top = 120
  74.     Width = 170
  75.     Height = 25
  76.     Caption = '&Calc'
  77.     TabOrder = 1
  78.     OnClick = BCalcClick
  79.   end
  80.   object Panel1: TPanel
  81.     Left = 125
  82.     Top = 44
  83.     Width = 220
  84.     Height = 25
  85.     BevelInner = bvLowered
  86.     Caption = 'Panel1'
  87.     TabOrder = 2
  88.     object LSquare: TLabel
  89.       Left = 2
  90.       Top = 2
  91.       Width = 215
  92.       Height = 21
  93.       AutoSize = False
  94.       Caption = 'LSquare'
  95.       Color = clNavy
  96.       Font.Color = clYellow
  97.       Font.Height = -13
  98.       Font.Name = 'System'
  99.       Font.Style = [fsBold]
  100.       ParentColor = False
  101.       ParentFont = False
  102.     end
  103.   end
  104.   object Panel2: TPanel
  105.     Left = 125
  106.     Top = 82
  107.     Width = 220
  108.     Height = 25
  109.     Caption = 'Panel2'
  110.     TabOrder = 3
  111.     object LSquareRoot: TLabel
  112.       Left = 2
  113.       Top = 2
  114.       Width = 215
  115.       Height = 21
  116.       AutoSize = False
  117.       Caption = 'LSquareRoot'
  118.       Color = clNavy
  119.       Font.Color = clYellow
  120.       Font.Height = -13
  121.       Font.Name = 'System'
  122.       Font.Style = [fsBold]
  123.       ParentColor = False
  124.       ParentFont = False
  125.     end
  126.   end
  127. end
  128.