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

Файл текстового типа (textfile). Как узнать его размер ?   Найти похожие ветки 

← →
Виноградов Алексей   (2004-05-25 17:53) [0]

Спасибо ...

---

← →
GuAV ©   (2004-05-25 21:01) [1]

GetFileSize(TTextRec(... ).Handle, ...)

---

← →
Mameluke ©   (2004-05-25 21:04) [2]

Размер в байтах или количество строк? Для первого существует функция FileSize (подробнее см. help файл Delphi), для второго можно организовать цикл по while not(EOF(F)) (F - файловая переменная) с использованием ReadLn и переменной-счетчиком.

---

← →
Vit@ly ©   (2004-05-25 21:21) [3]

А можно просто
FileSize(f);
независимо от типа файла

---

← →
GuAV ©   (2004-05-25 21:35) [4]

[2], [3]
FileSize - для Текстового вернёт не в байтах не в строках а в кусках по 128...

---

← →
Германн ©   (2004-05-26 02:00) [5]

2 GuAV ©   (25.05.04 21:35) [4]
FileSize - для Текстового вернёт не в байтах не в строках а в кусках по 128...

А это смотря как открывать сей файл!
см. Хэлп -
Note: FileSize can"t be used on a text file.

---

← →
GuAV ©   (2004-05-26 02:12) [6]

> А это смотря как открывать сей файл!

По условию textfile. Или вы о другом?

> Note: FileSize can"t be used on a text file.

Ну да, FileSize не работает, а так вроде работает:

> GetFileSize(TTextRec(... ).Handle, ...)

---

← →
BFG9k   (2004-06-03 15:04) [7]

Забудьте вы вообще о текстовых файлах. Это атавизм паскаля. Делается так.

var Str:TStrings;
begin
Str:=TStringList.Create;
Str.LoadFromFile("...");
...
//доступ ко всему файлу в виде одной строки
//(не бойтесь, динамическая строка - до 2 ГБ)
...:=Str.Text;
//или по строкам
...:=Str[i];
...
Str.Free;

end;

---

← →
Vlad Oshin ©   (2004-06-03 15:09) [8]

сказать, что файл не текстовый и
> FileSize

---

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

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



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