Ver Mensaje Individual
  #1  
Antiguo 17-06-2010
Avatar de Faust
Faust Faust is offline
Miembro
 
Registrado: abr 2006
Ubicación: México D.F.
Posts: 930
Reputación: 19
Faust Va por buen camino
Angry Delphi no compila algunas líneas y cínicamente me lo informa

Así es: llevo rato tratando de ver el porque no funciona mi programa, he depurado y checado algunas de las variables, pero no me había dado cuenta que la variable con la que recorro un for dentro de otro for para procesar un array de strings no está siendo compílada y cínicamente delphi me ha dicho:

Cita:
(Hint) Coinc.pas(203): Value assigned to 'j' never used
Entiendo que dice que como esta variable no sirve de nada pues no la compila, y cuando compilo no aparece el puntito azul a la derecha de la línea de mi código y como no se compila aparece un tonto valor de 1308584 en esa variable y al usarla pues nunca ejecuta el codigo dentro de mi for

Código Delphi [-]
function Coincidences(Str1, Str2: string): TArrStr;
var
  LStr1, LStr2, i, j, Last: Integer;
  TmpArrStr: TArrStr;
begin
  ... // Aquí hay código donde no uso mi variable j
  j:= 1;  // Esta línea la pongo  de prueba pero es donde me salta el Hint al compilar y no se compila esta línea y al debuggear siempre tiene el valor 1308584
  for i:= 1 to Length(TmpArrStr) do
  begin
    SetLength(Result, Length(Result) + 1);
    Last:= Length(Result) - 1;
    for j:= 1 to Length(Result[i]) - 1 do  // Aquí a j no se le asigna 1 sino que se le queda el 1308584 y como resultado nunca ejecuta el código de abajo
      Result[Last]:= Result[Last] + TmpArrStr[i - 1, j]
  end
end;

¿cómo le hago al compilador para que me compile esta línea? para que entienda que si sirve esta variable, no creo estar haciendo nada mal, en el código anterior he puesto las líneas donde hago uso de j para ver si alguien me da una pista de qué es lo que está pasando.

Ah por cierto, uso Delphi 7 Enterprise y Win XP sp3

Saludos.
__________________
Herr Heins Faust

Última edición por Faust fecha: 17-06-2010 a las 01:12:07.
Responder Con Cita