TGtkAccessibleClass

type TGtkAccessibleClass = record

  parent_class: TAtkObjectClass;

  connect_widget_destroyed: procedure(

  accessible: PGtkAccessible

);

  _gtk_reserved1: procedure;

  _gtk_reserved2: procedure;

  _gtk_reserved3: procedure;

  _gtk_reserved4: procedure;

end;