[fpc-pascal]Win32 API Call

[Jonas Maebe]

On zaterdag, december 8, 2001, at 02:58 , Thomas Schatzl wrote:

> function. A completely correct translation for the Pascal language 
> (imo):
>
> function GetDiskFreeSpaceEx(lpDirectoryName: PChar; var
> lpFreeBytesAvailableToCaller, lpTotalNumberOfBytes : LargeInteger;
> lpTotalNumberOfFreeBytes: PLargeInteger): BOOL;external 'kernel32' name
> 'GetDiskFreeSpaceExA';

I've changed it to this (the same for the other GetDiskFreeSpaceEx? 
functions)


Jonas