indeed @kas ob
The Line Number in RichEdit Control does not have the linear Numbers from 1,2,...,n
because the Line Counts depend on the matched Prime.
The following Code will work fine:
Delphi-Quellcode:
if RichEdit1.Lines.Count >= 50 then
begin
Timer1.Enabled := false;
Timer2.Enabled := false;
s := RichEdit1.Lines.Strings[0]; // Erste Zeile speichern
RichEdit1.Lines.Clear;
RichEdit1.Lines.Add(s);
Timer1.Enabled := True;
Timer2.Enabled := True;
end;
The Lines is then corresponding with Prime 223.