4 lignes
120 B

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