begin
 if (GetZ<>0) then 
ResultURL :=GetURLBase +  '&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1);
end.


