1 |
inherited Form_Meta: TForm_Meta |
2 |
Caption = 'Form_Meta' |
3 |
OnCreate = FormCreate |
4 |
PixelsPerInch = 96 |
5 |
TextHeight = 13 |
6 |
inherited panel_basecontent: TPanel |
7 |
ExplicitLeft = 0 |
8 |
ExplicitTop = 25 |
9 |
ExplicitWidth = 598 |
10 |
ExplicitHeight = 532 |
11 |
object splitter: TSplitter |
12 |
Left = 502 |
13 |
Top = 0 |
14 |
Width = 8 |
15 |
Height = 532 |
16 |
Align = alRight |
17 |
AutoSnap = False |
18 |
Beveled = True |
19 |
MinSize = 200 |
20 |
ExplicitLeft = 353 |
21 |
end |
22 |
object VST: TVirtualStringTree |
23 |
Left = 0 |
24 |
Top = 0 |
25 |
Width = 502 |
26 |
Height = 532 |
27 |
Align = alClient |
28 |
AnimationDuration = 0 |
29 |
Header.AutoSizeIndex = 0 |
30 |
Header.Font.Charset = DEFAULT_CHARSET |
31 |
Header.Font.Color = clWindowText |
32 |
Header.Font.Height = -11 |
33 |
Header.Font.Name = 'Tahoma' |
34 |
Header.Font.Style = [] |
35 |
Header.Options = [hoColumnResize, hoDrag, hoVisible] |
36 |
TabOrder = 0 |
37 |
TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoDeleteMovedNodes] |
38 |
TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] |
39 |
OnFocusChanged = VSTFocusChanged |
40 |
OnFocusChanging = VSTFocusChanging |
41 |
OnGetText = VSTGetText |
42 |
OnPaintText = VSTPaintText |
43 |
OnInitChildren = VSTInitChildren |
44 |
Columns = < |
45 |
item |
46 |
Position = 0 |
47 |
Width = 250 |
48 |
WideText = 'FName' |
49 |
end |
50 |
item |
51 |
Position = 1 |
52 |
WideText = 'FType' |
53 |
end |
54 |
item |
55 |
Position = 2 |
56 |
WideText = 'FID' |
57 |
end |
58 |
item |
59 |
Position = 3 |
60 |
WideText = 'Data' |
61 |
end> |
62 |
end |
63 |
object Panel2: TPanel |
64 |
Left = 510 |
65 |
Top = 0 |
66 |
Width = 88 |
67 |
Height = 532 |
68 |
Align = alRight |
69 |
BevelOuter = bvNone |
70 |
Caption = 'Panel2' |
71 |
TabOrder = 1 |
72 |
end |
73 |
end |
74 |
end |