uses
System,
LCLIntf,
LCLType,
LMessages,
SysUtils,
Classes,
GIS_SysUtils,
GIS_EarthBase,
GIS_Classes,
GIS_Projections,
math;