Alan Mead a écrit :
>
> I don't know if this is really a bug or whether it's known... I have
> this line of code:
>
> while ( (i<=Length(fmt)) and (NOT fmt[i] IN ['0'..'9']) ) do
> inc(i);
>
> It compiles fine but I get a RTE:
>
> An unhandled exception occurred at 0x0807B180 :
> EVariantError : Invalid variant operation
> $0807B180
> $BFFFF980
Try with
while ( (i<=Length(fmt)) and (NOT (fmt[i] IN ['0'..'9'])) ) do
^ ^
( )
i.e., with two parenthesis more.
--
mm
http://www.ellipsa.net/
[EMAIL PROTECTED] ( suppress no.sp.am. )
_______________________________________________
fpc-pascal maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
