Man darf FOR-Schleifen-Variablen nicht in der Schleife verändern.
Mach es mit einer While-Schleife:
Delphi-Quellcode:
var j: integer;
begin
While j <= length(vza) do
begin
if XXXX then
inc(j); // -> j := j + 1 als deine Veränderung der Zählvariable
inc(j); // -> j := j + 1 als Zählung
end;