#pas
procedure THIEdit._work_doAlignment;
begin
     Control.TextAlign := TTextAlign(ToInteger(_Data));
end;