Sign in Join
Wiki copytemporary

Shell Controls/ru: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: Shell Controls/ru

OldNewLine
1+### TShellTreeView
2+
3+Компонент TShellTreeView находится на вкладке Misc.
4+
5+<div>
6+
7+<figure>
8+<img src="TShellTreeView.png" title="TShellTreeView.png" />
9+<figcaption>TShellTreeView.png</figcaption>
10+</figure>
11+
12+</div>
13+
14+Свойства компонента TShellTreeView.
15+
16+<div>
17+
18+<figure>
19+<img src="Property.png" title="Property.png" />
20+<figcaption>Property.png</figcaption>
21+</figure>
22+
23+</div>
24+
25+Добавим компонент TShellListView. Соответственно укажем эти компоненты в свойствах друг друга.
26+
27+<div>
28+
29+<figure>
30+<img src="Выделение_221.png" title="Выделение_221.png" />
31+<figcaption>Выделение_221.png</figcaption>
32+</figure>
33+
34+</div>
35+
36+Запустим программу. В Linux отображается корневой каталог.
37+
38+<div>
39+
40+<figure>
41+<img src="Form1_220.png" title="Form1_220.png" />
42+<figcaption>Form1_220.png</figcaption>
43+</figure>
44+
45+</div>
46+
47+А лучше сделать текстовым способом.
48+
49+``` pascal
50+procedure TForm1.FormCreate(Sender: TObject);
51+begin
52+ ShellTreeView2:= TShellTreeView.create(Form1);
53+ ShellTreeView2.Left:=10;
54+ ShellTreeView2.Top:=10;
55+ ShellTreeView2.Width:=250;
56+ ShellTreeView2.Height:=430;
57+ ShellTreeView2.Parent:=Form1;
58+end;
59+```
60+
61+<div>
62+
63+<figure>
64+<img src="Form1_222.png" title="Form1_222.png" />
65+<figcaption>Form1_222.png</figcaption>
66+</figure>
67+
68+</div>
69+
70+---
71+*From the Free Pascal wiki, page "Shell Controls/ru", as it stood on 2020-02-26 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history