TGMarkupParser

type TGMarkupParser = record

  start_element: procedure(

  context: PGMarkupParseContext;

  element_name: Pgchar;

  attribute_names: PPgchar;

  attribute_values: PPgchar;

  user_data: gpointer;

  error: PPGError

);

  end_element: procedure(

  context: PGMarkupParseContext;

  element_name: Pgchar;

  user_data: gpointer;

  error: PPGError

);

  text: procedure(

  context: PGMarkupParseContext;

  text: Pgchar;

  text_len: gsize;

  user_data: gpointer;

  error: PPGError

);

  passthrough: procedure(

  context: PGMarkupParseContext;

  passthrough_text: Pgchar;

  text_len: gsize;

  user_data: gpointer;

  error: PPGError

);

  error: procedure(

  context: PGMarkupParseContext;

  error: PGError;

  user_data: gpointer

);

end;