begin ResultURL:=GetURLBase+inttostr(GetX)+'+'+inttostr(GetY)+'+'+inttostr(Getz-1); end.