memo1.text endet immer mit 'nem Zeilenumbruch. Ansonsten scheint der Text keine Sonderzeichen zu enthalten.
Was passiert bei
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
// einmaliges Zuweisen dürfte reichen.
// for i := 0 to 8000 do
// begin
stringgrid1.cells[1,1]:=Trim(memo1.text);
// end;
end;
Bei Delphi 7 tritt der von Dir genannte Effekt auf, sobald im Text ein Zeilenumbruch enthalten ist. Man sieht in der Zelle quasi immer das Ende des Textes und das ist bei memo1.text halt ein Zeilenumbruch. Und wenn man den sieht, sieht man eben nix.
Mal die Optionen des Stringgrids ändern, so dass wie Höhe und Breite der Zellen verändert werden kann. Dann müsste irgendwann auch Text in der Zelle zu sehen sein.