Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];



Вниз

HELP ME!!!!!!!!!!!!!! 

AVALLOGIGS   (2001-12-22 13:27) [0]

Как мне узнать размер файла не через Filesize. К примеру мне надо узнать точный разер файла c:\text.txt можно через GetFileSize ПОМОГИТЕ

---

AVALLOGIGS   (2001-12-22 13:51) [1]

&&&???

---

Вадим   (2001-12-22 14:06) [2]

funtion GetFileSize(const FileName: string): integer;
var
Stream: TFileStream;
begin
Stream := TFileStream.Create(FileName, mfOpenRead);
try
Result := Stream.Size;
finally
Stream.Free;
end;
end;

---

AVALLOGIGS   (2001-12-22 14:34) [3]

СПАСИБО БООООЛЬШоЕ

---

Anatoly Podgoretsky   (2001-12-22 18:47) [4]

Хочу предупредить, что данным методом у тебя не всегда получится, файл может быть закрыт для чтения, лучше делвть это при помощи FindFirst

---

Иван Шихалев   (2001-12-22 18:50) [5]

API GetFileSize - тоже неплохо, если не расчитываешь то же саме делать под Linux.

---

Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.74 MB
Время: 0.015 c