[fpc-pascal]Win32 API Call

Jonas Maebe jonas at zeus.rug.ac.be
Mon Dec 10 14:04:45 CET 2001

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? 


More information about the fpc-pascal mailing list