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

Вниз

размер   Найти похожие ветки 

 
~Aid~   (2006-10-29 14:40) [0]

как получить размер файла имея полный путь?


 
MikePetrichenko ©   (2006-10-29 14:44) [1]

MSDN - GetFileSize, GetFileSizeEx


 
MikePetrichenko ©   (2006-10-29 14:45) [2]

Да, в догонку, забыл:
Еще можно в Проводнике, TotalCommander, Far посмотреть.


 
MBo ©   (2006-10-29 14:48) [3]

FindFirst и заглянуть в TSearchRec


 
~Aid~   (2006-10-29 14:48) [4]

можно пример с FileSize или GetFileSize


 
Eraser ©   (2006-10-29 14:49) [5]

> [1] MikePetrichenko ©   (29.10.06 14:44)

в некоторых обстоятельствах лучше даже FindFirst/NextFile.


 
Орион ©   (2006-10-29 15:03) [6]

> [4] ~Aid~   (29.10.06 14:48)

лучше так:

function MyGetFileSize(AFileName: string): Integer;
var
 Stream: TFileStream;
begin
 if FileExitsts(AFileName) then
 begin
   Stream:=TFileStream.Create(AFileName, fmOpenRead);
   Result:=Stream.Size;
   Stream.Free;
 end else Result:=0;
end;


 
Орион ©   (2006-10-29 15:03) [7]

FileExitsts = FileExists


 
Anatoly Podgoretsky ©   (2006-10-29 15:04) [8]

> Ответ на сообщение [4]

> можно пример с FileSize

А в справке посмотреть?
Ну можно конечно скопировать из справки, но это уже услуга со всеми
вытекающими из этого последствиями.
Рассказывай каким методом можешь оплатить услугу по копированию примера из
справки?


 
Орион ©   (2006-10-29 15:07) [9]

> [8] Anatoly Podgoretsky ©   (29.10.06 15:04)
>Рассказывай каким методом можешь оплатить услугу по копированию примера из
справки?


%)))


 
MikePetrichenko ©   (2006-10-29 16:08) [10]

А если пришлет файл, то я так посмотрю. Даже copy/past-ом не напрягусь.
Если траффик оплатит :)



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

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

Наверх




Память: 0.48 MB
Время: 0.054 c
15-1161603729
kan
2006-10-23 15:42
2006.11.12
Проверка диска при загрузке WinXP


8-1144273040
QuickFinder
2006-04-06 01:37
2006.11.12
Декомпиляция Flash-файла


2-1161775849
KyRo
2006-10-25 15:30
2006.11.12
Код Enter


15-1161338945
default
2006-10-20 14:09
2006.11.12
По мотивам двойного хеширования;)


2-1161675853
kirillrepin
2006-10-24 11:44
2006.11.12
TStringList