Liczba

0

Label1.Caption := 'Liczba: '+IntToStr(Length(edit1.Text));

Znak enter liczony jest jako 2 znaki.
Jak zrobić, zeby nie zliczalo znakow enter?

Dzieki

0

mniej wiecej tak
s := edit1.text;
while pos(#10#13, s) > 0 do delete(s, pos(#10#13, s), 2);
...:=length(s);

0

No.. jesli jestes pewien, ze enter jest tylko 1 to:
...:=length(s)-2 ...

0

Czy to pytanie to jakaś podchwytliwa ściema? Skąd w edicie enter?

// Marooned: powiedz szczerze, czy jeśli ktoś nie potrafi policzyć ilości znaków w stringu, będzie umiał ustawić styl editowi? :)

0

thenkles - nie mam pewności, ale chyba można wkleić :)

0

Czy to pytanie to jakaś podchwytliwa ściema? Skąd w edicie enter?

Skąd? Może ktoś niechcąco trafił w największy klawisz na klawiaturze i zupełnym przypadkiem akurat ów Edit miał focus?

No oczywistym jest, że rzeczone okno klasy EDIT musiało mieć ustawiony styl ES_WANTRETURN :-).

0

hehe
Chodzilo mi o memo a nie o edit1 troche sobie zle wpisalem. :)
Dzieki za odpowiedzi

0

hehe
Chodzilo mi o memo a nie o edit1 troche sobie zle wpisalem. :)
Dzieki za odpowiedzi

Gwoli ścisłości - Memo i Edit to okno tej samej klasy - różnią się tylko kilkoma stylami (między innymi ES_MULTILINE i ES_WANTRETURN).

1 użytkowników online, w tym zalogowanych: 0, gości: 1