Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.29;
Скачать: CL | DM;

Вниз

Определение размера zip файла:   Найти похожие ветки 

 
greenrul ©   (2002-07-16 12:18) [0]

FileSize выдает совершенно другое значение - размер файла - 428кб а FileSize говорит 3586. Есть другие функции?

Вот текст программы:

var f1:file;
......
AssignFile(f1,path);
Reset(f1);
i1:=FileSize(f1);
CloseFile(f1);
ShowMessage(IntToStr(i1));


 
Skier ©   (2002-07-16 12:24) [1]

>greenrul
А если так :


var f1:file of Byte;
......
AssignFile(f1,path);
Reset(f1);
i1:=FileSize(f1);
CloseFile(f1);
ShowMessage(IntToStr(i1));



 
PVOzerski ©   (2002-07-16 12:56) [2]

Штука в том, что FileSize выдаёт длину файла в записях, а не в байтах, а для нетипизированного файла по умолчанию (если reset вызывается без дополнительного параметра) она 128. Воспользуйтесь либо советом Skier ©, либо в своем тексте исправьте Reset(f1); на
Reset(f1,1);



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

Текущий архив: 2002.07.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
6-95472
!Daemon
2002-05-20 11:57
2002.07.29
Как проконтролировать отсылку письма из почтового клиента


3-95230
grig
2002-07-08 15:51
2002.07.29
Узнать будущее значение AutoInc поля


7-95591
Igor345
2002-04-30 03:47
2002.07.29
Производительность Win2000


3-95238
Pro
2002-07-08 21:40
2002.07.29
Накопительный отчет


14-95566
Извращенец
2002-06-28 16:57
2002.07.29
Музика для игры типа Энигматики