Source position: gisglgeonames.pas line 33
type TNameFoundEvent = procedure(
const AName: string;
const ADescr: string;
const ALoc: TRealPoint
) of object;