Hi..
@freak...an wen war nun deine Lösung gerichtet?
Ich habe das Line Problem so gelöst:
Delphi-Quellcode:
begin
if Memo1.Lines.Count< 10 then Memo1.WantReturns:=true;
if Memo1.Lines.Count>9 then Memo1.WantReturns:=False;
lbl_Ausgabe.Font.Color := clgreen;
lbl_Ausgabe.Caption := IntToStr(10 - Memo1.Lines.Count);
if Memo1.Lines.Count >= 10 then
begin
lbl_Ausgabe.Font.Color := clred;
lbl_Ausgabe.Caption := 'Maximale Zeilenanzahl erreicht!';
StBar_H.Panels[3].Text := 'Maximale Zeilenanzahl erreicht!';
end;
end;
Nur ich bekomme es nicht hin, dass jede Zeile nur 50Zeichen annehmen soll und danach zB in die nächste springen soll(Zeilenumbruch)....