[fpc-pascal]Re: fpc-pascal digest, Vol 1 #1610 - 12 msgs

[Jonas Maebe]

On zondag, dec 8, 2002, at 16:07 Europe/Brussels, 
support at falconsoft.com wrote:

> {$MODE OBJFPC}
>
> destructor tScreen.Destroy;
> var
>   I : tUnsigned16;

Here is your problem! Your counter variable is unsigned, so all 
expressions in your for-statement are also converted to unsigned. 
Change this to "I : Integer" and it will work fine. You can also turn 
on range checking and then you will get a range check error in the loop 
initialization code.


Jonas