object ColorDlg: TColorDlg Left = 209 Top = 240 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Set Colors' ClientHeight = 267 ClientWidth = 433 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter OnCreate = FormCreate OnShow = FormShow TextHeight = 13 object OKBtn: TBitBtn Left = 348 Top = 8 Width = 77 Height = 27 TabOrder = 0 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 348 Top = 40 Width = 77 Height = 27 TabOrder = 1 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 348 Top = 72 Width = 77 Height = 27 TabOrder = 2 Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object GroupBox5: TGroupBox Left = 8 Top = 6 Width = 329 Height = 251 TabOrder = 3 object Label2: TLabel Left = 248 Top = 16 Width = 40 Height = 13 Caption = 'Colors:' end object Color_Lst: TDrawGrid Left = 248 Top = 32 Width = 72 Height = 210 Hint = 'Click to select a Color' ColCount = 1 DefaultColWidth = 70 DefaultRowHeight = 12 DefaultDrawing = False FixedCols = 0 FixedRows = 0 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] RowCount = 16 ScrollBars = ssNone TabOrder = 0 OnClick = Color_LstClick OnDrawCell = Color_LstDrawCell end object RadioGroup1: TRadioGroup Left = 12 Top = 26 Width = 229 Height = 111 ItemIndex = 0 Items.Strings = ( 'Text Color' 'Bgnd Color') TabOrder = 1 OnClick = RadioGroup1Click end end end