home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1999 January
/
pcwk_01_1999.iso
/
Top100sh
/
Internet
/
Htmltool
/
HTMLTOOL.exe
/
0
/
RCDATA
/
TFRMTABLEDATA
/
TFRMTABLEDATA.txt
Wrap
Text File
|
1998-01-30
|
8KB
|
342 lines
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