Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c