object frmDefActivity: TfrmDefActivity Left = 120 Top = 52 Width = 292 Height = 385 ActiveControl = Panel1 BorderIcons = [biSystemMenu, biMaximize] Caption = 'Activities' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 284 Height = 41 Align = alTop TabOrder = 0 object Button1: TButton Left = 18 Top = 8 Width = 75 Height = 25 Caption = 'Add' TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 108 Top = 8 Width = 75 Height = 25 Caption = 'Delete' TabOrder = 1 OnClick = Button2Click end end object Panel2: TPanel Left = 0 Top = 41 Width = 284 Height = 276 Align = alClient BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' TabOrder = 1 object grdMain: TwwDBGrid Left = 6 Top = 6 Width = 272 Height = 264 Selected.Strings = ( 'ActDesc'#9'50'#9'Activities') TitleColor = clBtnFace FixedCols = 0 ShowHorzScrollBar = True Align = alClient DataSource = frmDataModule.DSActDesc Options = [dgEditing, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap] TabOrder = 0 TitleAlignment = taLeftJustify TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] TitleLines = 1 TitleButtons = False IndicatorColor = icBlack end end object Panel3: TPanel Left = 0 Top = 317 Width = 284 Height = 41 Align = alBottom TabOrder = 2 object BitBtn1: TBitBtn Left = 94 Top = 8 Width = 75 Height = 25 TabOrder = 0 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 184 Top = 8 Width = 75 Height = 25 TabOrder = 1 Kind = bkCancel end end end