On 17 Jun 2014, at 13:05, mokashe.ram wrote:

> Hi,
> 
> Could Any one help me for fixing below error in free pascal. as i am tring
> to excute for loop in decemental order using 'DOWNTO' but its thwoing error
> 'Illeagal assignment to For Loop variable 'Counter' as this is possible in
> TP but in Free pascal its not working so is there any workaround for this?
> 
>  FOR counter := 8 DOWNTO 1 DO
>              IF filename[counter] = ' 'THEN
>                 DELETE(filename,counter,1)
>              ELSE
>                  counter := 1;
> 

How about:
        Counter:= 8;
        While Counter >= 1 do
        Begin
                If .... Then 
                        ...
                Else
                        Counter:= 1;    

                Counter-= 1;
        End;

?

Perhaps there is a switch that allows assignments to for-loop counters 
(although I doubt it), I don't know.

--
Ewald

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to