RTF-Edit in der Grösse beschränken

[sveta]

if (length(trimright(Edit3.Text))>= 3) and not(key=#8) then key:=#0;