home *** CD-ROM | disk | FTP | other *** search
- object fEditGrid: TfEditGrid
- Left = 422
- Top = 107
- ActiveControl = EditGrid
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsSingle
- Caption = 'Edit grid'
- ClientHeight = 398
- ClientWidth = 281
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object btnOk: TButton
- Left = 202
- Top = 8
- Width = 72
- Height = 22
- Caption = 'Ok'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = btnOkClick
- end
- object btnCancel: TButton
- Left = 202
- Top = 36
- Width = 72
- Height = 22
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 1
- OnClick = btnCancelClick
- end
- object btnEdit: TButton
- Left = 202
- Top = 200
- Width = 72
- Height = 22
- Caption = 'Edit'
- TabOrder = 5
- OnClick = btnEditClick
- end
- object btnAdd: TButton
- Left = 202
- Top = 144
- Width = 72
- Height = 22
- Caption = 'Add'
- TabOrder = 3
- OnClick = btnAddClick
- end
- object btnRemove: TButton
- Left = 202
- Top = 172
- Width = 72
- Height = 22
- Caption = 'Remove'
- TabOrder = 4
- OnClick = btnRemoveClick
- end
- object btnDefault: TButton
- Left = 202
- Top = 64
- Width = 72
- Height = 22
- Caption = 'Default'
- TabOrder = 2
- OnClick = btnDefaultClick
- end
- object BtnDown: TBitBtn
- Left = 202
- Top = 374
- Width = 22
- Height = 22
- HelpContext = 102
- Caption = '6'
- Font.Charset = SYMBOL_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Marlett'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 7
- OnClick = btnDownClick
- Layout = blGlyphRight
- end
- object BtnUp: TBitBtn
- Left = 202
- Top = 352
- Width = 22
- Height = 22
- HelpContext = 103
- Caption = '5'
- Font.Charset = SYMBOL_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Marlett'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 6
- OnClick = btnUpClick
- Layout = blGlyphRight
- end
- object EditGrid: TStringGrid
- Left = 0
- Top = 0
- Width = 193
- Height = 398
- Align = alLeft
- ColCount = 3
- DefaultColWidth = 50
- DefaultRowHeight = 18
- FixedCols = 0
- RowCount = 1
- FixedRows = 0
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 8
- OnClick = EditGridClick
- OnDblClick = EditGridDblClick
- end
- end
-