Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Размер файла [D6, NT4]


roman002 ©   (2002-07-18 11:07:00) 

Подскажите плз фун. для определения размера файла


Lord Warlock   (2002-07-18 16:34:00) [1]

А можно просто - AssignFile(f,...), FileSize(F), CloseFile(F)


Suntechnic   (2002-07-18 16:27:00) [2]

Можно и без хэндла обойтись воспользовавшись например FindFirstFile.


Viewer   (2002-07-18 14:26:00) [3]

with TfileStream.Create("C:\QQQ.txt",fmOpenread) do
try
ShowMessage(IntToStr(Size)); // вот оно !!
finally
Free;
end;


Толик   (2002-07-18 12:44:00) [4]

hFile берётся из ф-и CreateFile (см. help).


roman002   (2002-07-18 11:38:00) [5]

Тогда как мне определить hFile, IpFileSizeHigh я так понимаю можно приравнять к null


Толик   (2002-07-18 11:22:00) [6]

тупо, до безобразия:
DWORD GetFileSize(
HANDLE hFile, // handle of file to get size of
LPDWORD lpFileSizeHigh // address of high-order word for file size
);


Наверх

Титульная страница Поиск, карта сайта Написать письмо