2007-05-24 23:52:34 +00:00
object NodeForm: TNodeForm
2007-06-03 15:13:22 +00:00
Left = 497
2007-05-24 23:52:34 +00:00
Height = 542
Top = 332
Width = 773
2009-12-31 11:39:42 +00:00
ActiveControl = Panel1
2007-05-24 23:52:34 +00:00
Caption = 'NodeForm'
ClientHeight = 542
ClientWidth = 773
Font.Height = -13
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
2009-12-31 11:39:42 +00:00
LCLVersion = '0.9.29'
2007-05-24 23:52:34 +00:00
object Label8: TLabel
Left = 12
2009-12-31 11:39:42 +00:00
Height = 102
Top = 424
2007-05-24 23:52:34 +00:00
Width = 732
Anchors = [akLeft, akRight, akBottom]
Caption = 'Since Virtual Treeview uses Unicode for text display it is not easy to provide multiline support on Windows 9x/Me systems. Under Windows NT (4.0, 2000, XP) there is support by the operation system and so full word breaking is possible there. Otherwise you have to insert line breaks manually to have multiline captions. Of course there is no difference in handling between multiline and single line nodes (except for the vertical alignment of the latter).'
ParentColor = False
ShowAccelChar = False
WordWrap = True
end
object Panel1: TPanel
Left = 12
Height = 393
Top = 4
Width = 732
Anchors = [akTop, akLeft, akRight, akBottom]
ClientHeight = 393
ClientWidth = 732
Color = clAppWorkspace
ParentColor = False
TabOrder = 0
object MLTree: TVirtualStringTree
Left = 96
Height = 373
Top = 8
Width = 549
Anchors = [akTop, akLeft, akRight, akBottom]
ClipboardFormats.Strings = (
'CSV'
'HTML Format'
'Plain text'
'Rich Text Format'
'Rich Text Format Without Objects'
'Unicode text'
'Virtual Tree Data'
)
Colors.SelectionRectangleBlendColor = 10539203
DefaultNodeHeight = 130
2009-01-24 11:00:47 +00:00
DefaultText = 'Node'
2009-12-31 11:39:42 +00:00
Header.AutoSizeIndex = 0
2009-01-24 11:00:47 +00:00
Header.Columns = <
item
Position = 1
2009-12-31 11:39:42 +00:00
Width = 495
2009-01-24 11:00:47 +00:00
end
item
2009-12-31 11:39:42 +00:00
Position = 0
2009-01-24 11:00:47 +00:00
end>
2009-12-31 11:39:42 +00:00
Header.DefaultHeight = 17
2007-05-24 23:52:34 +00:00
Header.Font.Height = -11
Header.Font.Name = 'MS Sans Serif'
Header.Options = [hoAutoResize, hoColumnResize, hoDrag]
HintMode = hmTooltip
LineMode = lmBands
NodeAlignment = naFromTop
NodeDataSize = 4
ParentShowHint = False
RootNodeCount = 30
SelectionCurveRadius = 10
ShowHint = True
TabOrder = 0
TextMargin = 5
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoScrollOnExpand, toAutoSpanColumns, toAutoTristateTracking, toAutoDeleteMovedNodes]
TreeOptions.MiscOptions = [toEditable, toInitOnSave, toReportMode, toToggleOnDblClick, toWheelPanning]
TreeOptions.PaintOptions = [toHideFocusRect, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages]
TreeOptions.SelectionOptions = [toMultiSelect]
OnEditing = MLTreeEditing
OnGetText = MLTreeGetText
OnPaintText = MLTreePaintText
OnInitNode = MLTreeInitNode
OnMeasureItem = MLTreeMeasureItem
OnStateChange = MLTreeStateChange
end
end
object AutoAdjustCheckBox: TCheckBox
Left = 12
2009-12-31 11:39:42 +00:00
Height = 22
Top = 399
Width = 327
2007-05-24 23:52:34 +00:00
Anchors = [akLeft, akBottom]
Caption = 'Automatically adjust node height to node text.'
OnClick = AutoAdjustCheckBoxClick
TabOrder = 1
end
end