| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать размер exe из него же?
leonidus © (2008-04-21 17:20:00)Собственно сабж.
Пробовал сделать так:
function GetFileSize(const FileName: String): Integer;
var
F: File of Byte;
begin
try
AssignFile(F,FileName);
Reset(F);
Result:=FileSize(F);
CloseFile(F);
except
Result:=0;
end;
end;
получаю I/O 32.
leonidus (2008-04-21 21:24:00) [1]большое спасибо
Anatoly Podgoretsky (2008-04-21 19:14:00) [2]> leonidus (21.04.2008 17:20:00) [0]
Воспользуй FindFirstFile
Германн (2008-04-21 17:30:00) [3]Перед Reset вставь строчку
FileMode:=fmOpenRead;
| |
