TGtkRcStyleClass

type TGtkRcStyleClass = record

  parent_class: TGObjectClass;

  create_rc_style: function(

  rc_style: PGtkRcStyle

):PGtkRcStyle;

  parse: function(

  rc_style: PGtkRcStyle;

  settings: PGtkSettings;

  scanner: PGScanner

):guint;

  merge: procedure(

  dest: PGtkRcStyle;

  src: PGtkRcStyle

);

  create_style: function(

  rc_style: PGtkRcStyle

):PGtkStyle;

  _gtk_reserved1: procedure;

  _gtk_reserved2: procedure;

  _gtk_reserved3: procedure;

  _gtk_reserved4: procedure;

end;