object FrmTableData: TFrmTableData Left = 413 Top = 129 BorderStyle = bsDialog Caption = 'Table data' ClientHeight = 329 ClientWidth = 202 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 TextHeight = 16 object lblColSpan: TLabel Left = 8 Top = 72 Width = 41 Height = 13 Caption = '&Col span' FocusControl = seColSpan Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblRowSpan: TLabel Left = 8 Top = 104 Width = 48 Height = 13 Caption = '&Row span' FocusControl = seRowSpan Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblWidth: TLabel Left = 8 Top = 168 Width = 28 Height = 13 Caption = '&Width' FocusControl = EditWidth Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblAlign: TLabel Left = 8 Top = 8 Width = 23 Height = 13 Caption = '&Align' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblVAlign: TLabel Left = 8 Top = 40 Width = 30 Height = 13 Caption = '&VAlign' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblBackgroundColor: TLabel Left = 8 Top = 200 Width = 61 Height = 26 Caption = '&Background color' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object lblHeight: TLabel Left = 8 Top = 136 Width = 31 Height = 13 Caption = '&Height' FocusControl = EditHeight Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object cbAlign: TComboBox Left = 80 Top = 8 Width = 113 Height = 21 Hint = 'Alignment of data within cell' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Center' 'Left' 'Right') ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 end object cbVAlign: TComboBox Left = 80 Top = 40 Width = 113 Height = 21 Hint = 'Vertical alignment of data within cell' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Baseline' 'Bottom' 'Middle' 'Top') ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 end object cbBackgroundColor: TComboBox Left = 80 Top = 200 Width = 113 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Aqua' 'Black' 'Blue' 'Fuchsia' 'Gray' 'Green' 'Lime' 'Maroon' 'Navy' 'Olive' 'Purple' 'Red' 'Silver' 'Teal' 'White' 'Yellow') ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 6 OnChange = cbBackgroundColorChange end object seRowSpan: TSpinEdit Left = 80 Top = 104 Width = 113 Height = 22 Hint = 'Number of rows cell should span' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 100000 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 Value = 0 end object seColSpan: TSpinEdit Left = 80 Top = 72 Width = 113 Height = 22 Hint = 'Number of columns cell should span' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 100000 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 Value = 0 end object cbNoWrap: TCheckBox Left = 8 Top = 264 Width = 65 Height = 17 Hint = 'Prevent data from wrapping ?' Caption = ' &No wrap' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 8 end object pnlColor: TPanel Left = 104 Top = 232 Width = 89 Height = 25 Hint = 'Currently selected color' BevelInner = bvRaised BevelOuter = bvLowered Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 9 end object btnOK: TButton Left = 8 Top = 296 Width = 89 Height = 25 Caption = 'OK' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 10 end object btnCancel: TButton Left = 104 Top = 296 Width = 89 Height = 25 Caption = 'Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 11 end object btnColor: TBitBtn Left = 8 Top = 232 Width = 89 Height = 25 Hint = 'Set color' Caption = '&Color' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = btnColorClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777703333300 7777777788888888777777733B7B7B7B007777788777777788777737B7B74447 B707778777778FF77787737B117B44447B707877FF77888F777833B99917B744 B7B0887888F7778877783B7B997B7B7B7B70877788777777777837B7B7B7B000 073087777777788887883B222B7B70F40707877FF77778F8878737AA27B7B000 40778788F777788888773BAA7B7B7B737407878877777778788737B7B555B730 778087777FFF778877883F7BFFF57B0777008777888F7787778833F7BFF7B307 7700887778877887778873FF7B7B70777770787F7777787777787733FFF30777 77777788FFF88777777777733333777777777778888877777777} NumGlyphs = 2 end object EditHeight: TEdit Left = 80 Top = 136 Width = 113 Height = 21 Hint = 'Enter the height of the cell' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 4 end object EditWidth: TEdit Left = 80 Top = 168 Width = 113 Height = 21 Hint = 'Enter the width of the cell' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 end object DlgBackgroundColor: TColorDialog Ctl3D = True Left = 160 Top = 296 end end