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

Вниз

проблема с удалением файла   Найти похожие ветки 

 
Ganjo   (2003-11-01 01:22) [0]

Мне нужно удалить файл.
Я использую Deletefile(Name)но почемуто файл не удаляется что здесь может быть и есть ли другие способы удаления


 
Ihor Osov'yak   (2003-11-01 01:33) [1]

Может конструкция вида
if not DeleteFile("blabla")
then ShowMessage(SysErrorMessage(GetLastError));
подскажет причину твоих трабл?


 
Ganjo   (2003-11-01 01:40) [2]

тут получается следуящая фишка:
"процес не может получить доступ к файлу поскольку оно занято другим приложением". Но я перед етим закрываю файл CloseFile(f)?!


 
Ihor Osov'yak   (2003-11-01 01:50) [3]

Ты можешь так закрыть файл, если его сам открыл.. И не можешь таким способом закрыть файл, открытый другим приложением..


 
Ganjo   (2003-11-01 01:59) [4]

В чем суть: я открываю файл Reset(f)и создаю новый rewrite(f1).
Копирую часть файла f в f1 закрываю оба файла и хочу удалить f
deletefile(f)


 
Ihor Osov'yak   (2003-11-01 02:05) [5]

Раз написано занято, значит занято..
Ищите ошибку в районе 17 строки.


 
Ihor Osov'yak   (2003-11-01 02:08) [6]

Зы. Код бы привел, что ли..


 
Ganjo   (2003-11-01 02:15) [7]

Assignfile(f,filename);
Assignfile(f1,getcurrentdir+"\Bases\"+"temp");
reset(f);
rewrite(f1);
while not eof(f) do
begin
read(f,dan);
if i<>delitem then write(f1,dan);
i:=i+1;
end;
closefile(f);
closefile(f1);
deleteFile(filename);
RenameFile(getcurrentdir+"\Bases\"+"temp",filename);


 
default   (2003-11-01 02:20) [8]

попробуй deleteFile(filename); замени на Erase(f)


 
default   (2003-11-01 02:25) [9]

Erase работает для закрытых файлов, а DeleteFile, наверно, для открытых раз ошибка...в хелпе смотри


 
Ganjo   (2003-11-01 02:36) [10]

Спасибо ребята за советы.
Я нашел в чем проблема. Ответ банальный. В совсем другой процедуре я открыл файл и просто забыл закрыть. поетому нет доступа к файлу.


 
Anatoly Podgoretsky   (2003-11-01 11:28) [11]

Видишь OC тебе не обманывала.


 
Song   (2003-11-01 12:39) [12]

>> а DeleteFile, наверно, для открытых раз ошибка..
О как! :)



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

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

Наверх




Память: 0.46 MB
Время: 0.043 c
1-41429
PavelSin
2003-10-29 14:46
2003.11.13
Keyboard in Delphi


3-40802
Alex_x
2003-10-22 10:35
2003.11.13
Странная ситуация С ADO запросом


1-41183
kopcap
2003-11-02 18:28
2003.11.13
За скока времени выполнится функция


14-41998
Song
2003-10-24 11:50
2003.11.13
Invalid System Disk, Insert Disk and Hit Enter


14-41935
konstantinov
2003-10-20 21:45
2003.11.13
Подскажите формулу градусы Кельвина -> Фаренгейт





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский