home *** CD-ROM | disk | FTP | other *** search
- object CatAddForm: TCatAddForm
- Left = 420
- Top = 209
- Width = 222
- Height = 431
- Caption = 'Categories'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object CancelBtn: TButton
- Left = 109
- Top = 376
- Width = 99
- Height = 25
- Caption = '&Cancel'
- TabOrder = 0
- OnClick = CancelBtnClick
- end
- object UseCategoryBtn: TButton
- Left = 7
- Top = 376
- Width = 97
- Height = 25
- Caption = '&Use Category'
- TabOrder = 1
- OnClick = UseCategoryBtnClick
- end
- object Panel1: TPanel
- Left = 7
- Top = 8
- Width = 201
- Height = 361
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object DBGrid1: TDBGrid
- Left = 24
- Top = 56
- Width = 153
- Height = 289
- DataSource = ToDoForm.CategoriesDataSource
- Options = [dgColumnResize, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
- ReadOnly = True
- TabOrder = 0
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = clWindowText
- TitleFont.Height = -11
- TitleFont.Name = 'MS Sans Serif'
- TitleFont.Style = []
- OnDblClick = DBGrid1DblClick
- end
- object AddCatEdit: TEdit
- Left = 24
- Top = 8
- Width = 153
- Height = 21
- TabOrder = 1
- end
- object AddBtn: TButton
- Left = 24
- Top = 32
- Width = 75
- Height = 17
- Caption = '&Add New'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -9
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = AddBtnClick
- end
- object DeleteBtn: TButton
- Left = 102
- Top = 32
- Width = 75
- Height = 17
- Caption = '&Delete'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -9
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = DeleteBtnClick
- end
- end
- end
-