Hi,
ich möchte, dass ein z.B. 5000 Zeichen langer Text in meinem Memo untereinander aufgereiht wird --> eine Art Zeilenumbruch. Ich möchte aber auch, dass das Memo die Höhe des Textes enthält --> 1 Zeile im Memo, Memo so hoch, wie eine Zeile. 2 Zeilen ..., usw.
Bei dem folgenden Code verhält sich das Memo allerdings komisch. Probiert es am besten selber mal schnell aus, es ist schwer zu beschreiben:
Delphi-Quellcode:
procedure TForm1.Memo1Change(Sender: TObject);
begin
Memo1.Height := (Memo1.Lines.Count * abs(Memo1.Font.Height));
end;