[fpc-pascal]LFN->SFN

[Peter Vreman]

> I'm using the GetShortName function, yet it returns the long-filename again
> and not the short-filename as it should do? Is this a bug?
> 
> Also, FindClose(searchrec) returns the compiler error (integer expected). It
> compiles if I put an integer as the parameter but this is incorrect.
> 
> I'm using V1.02 Win32 compiler.

Use the following order of unit includes:

uses
  windows,dos;

The dos functions will then override the functions declared in the windows
unit with the same names

Peter