nesco писал(а):
Assasin, попробуй сделать, у меня не получилось, может тебе повезет большеА это трудно?
![](/img/smilies/icon_biggrin.gif)
<я тут погорячился, извиняюсь
![](/img/smilies/icon_redface.gif)
------------ Дoбавленo в 21.09:
По другому не смог, но тут сплошные костыли и неучтенные ситуации
#pas
procedure THIEdit._work_doAlignment;
begin
_prop_Alignment := word(ToInteger(_Data));
if _prop_Alignment > 2 then _prop_Alignment := 2;
Control.Free;
Init;
end;