Hallo, ich hab ein kleines Problem. Ich möchte die Zeichen vom Memo feld auslesen, sodass das mit der MaxLength passt. Nur die Eingabetaste nimmt er nicht mit, warum weiss ich net.
Hier ist bis jetzt mein Code:
Delphi-Quellcode:
var wort: string;
zeichenzahl, zeilenzahl,i,zeile,zeichenzaehler: Longint;
begin
Zeichenzahl:=Memo1.lines.count;
Zeichenzaehler:=0;
FOR i:=0 TO zeichenzahl-1 DO
Begin
wort:=memo1.lines[i];
zeichenzaehler:=zeichenzaehler+length(wort);
end;
Form1.StatusBar1.Panels[1].Text:=('Zeichenzahl: ' + InttoStr(zeichenzaehler));
Ich Bitte um Hilfe
MfG Dave