home *** CD-ROM | disk | FTP | other *** search
- object DatabaseForm: TDatabaseForm
- Left = 242
- Top = 173
- Width = 483
- Height = 423
- Caption = 'Datenbankoperationen'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 8
- Top = 12
- Width = 62
- Height = 13
- Caption = 'Schichtname'
- end
- object Label2: TLabel
- Left = 8
- Top = 40
- Width = 83
- Height = 13
- Caption = 'verf�gbare Felder'
- end
- object Label3: TLabel
- Left = 168
- Top = 40
- Width = 65
- Height = 13
- Caption = 'aktuelles Feld'
- end
- object Label4: TLabel
- Left = 168
- Top = 80
- Width = 108
- Height = 13
- Caption = 'zu setzender Feldinhalt'
- end
- object Label5: TLabel
- Left = 168
- Top = 176
- Width = 128
- Height = 13
- Caption = 'aktueller Inhalt der Feldliste'
- end
- object Label6: TLabel
- Left = 192
- Top = 124
- Width = 85
- Height = 13
- Caption = 'Datensatznummer'
- end
- object StatusLabel: TLabel
- Left = 8
- Top = 360
- Width = 377
- Height = 33
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object ComboBox1: TComboBox
- Left = 80
- Top = 8
- Width = 177
- Height = 21
- ItemHeight = 13
- TabOrder = 0
- OnChange = ComboBox1Change
- end
- object FieldListBox: TListBox
- Left = 8
- Top = 56
- Width = 145
- Height = 249
- ItemHeight = 13
- TabOrder = 1
- OnClick = FieldListBoxClick
- end
- object ActualEdit: TEdit
- Left = 168
- Top = 56
- Width = 161
- Height = 21
- ReadOnly = True
- TabOrder = 2
- end
- object ContentEdit: TEdit
- Left = 168
- Top = 96
- Width = 297
- Height = 21
- TabOrder = 3
- end
- object ClearListButton: TButton
- Left = 344
- Top = 160
- Width = 121
- Height = 25
- Caption = 'L�schen des Inhalts'
- TabOrder = 4
- OnClick = ClearListButtonClick
- end
- object InsertButton: TButton
- Left = 8
- Top = 320
- Width = 75
- Height = 25
- Caption = 'Einf�gen'
- TabOrder = 5
- OnClick = InsertButtonClick
- end
- object ClearButton: TButton
- Left = 104
- Top = 320
- Width = 75
- Height = 25
- Caption = 'L�schen'
- TabOrder = 6
- OnClick = ClearButtonClick
- end
- object RecEdit: TEdit
- Left = 192
- Top = 140
- Width = 121
- Height = 21
- TabOrder = 7
- end
- object UpdateButton: TButton
- Left = 200
- Top = 320
- Width = 75
- Height = 25
- Caption = '�ndern'
- TabOrder = 8
- OnClick = UpdateButtonClick
- end
- object ReadButton: TButton
- Left = 296
- Top = 320
- Width = 75
- Height = 25
- Caption = 'Lesen'
- TabOrder = 9
- OnClick = ReadButtonClick
- end
- object SearchButton: TButton
- Left = 392
- Top = 320
- Width = 75
- Height = 25
- Hint =
- 'R�ckgabewerte k�nnen in der unteren Liste des Hauptfensters abge' +
- 'lesen werden'
- Caption = 'Suche'
- TabOrder = 10
- OnClick = SearchButtonClick
- end
- object CloseButton: TButton
- Left = 392
- Top = 360
- Width = 75
- Height = 25
- Caption = 'Schlie�en'
- ModalResult = 1
- TabOrder = 11
- end
- object ActualFieldListBox: TListBox
- Left = 168
- Top = 192
- Width = 297
- Height = 113
- ItemHeight = 13
- TabOrder = 12
- end
- object AddToListButton: TButton
- Left = 344
- Top = 56
- Width = 121
- Height = 25
- Caption = 'der Feldliste zuf�gen'
- TabOrder = 13
- OnClick = AddToListButtonClick
- end
- object PrevButton: TButton
- Left = 168
- Top = 140
- Width = 17
- Height = 21
- Caption = '<'
- TabOrder = 14
- OnClick = PrevButtonClick
- end
- object NextButton: TButton
- Left = 320
- Top = 140
- Width = 17
- Height = 21
- Caption = '>'
- TabOrder = 15
- OnClick = NextButtonClick
- end
- end
-