Delphi - Delphi

[Surround]

В ходе усилинного кодинга на делфях возниколо несколько вопросов

Помогите, плз.



1)Как можно очистить корзину?

2)Можно ли удалить непустую директорию?

3)Как получить список локальных дисков?



Спасиба

[Guest]

начну с последнего.

3)один из способо узнать список дисков это попытаться узнать объем свободного места на диске

вот так это выглядит а билдере



  AnsiString DriveList="";

  for(Byte i=1;i

[Megabizon]

Нашел пример еще проще через Шелл функцию, но сам его не пробовал

смотри здесь

http://www.rsdn.ru/Forum/?mid=434920

Вот еще на этом же ресурсе пример с рекрусией

http://www.rsdn.ru/Forum/?mid=437812

(пройдись по ответам

А ссылка в предыдущем топе работает, я проверял ее.



[s]Исправлено: Megabizon, 22:12 10-01-2004[/s]

[Megabizon]

3. смотри GetLogicalDriveStrings

2. смотри RemoveDirectory

1. смотри SHEmptyRecycleBin



[s]Исправлено: Megabizon, 23:10 9-01-2004[/s]

[Megabizon]

Megabizon

Но RemoveDirectory удаляет только пустые каталоги. А есть ли альтернативная команда для удаления любого, даже непустого, катлога?

[UZER]

Surround

имхо, чтобы удалить пустую директорию, нужно узнать, что за файлы в ней лежат, удалить их, а затем удалить директорию

[UZER]

Surround

Извини не внимательно прочитал, показалось надо пустую директорию удалить. В твоем случае придется рекруссивный обход папки делать и удалять в ней файлы. Примеров в инете масса.

[Surround]

Megabizon

А где их найти, этот
Цитата:



рекруссивный обход папки



?



Это поможет, если папака содержит несколько уровней поддиректорий?

Вроде бы RemoveDirectory даже если в директории есть пустая папка, все равно родительскую диру не удаляет....

[Megabizon]

Вот, например, на *С

http://www.softforum.ru/news.exe?cmd...em=6&utag=

Цитата:



Это поможет, если папака содержит несколько уровней поддиректорий?



Поддиректории надо тоже очищать рекрусией.

Посмотри на

http://www.torry.net

мож есть какие компоненты или классы для этого.







[s]Исправлено: Megabizon, 16:23 10-01-2004[/s]

[Surround]

Megabizon



А еще адресок можешь дать?

http://www.softforum.ru/news.exe?cmd...em=6&utag=

не работает



не а, нет там компонентов. Но все равно спасибо



Кстать, а есть где-нить электронные учебники по Delphi?