home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2005 June (DVD) / DPPRO0605DVD.iso / Editorial / Programming with Delphi 2005 / Delphi 2005 1 / CALCTEST / CALCFORM.DFM / CALCFORM.txt
Encoding:
Text File  |  2005-02-21  |  1.5 KB  |  81 lines
  1. object Form1: TForm1
  2.   Left = 261
  3.   Top = 180
  4.   ActiveControl = CalcBtn
  5.   BorderStyle = bsDialog
  6.   Caption = 'PC Pro VAT Calculator'
  7.   ClientHeight = 173
  8.   ClientWidth = 285
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -13
  13.   Font.Name = 'System'
  14.   Font.Style = []
  15.   OldCreateOrder = True
  16.   Position = poScreenCenter
  17.   PixelsPerInch = 96
  18.   TextHeight = 16
  19.   object Label1: TLabel
  20.     Left = 168
  21.     Top = 56
  22.     Width = 20
  23.     Height = 16
  24.     Caption = 'Vat'
  25.   end
  26.   object Label2: TLabel
  27.     Left = 160
  28.     Top = 24
  29.     Width = 53
  30.     Height = 16
  31.     Caption = 'Subtotal'
  32.   end
  33.   object Label3: TLabel
  34.     Left = 160
  35.     Top = 96
  36.     Width = 75
  37.     Height = 16
  38.     Caption = 'Grand Total'
  39.   end
  40.   object CalcBtn: TButton
  41.     Left = 8
  42.     Top = 137
  43.     Width = 273
  44.     Height = 33
  45.     Caption = '&Calculate'
  46.     Font.Charset = DEFAULT_CHARSET
  47.     Font.Color = clBlack
  48.     Font.Height = -13
  49.     Font.Name = 'Times New Roman'
  50.     Font.Style = [fsBold]
  51.     ParentFont = False
  52.     TabOrder = 0
  53.     OnClick = CalcBtnClick
  54.   end
  55.   object GrandTotal: TEdit
  56.     Left = 16
  57.     Top = 88
  58.     Width = 121
  59.     Height = 24
  60.     Hint = 
  61.       'Select this to generate a subtotal from the cost (inc VAT) in th' +
  62.       'e last field'
  63.     TabOrder = 1
  64.   end
  65.   object Vat: TEdit
  66.     Left = 16
  67.     Top = 56
  68.     Width = 121
  69.     Height = 24
  70.     ReadOnly = True
  71.     TabOrder = 2
  72.   end
  73.   object SubTotal: TEdit
  74.     Left = 16
  75.     Top = 24
  76.     Width = 121
  77.     Height = 24
  78.     TabOrder = 3
  79.   end
  80. end
  81.