(Under construction.)
function FileSize (var F: any file): Integer;
`FileSize' is a Borland Pascal extension.