if _prop_DataType(dt) then  begin
        if _prop_ClearAfterEnter then  begin
          ChangeEvent := false; // Установка Control.Text вызывает _OnChange !!!
          Control.Text := '';
        end;
        _hi_onEvent(_event_onEnter,dt);
      end;