var
  i: integer;
vec: string;
begin
i := 97 + Random(4);
vec := RegExprReplaceMatchSubStr(GetURLBase, 'tiles', chr(i) + '.tiles'); 
ResultURL:=vec+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
end.

