TGtkAccelGroupClass

type TGtkAccelGroupClass = record

  parent_class: TGObjectClass;

  accel_changed: procedure(

  accel_group: PGtkAccelGroup;

  keyval: guint;

  modifier: TGdkModifierType;

  accel_closure: PGClosure

);

  _gtk_reserved1: procedure;

  _gtk_reserved2: procedure;

  _gtk_reserved3: procedure;

  _gtk_reserved4: procedure;

end;