VPF::Filesize - Форум программистов

{MR.}

Дата 31.3.2005, 18:51 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

У мну тут небольшая проблема возникла...я никак не могу понять в чём дело...

Код


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 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

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

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

p0s0l

Дата 1.4.2005, 11:08 (ссылка)

(нет голосов)

Загрузка ...

Г-н Посол

Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112

Перенесено из раздела Дельфи

--------------------

С уважением, г-н Посол.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »