Eigentlich ein triviales Problem, aber anscheinend befinde ich mich inzwischen im Wald und kann vor lauter Bäume... usw.
Ich muss an einen String einen weiteren String anfügen, also ein einfaches
s := s + 'x';
Das Problem ist, dass es sich bei dem String um Memo.Lines handelt und ein
Memo.Lines[x] := Memo-Lines[x] + 'x';
zum flackern des Inhalts führt.
Wer es testen will, ein einfaches Beispiel:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Memo1.Lines[0] := Memo1.Lines[0] + 'x';
end;
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
for i := 0 to 10 do Memo1.Lines.Add('Einfacher Fülltext');
Timer1.Interval := 10;
end;
Auf jeden Fall fällt mir hier keine bessere Mehhode Lines zu ergänzen und ein BeginUpdate ist mir bei Memo auch nicht bekannt.