mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-07 04:18:48 +02:00
Small fix for TShellListView scrolling in wince dialogs
git-svn-id: trunk@21269 -
This commit is contained in:
parent
caf480d8bc
commit
e390c989eb
@ -203,7 +203,7 @@ begin
|
||||
ShellListView.Height := Height - ShellTreeView.Height - Panel.Height;
|
||||
ShellListView.Align := alClient;
|
||||
ShellListView.ShellTreeView := ShellTreeView;
|
||||
ShellListView.ScrollBars := ssNone;
|
||||
ShellListView.ScrollBars := ssVertical;
|
||||
ShellListView.OnSelectItem := HandleSelectItem;
|
||||
|
||||
// TEdit for save dialog
|
||||
|
Loading…
Reference in New Issue
Block a user