Форум: "Основная";
Поиск по всему сайту: 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.72 MB
Время: 0.023 c
4-28554           Игорь2                2001-11-08 23:47  2002.01.10  
кодировка


3-28405           Desdechado            2001-12-05 16:09  2002.01.10  
IB по модемному каналу


4-28563           Дремучий              2001-11-09 14:43  2002.01.10  
Все свободны. А Вас, Штирлиц, я попрошу задержаться.


7-28550           Eduard1               2001-09-28 14:04  2002.01.10  
Hook - Help me


4-28552           Dark_Dan              2001-10-28 16:17  2002.01.10  
Хочется быть первым...