
function GetApiKey: string;
begin
  //ToDo: go to http://www.thunderforest.com/maps/opencyclemap/ and parse api key from html page
  Result := '7c352c8ff1244dd8b732e349e0b0fe8d';
end;

begin
  GetURLBase[9]:=chr(ord('a')+random(3));
  ResultURL:=GetUrlBase+'/'+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png' + '?apikey=' + GetApiKey;
end.