set_mouse_cursor_obscured

procedure set_mouse_cursor_obscured(

  var a: TGtkEntry;

  __mouse_cursor_obscured: guint

); overload;

procedure set_mouse_cursor_obscured(

  var a: TGtkTextView;

  __mouse_cursor_obscured: guint

); overload;