Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];

Вниз

Не могу удалить папки   Найти похожие ветки 

 
ZZZ_AC   (2004-03-18 17:44) [0]

Вопрос в следующем есть файл со списком папок и файлов и такая его обработка
while not EOF(Log) do
begin
ReadLn(Log,sRazdel);
if NOT DirectoryExists(sRazdel) then  ShowMessage("Нет такой директории");
RemoveDir(ExtractFileDir(sRazdel));
end;
В результате работы не удаляеться не одна директория. Причем все папки пустые пустые. На проверу DirectoryExists тоже не ругаеться
т.е. говорит что дирретория есть но ее не удаляет.


 
Reindeer Moss Eater ©   (2004-03-18 17:49) [1]

Потому что проверяешь наличие c:\test\test
а удаляешь c:\test

которая ни разу не пустая


 
Defunct ©   (2004-03-18 17:55) [2]

if NOT DirectoryExists(sRazdel) then  ShowMessage("Нет такой директории") Else
RemoveDir(sRazdel);


Хорошо бы вначале войти в каталог и проверить, что он действительно пуст.


 
zZz_AC   (2004-03-18 18:00) [3]

Но если я заменяю
RemoveDir(ExtractFileDir(sRazdel));
на
RemoveDir(sRazdel);
Так-же не удаляет.


 
Reindeer Moss Eater ©   (2004-03-18 18:04) [4]

sRazdel является текущей для какого-то процесса.
Занята одним словом.
Или непуста.


 
Fay ©   (2004-03-18 18:10) [5]

GetLastError что выдаёт?


 
ZZZ_AC   (2004-03-18 18:11) [6]

А можно ли как то проверить кем она занята и освободить?
она точно пуста


 
Fay ©   (2004-03-18 18:14) [7]

GetLastError что выдаёт????????????????????


 
Defunct ©   (2004-03-18 18:16) [8]

> А можно ли как то проверить кем она занята и освободить?

Попробовать удалить, если не удаляется значит занята.

> она точно пуста

Последнее очень сомнительно


 
ZZZ_AC   (2004-03-18 18:34) [9]

Удаляеться на раз без проблемм посредством wincom+F8.
И она точно пуста нет в ней нечего.
GetLastError выдает 32.


 
Reindeer Moss Eater ©   (2004-03-18 18:37) [10]

Твоя программа имеет эту папку в качестве текущего каталога.
Твоя прога открыла и держит эту папку.
Твоя прога сама себе мешает удалить её.


 
ZZZ_AC   (2004-03-18 18:43) [11]

О люди Всем огромное спасибо!
На самом деле нашёл что забыл закрыть поиск.
Добавил всего лишь одну строчку и все заработало FindClose(SearchRD);

Еще раз огромное спасибо!!!!!


 
Fay ©   (2004-03-18 20:50) [12]

ERROR_SHARING_VIOLATION


 
Cobalt ©   (2004-03-18 22:49) [13]

> ZZZ_AC   (18.03.04 18:43) [11]
Ты, случаем, не Dr.Web пишешь?  А то у него точно такие же грабли - не закрывает за собой папки, сволочь!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.061 c
3-1078272937
Алексей
2004-03-03 03:15
2004.04.04
SQL запрос из трех баз


14-1077511275
Тумар
2004-02-23 07:41
2004.04.04
Как вас поздравили с 23 февраля?


14-1078587759
Mox Fulder
2004-03-06 18:42
2004.04.04
Стыдно!


6-1074780913
Sla
2004-01-22 17:15
2004.04.04
И снова multicast


1-1079215766
Димка
2004-03-14 01:09
2004.04.04
Принтер





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский