Source position: lazglib2.pas line 1617
type TGCompareFunc = function(
a: Pgpointer;
b: Pgpointer
):gint;