begin
 ResultURL:=GetURLBase+RoundEx(GetLLon,5)+','+RoundEx(GetBLat,5)+','+RoundEx(GetRLon,5)+','+RoundEx(GetTLat,5);
end.