Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Filesize


Автор: {MR.} 31.3.2005, 18:51
У мну тут небольшая проблема возникла...я никак не могу понять в чём дело...
Код

var
si:integer=0;
fl:File;
...
procedure tform1.button1Click (sender:Tobject);
assignfile(fl,'file.txt');
si:=si+filesize(fl);
end;


Дельфи говорит про исключение EInOutError с сообщением I/O error 103, и что виновата в этом строка si:=si+filesize(fl);
я что то не понимаю..эта функция возвращает Integer, si- это тоже Integer, почему нельзя так делать? Или дело в самой функции или в файле fl ? Помогите ...

Автор: Snowy 1.4.2005, 07:43
FileSize - возвращает размер файла в указанных записях.
Т.е. если хочешь получить размер в байтах, то указывай
fl: file of byte;
а не просто file.

P.S. Если все же хочешь использовать тип file; , тогда придется делать Reset с указанием размера структуры. Но это так, примечание.

Автор: p0s0l 1.4.2005, 11:08
Перенесено из раздела Дельфи

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)