Source position: GIS_EarthUtils.pas line 73
procedure ZoomToObject(
Earth: TCustomEarth;
Obj: TEarthObject
);