jak aplikacja ma sprawdzic ile sama zajmuje miejsca na dysku

jak w temacie. Aplikacja cos_tam.exe zostaje uruchomiona, nastepnie:
Próbowałem uzyc filesize:

assignfile(plik2, 'cos_tam.exe'');
ShowMessage(IntToStr(FileSize(plik2)));
closefile(plik2);

jednak nie da sie tego zrobic na juz otwartym pliku, czy jest inny sposób ?

findfirst + F1

http://msdn.microsoft.com/library/en-us/fileio/fs/getfilesize.asp?frame=true

w poprzednim poście wkleił mi się zły link