Zitat von
Muetze1:
Test1[k] := Copy(Test, x mod 97, 97);
Über Test1[] und Test[] hat er uns keine Info gegeben. Das könnte vom String über ein Array bis zu einem Indexer (aka Array-Property) sein.
Zitat:
und du immer nur die 97 Werte kopiert haben willst
In seinem Text schreibt er von 96-er Schritten, programmiert aber 97 beim ersten und 95 beim zweiten.
Zitat:
Delphi-Quellcode:
lBase := x div 97;
for k := 0 to 96 do
Test1[lBase + k] := Test[lBase + k];
end;
8000 ist nicht durch 96 (und 97) teilbar. Dadurch liest (bzw. schreibst) du hinter der Array/String-Grenze.