Difference between revisions of "Shell Controls"
From Free Pascal wiki
Jump to navigationJump to searchSekelsenmat (talk | contribs) |
Eastorwest (talk | contribs) |
||
Line 8: | Line 8: | ||
Component Properties TShellTreeView. | Component Properties TShellTreeView. | ||
<div>[[Image:Property.png]]</div> | <div>[[Image:Property.png]]</div> | ||
+ | Add component TShellListView. Set properties | ||
+ | <syntaxhighlight> | ||
+ | ShellTreeView1.ShellListView := ShellListView1; | ||
+ | ShellListView1.ShellTreeView := ShellTreeView1; | ||
+ | </syntaxhighlight> | ||
+ | <div>[[Image:Выделение 221.png]]</div> | ||
+ | Run application. We can see root directory in Linux. | ||
+ | <div>[[Image:Form1 220.png]]</div> | ||
+ | Better way to do is: | ||
+ | <syntaxhighlight>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; </syntaxhighlight> | ||
+ | <div>[[Image:Form1 222.png]]</div> | ||
+ | |||
+ | Mihail Chichkanov |
Revision as of 09:16, 26 August 2012
│
English (en) │
русский (ru) │
The Shell Controls are a series of advanced controls destinated to beaultifully represent files and directories of the system.
TShellTreeView
TShellTreeView component under the tab Misc.
Component Properties TShellTreeView.
Add component TShellListView. Set properties
ShellTreeView1.ShellListView := ShellListView1;
ShellListView1.ShellTreeView := ShellTreeView1;
Run application. We can see root directory in Linux.
Better way to do is:
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;
Mihail Chichkanov