[lazarus] Win32 not compile

Cristiano Magro xno at mediaplanet.it
Fri Mar 28 16:58:43 EST 2003


At 22.08 28/03/2003 +0100, you
wrote:
On Fri, 28 Mar 2003 19:13:34
+0100
Cristiano Magro <xno at mediaplanet.it> wrote:
> Hi
> Source from CVS return error when compile
> 
>  >Compiling filectrl.pp
> the error is in this line from lcl\include\filectrl.inc
> 
>     
Result:=SearchFileInPath(Result,'',GetEnv('PATH'),':',
>                              
[sffDontSearchInBasePath]);
> 
> I think Result must be a const
> If I remove this lines the compiling is Ok
Thx.
Fixed.

Mattias
I think if you add a Dos units to lcl\filectrl.pp so compiler find
function GetEnv()
uses
{$ifdef Win32}
        Dos,               
//for use of GetEnv()
{$endif}
Cristiano







More information about the Lazarus mailing list