Проблемка с доступом к файлу на CD

← →
DLL (2004-06-07 22:39) [0]

Нужно узнать размер файла на CD. Есть такой код:

var ...
F:File of byte;
begin
...
AssignFile(F,filename);
Reset(F);
TabGrid[i]:=IntToStr(Trunc(FileSize(F)));
CloseFile(F);
...
end;

Но выходит ошибка в строке Reset(F): "File access denied". Может кто-нибудь знает в чем может быть загвоздка? Помогите плыз.

← →
YuRock (2004-06-07 22:54) [1]

Советую использовать апишную GetFileSize - она даст тебе размер.
Предварительно надо открыть файл ч-з OpenFile или CreateFile, причем желательно в совместном режиме (OF_SHARE_DENY_NONE)

← →
DLL (2004-06-07 22:57) [2]

спасибо, попробую

← →
Palladin © (2004-06-07 23:35) [3]

А можно не заморачиватся, а просто выставить перед Reset, FileMode=0;

← →
DLL (2004-06-08 00:06) [4]

Все, получилось с апишными функциями. Спасибо, YuRock.
Palladin, а что дает FileMode=0?

абсолютно тоже самое что и OpenFile с OF_READ...
справка законом еще не запрещена...

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