nesco писал(а):
Assasin, попробуй сделать, у меня не получилось, может тебе повезет большеА это трудно?
<я тут погорячился, извиняюсь >
------------ Д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;