Mikropascal , La asignación a la variable de bucle no está permitido

[gaston260]

hola a todos ! tengo una pregunta que es la del titulo y no entiendo nada ! , hay $1.000.000 al que conteste correctamente

Código Delphi [-]
var RH_MSB,RH_LSB,T_MSB,T_LSB,CHKS: byte;    //bajtove vystupy z cidla
    sht_rh,sht_t: word;                      //vystup z cidla
    T,RH: integer;                           //vysledek  T= 2531, RH= 7523
    tmp1,tmp2,pom,pom2,pom3,pom4,pom5: word;

...

procedure CtiSHT;
begin
     Trans;
     Write_Byte(Code_Temp);
     TRISA := %00000001;         //PORTA je output jen RA0 je input
     //cekame az to zmeri a stahne do 0
     for pom4 :=1 to 65000 do
         begin
          if TestBit(PORTA,DATA)=0 then pom4 := 65000; <<<< (en pom4 me da el error !!)
         end;

Saludos !

[[duilioisola]]

El asunto de este mensaje es una afirmación y no una pregunta:

Mikropascal , La asignación a la variable de bucle no está permitido

Si MikroPascal tiene esa regla/limitación, porqué no resuelves el tema con un while:

Código Delphi [-]
     while pom4 <= 65000 do
         begin
          porm4 := porm4 + 1;
          if TestBit(PORTA,DATA)=0 then pom4 := 65000;
         end;

Diche sea de paso, creo que es la forma correcta de hacerlo. El bucle FOR repite una cantidad definida de veces. El bucle while o repeat..until, se repiten mientras una condición sea verdadera.

¿Me he ganada el millón?

[[duilioisola]]

Acabo de probarlo en Delphi 6, porque tenía el presentimiento de que no estaba primitido modificar la variable utilizada en el FOR.

Delphi 6 tampoco permite esta asignación.

[gaston260]

claro que te ganaste el millón !! donde yo vivo el sigo $ significa (gracias) ! , te sirve 1.000.000 de gracias ? .

saludos y sumale un muchas gracias mas al millón !!!! .