Jednowierszowy TRichEdit

0

Jak spowodować aby w TRichEdit można było wprowadzić tylko jedną linijkę tekstu?

0

to może użyj Tedit

0

to może użyj Tedit

Z chęcią ale niestety muszę dać możliwość operowania fontami.

0

Ustaw wysokość na 1 wiersz.
W OnKeyDown (czy OnKeyPress - nie pamiętam) daj:

if Key = #13 then Key:=#0

0

a gdyby sie chciało mieć wiecej niż jedną linijkę tekstu np 5 to:

if Key = #13 then Key:=#0
</quote>

nie bedzie działało ;-( wieć jak to można zrobić inaczej??

0

if (Key = #13) and (RichEdit1.Lines.Count = 5) then Key:=#0
</quote>

0

a gdyby sie chciało mieć wiecej niż jedną linijkę tekstu np 5 to:

if Key = #13 then Key:=#0

nie bedzie działało ;-( wieć jak to można zrobić inaczej??</quote>

if (Key = #13) and (RichEdit1.Lines.Count > 4) then
Key := #0;

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