On Fri, 25 Jun 2004 09:51:25 +0200 Micha Nelissen <[EMAIL PROTECTED]> wrote:
> Tony Maro schreef: > > The TDBF assumes that if you are running FPC you are NOT in Windows. > > Sorry this isn't a diff, but I don't have the tools in my Windows > > environment yet... > > > > Note the first $ifdef FPC - in Windows it causes it to reference a unix > > type. It should be a {$ifndef WIN32} most likely... and it won't build. > > This issue was already fixed in CVS :-). This piece of code doesn't work > in Kylix yet, I think. Revision 1.48: > > ----- > @@ -2440,9 +2438,11 @@ > > procedure TDbfGlobals.InitUserName; > {$ifdef FPC} > +{$ifndef WIN32} > var > TempName: UTSName; > {$endif} > +{$endif} > begin > {$ifdef WIN32} > FUserNameLen := MAX_COMPUTERNAME_LENGTH+1; > ----- > > Micha Can this patch be applied in FPC CVS too? Regards, Vincent. _______________________________________________ fpc-pascal maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-pascal