Dateigröße ermitteln

int iFileHandle;
int iFileLength;

if (OpenDialog1->Execute())
{
    iFileHandle = FileOpen(OpenDialog1->FileName, fmOpenRead);
    iFileLength = FileSeek(iFileHandle, 0, 2);
    FileClose(iFileHandle);
}