home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / tema / siggis / siGGis.exe / 0 / RCDATA / TFNEWDBF / TFNEWDBF.txt
Encoding:
Text File  |  2001-12-03  |  3.6 KB  |  179 lines
  1. object FNewDbf: TFNewDbf
  2.   Left = 586
  3.   Top = 191
  4.   Width = 384
  5.   Height = 341
  6.   Caption = 'New Database'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   Position = poScreenCenter
  12.   OnDeactivate = FormDeactivate
  13.   OnResize = FormResize
  14.   OnShow = FormShow
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object Panel1: TPanel
  18.     Left = 0
  19.     Top = 273
  20.     Width = 376
  21.     Height = 41
  22.     Align = alBottom
  23.     Caption = 'Panel1'
  24.     TabOrder = 0
  25.     object BOk: TBitBtn
  26.       Left = 152
  27.       Top = 8
  28.       Width = 75
  29.       Height = 25
  30.       Caption = 'Ok'
  31.       Font.Color = clBlack
  32.       Font.Height = -11
  33.       Font.Name = 'MS Sans Serif'
  34.       Font.Style = [fsBold]
  35.       ParentFont = False
  36.       TabOrder = 0
  37.       OnClick = BOkClick
  38.     end
  39.   end
  40.   object Panel2: TPanel
  41.     Left = 0
  42.     Top = 0
  43.     Width = 376
  44.     Height = 273
  45.     Align = alClient
  46.     Caption = 'Panel2'
  47.     TabOrder = 1
  48.     object Panel3: TPanel
  49.       Left = 1
  50.       Top = 1
  51.       Width = 144
  52.       Height = 271
  53.       Align = alLeft
  54.       TabOrder = 0
  55.       object Label1: TLabel
  56.         Left = 4
  57.         Top = 8
  58.         Width = 65
  59.         Height = 13
  60.         Caption = 'FieldName:'
  61.       end
  62.       object Label2: TLabel
  63.         Left = 4
  64.         Top = 24
  65.         Width = 49
  66.         Height = 13
  67.         Caption = 'FieldType:'
  68.       end
  69.       object Label3: TLabel
  70.         Left = 8
  71.         Top = 67
  72.         Width = 57
  73.         Height = 13
  74.         Caption = 'Length:       '
  75.       end
  76.       object Label4: TLabel
  77.         Left = 8
  78.         Top = 91
  79.         Width = 56
  80.         Height = 13
  81.         Caption = 'Places:       '
  82.       end
  83.       object EName: TEdit
  84.         Left = 69
  85.         Top = 6
  86.         Width = 73
  87.         Height = 21
  88.         MaxLength = 11
  89.         TabOrder = 0
  90.         OnKeyPress = ENameKeyPress
  91.       end
  92.       object CBType: TComboBox
  93.         Left = 4
  94.         Top = 40
  95.         Width = 137
  96.         Height = 21
  97.         ItemHeight = 13
  98.         Items.Strings = (
  99.           'Char'
  100.           'Decimal'
  101.           'Float'
  102.           'Date'
  103.           'Boolean'
  104.           '')
  105.         TabOrder = 1
  106.         Text = '...'
  107.         OnChange = CBTypeChange
  108.       end
  109.       object ELen: TEdit
  110.         Left = 69
  111.         Top = 64
  112.         Width = 71
  113.         Height = 21
  114.         Enabled = False
  115.         TabOrder = 2
  116.         OnExit = ELenExit
  117.       end
  118.       object Eplaces: TEdit
  119.         Left = 69
  120.         Top = 88
  121.         Width = 71
  122.         Height = 21
  123.         Enabled = False
  124.         TabOrder = 3
  125.         OnExit = EplacesExit
  126.       end
  127.       object Button0: TBitBtn
  128.         Left = 24
  129.         Top = 128
  130.         Width = 97
  131.         Height = 25
  132.         Caption = 'Modify field'
  133.         TabOrder = 4
  134.         OnClick = Button0Click
  135.       end
  136.       object Button1: TBitBtn
  137.         Left = 24
  138.         Top = 160
  139.         Width = 97
  140.         Height = 25
  141.         Caption = 'New field'
  142.         TabOrder = 5
  143.         OnClick = Button1Click
  144.       end
  145.       object Button2: TBitBtn
  146.         Left = 24
  147.         Top = 192
  148.         Width = 97
  149.         Height = 25
  150.         Caption = 'Delete field'
  151.         TabOrder = 6
  152.         OnClick = Button2Click
  153.       end
  154.       object Button3: TBitBtn
  155.         Left = 24
  156.         Top = 224
  157.         Width = 97
  158.         Height = 25
  159.         Caption = 'Default'
  160.         TabOrder = 7
  161.         OnClick = Button3Click
  162.       end
  163.     end
  164.     object SG: TStringGrid
  165.       Left = 145
  166.       Top = 1
  167.       Width = 230
  168.       Height = 271
  169.       Align = alClient
  170.       DefaultRowHeight = 18
  171.       Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
  172.       TabOrder = 1
  173.       OnClick = SGClick
  174.       OnDblClick = SGDblClick
  175.       OnKeyUp = SGKeyUp
  176.     end
  177.   end
  178. end
  179.