[lazarus] The last Windows error

Mattias Gaertner nc-gaertnma at netcologne.de
Mon Dec 10 03:30:50 EST 2001


On Mon, 10 Dec 2001 02:02:08 -0500
"Keith Bowes" <keith_bowes at hotmail.com> wrote:

> I've finally fixed the compilation errors on Windows.  Most of them were
> problems with the Win32-API interface; but the last was in
> components\codetools\linkscanner.pas, so I thought it would be best to
> report it and let those with permission to alter the source fix the minor
> error.  Lines 1196 through 1197 need to be changed to:
>     Result:=(copy(TheFilename,1,2)='\\') or ((length(TheFilename)>3) and
>        (UpChars[TheFilename[1]] in ['A'..'Z']) and (TheFilename[2]=':'));

Thx. Fixed.


Mattias






More information about the Lazarus mailing list