Hi,
ich habe folgenden Code:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i:TMemoryStream;
begin
i := TMemoryStream.Create;
Memo1.Lines.SaveToStream(i);
Memo2.Lines.LoadFromStream(i);
i.Free;
end;
Warum ist der Stream immer leer? Denn nach dem ich den Code ausführe, ist Memo2 leer.