Warum geht "Memo1.Lines := Memo1.Lines" nicht?

[gfjs]

@ mkinzler

Bezwecken wollte ich damit nichts, ich wollte nur einen von mehreren möglichen Fällen abdecken. Der Grund ist eine Prozedur, der ein zu bearbeitendes Memo, der auszugebende Text und die Größe des Memos übergeben wird. Daraus wird dann die maximal mögliche Schriftgröße berechnet.

procedure SetFontSize(Memo : TMemo, Strings : TStrings; h, w : integer); Dort wollte ich als zweiten Parameter Memo1.Lines übergeben, wenn der Text beim Aufruf der Prozedur schon im Memo drin steht.

Memo.Lines := strings; ging dann schief!

@ Bernhard Geyer

Wenn ich gewußt hätte, dass ich nach Assign schauen muss, hätte ich es getan. TStrings.Assign gibt mir allerdings keinen Hinweis darauf, dass "Memo1.Lines := Memo1.Lines" nicht geht. Bei TSTringList zeigt meine Hilfe keine Assign-Methode.

Gruß Jürgen