constructor THIhiLightMemo.Create;
begin
  inherited Create(Parent);
  HM:=NewHilightEdit(FParent);
  Control:=HM;
end;[/code] то это все работает, но если сделать вот так
   Control :=  _NewControl( AParent, 'HILIGHTEDIT',
            WS_CHILD or WS_VISIBLE
            or WS_TABSTOP // WS_TABSTOP нужен для ловли фокуса ввода
            or WS_HSCROLL or WS_VSCROLL or WS_BORDER,
            TRUE, nil );
то я ни как к эти полям TControl'a обратиться не могу. Как это правильно сделать?

...
type 
  TCtrlEx = object(TControl);
  PCtrlEx = ^TCtrlEx;
var S: PCtrlEx;
begin
  S := PCtrlEx(Sender);
  S.fUpdRgn := CreateRectRgn( 0, 0, 0, 0 );
.....