Метод FindFirst и FindNext возвращают имена папок не в алфавитном порядке. Как решить эту проблему?
Большое спасибо за предыдущий совет Администратору
Надо было мне с самого начала, заниматься серьезными языками программирования, а не каким-то там Visual Basic 6.0 Pro
Надо было мне с самого начала, заниматься серьезными языками программирования, а не каким-то там Visual Basic 6.0 Pro
Сам уже решил эту проблему, может не совсем красиво, главное, что работает:
var My_list: TStringList;
My_list := My_list.Create;
...
My_list.Add(SearchRec.Name);
....
My_list.Sort;
var My_list: TStringList;
My_list := My_list.Create;
...
My_list.Add(SearchRec.Name);
....
My_list.Sort;