Difference between revisions of "Shell Controls/ru"

From Free Pascal wiki
Jump to navigationJump to search
m (categories)
m (Fixed syntax highlighting; deleted category included in page template)
 
Line 12: Line 12:
 
<div>[[Image:Form1 220.png]]</div>
 
<div>[[Image:Form1 220.png]]</div>
 
А лучше сделать текстовым способом.
 
А лучше сделать текстовым способом.
<syntaxhighlight>procedure TForm1.FormCreate(Sender: TObject);
+
<syntaxhighlight lang=pascal>procedure TForm1.FormCreate(Sender: TObject);
 
begin
 
begin
 
   ShellTreeView2:= TShellTreeView.create(Form1);
 
   ShellTreeView2:= TShellTreeView.create(Form1);
Line 22: Line 22:
 
end;  </syntaxhighlight>
 
end;  </syntaxhighlight>
 
<div>[[Image:Form1 222.png]]</div>
 
<div>[[Image:Form1 222.png]]</div>
 
Mihail Chichkanov
 
 
 
{{AutoCategory}}
 
[[Category:LCL/ru]]
 
[[Category:Components/ru]]
 
[[Category:GUI/ru]]
 

Latest revision as of 12:44, 26 February 2020

English (en) русский (ru)

TShellTreeView

Компонент TShellTreeView находится на вкладке Misc.

TShellTreeView.png

Свойства компонента TShellTreeView.

Property.png

Добавим компонент TShellListView. Соответственно укажем эти компоненты в свойствах друг друга.

Выделение 221.png

Запустим программу. В Linux отображается корневой каталог.

Form1 220.png

А лучше сделать текстовым способом.

procedure TForm1.FormCreate(Sender: TObject);
begin
   ShellTreeView2:= TShellTreeView.create(Form1);
   ShellTreeView2.Left:=10;
   ShellTreeView2.Top:=10;
   ShellTreeView2.Width:=250;
   ShellTreeView2.Height:=430;
   ShellTreeView2.Parent:=Form1;
end;
Form1 222.png