[fpc-pascal]SysUtils.FileExists bug under Go32v2

[Anton Tichawa]

Hello, Ivan!

> Function FileExists (Const filename :String) :Boolean;
> begin
>    //FileGetAttrib will return -1 if the file was not found
>    //but I don't know if it will return -1 if the file exists but it's open
>    result := boolean( FileGetAttr( filename ) XOR -1 );
> end;

I'll have a look at that ..

Anton Tichawa.