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
ActiveControl = MLTree
Caption = 'NodeForm'
ClientHeight = 542
ClientWidth = 773
Font.Height = -13
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
2008-12-07 14:22:32 +00:00
LCLVersion = '0.9.27'
2007-05-24 23:52:34 +00:00
object Label8: TLabel
Left = 12
Height = 72
Top = 429
Width = 732
Anchors = [akLeft, akRight, akBottom]
AutoSize = False
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'
Header.Columns = <
item
Position = 1
Width = 483
end
item
end>
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-01-24 11:00:47 +00:00
Height = 20
Top = 401
Width = 286
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