mirror of https://gitlab.com/basile.b/dexed.git
mini explorer, folders not always sorted
This commit is contained in:
parent
d3be3af0b7
commit
825bcfd2f5
|
@ -614,6 +614,7 @@ begin
|
|||
lst := TStringList.Create;
|
||||
try
|
||||
listFolders(lst, PString(aRoot.Data)^ + directorySeparator);
|
||||
lst.Sort;
|
||||
for fold in lst do
|
||||
begin
|
||||
itm := Tree.Items.AddChild(aRoot, fold.extractFileName);
|
||||
|
|
Loading…
Reference in New Issue