home *** CD-ROM | disk | FTP | other *** search
- 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
-