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

Вниз

Как определить размер textfile?   Найти похожие ветки 

 
Ньюбик   (2004-11-29 18:15) [0]

Может быть это популярный вопрос, но ответа на него не нашёл.
Мне интересно, как найти размер текстового файла. Filesize не подходит (в хелпе так и сказано: "FileSize can"t be used on a text file."). И как быть?

Помогите пожалуйста написать процедуру определения размера файла.


 
Smithson   (2004-11-29 18:17) [1]

так же, как и любого другого. FileSize + F1.


 
Gero ©   (2004-11-29 18:19) [2]

А никто не знает, текстовый у тебя файл или нет.
Как ты скажешь - так и будет.
Так что FileSize подходит вполне.
Кроме этого, еще есть GetFileSize.


 
Ньюбик   (2004-11-29 18:21) [3]

2 Gero
"Кроме этого, еще есть GetFileSize."
Подскажите пожалуйста, как с помощью GetFileSize определить размер файла? Только поподробнее если можно. Я ньюбик.

2 Smithson
"так же, как и любого другого. FileSize + F1."
FileSize не подходит для textfile (есть такой тип). Можно конечно сделать file of char... Только вот уже немало кода написано для textfile (всякие операторы readln и т.п.) - не хотелось бы всё переделывать.


 
jack128 ©   (2004-11-29 18:26) [4]

Ньюбик   (29.11.04 18:21) [3]
Я ньюбик.

Не-а. Это ты в онлайн играх ньюбик, а здесь ты чайник ;-)

var
 f: TextFile;
begin
...
 Result := GetFileSize(TTextRec(f).Handle, nil);
...
end;


 
Ньюбик   (2004-11-29 18:30) [5]

2 jack128
> Это ты в онлайн играх ньюбик
Не знаю, в онлайн-игры не играю (кроме как в UT иногда). Ньюбиками часто на форумах называют  людей, у которых мало постов.
>, а здесь ты чайник ;-)
кто бы спорил, я не буду :)

> Result := GetFileSize(TTextRec(f).Handle, nil);
Merci Beaucoup very mach! :)  Собственно это мне и надо было (сейчас проверил, всё работает). Ещё раз спасибо.



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

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

Наверх




Память: 0.48 MB
Время: 0.025 c
3-1100428858
denis24
2004-11-14 13:40
2004.12.12
TcustomAdodateset.filter


10-1070893387
VaS
2003-12-08 17:23
2004.12.12
COM: Падение клиента и сервера


14-1100858389
BorisUK
2004-11-19 12:59
2004.12.12
Задача


1-1101847008
noname:)
2004-11-30 23:36
2004.12.12
Алгоритм шифрования DES


14-1101233171
Igorek
2004-11-23 21:06
2004.12.12
Вспомним В.Цоя