Zitat von
Neutral General:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
S: String;
begin
S:= Memo1.Text;
Memo1.Clear;
for i:= 1 to Length(S) do
Memo1.Lines.Add(S[i]);
end;
Vielen Dank für Deine Mühe, Neutral General!
Ist leider der gleiche Fehler. Die letzte Stelle wir abgeschnitten!
Gruß
Heike