Você não pode selecionar mais de 25 tópicos Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.

GetUrlScript.txt 273 B

4 anos atrás
123456789101112131415
  1. var
  2. i:integer;
  3. begin
  4. case getz of
  5. 1: i:= 16384;
  6. 2: i:= 8192;
  7. 3: i:= 4096;
  8. 4: i:= 2048;
  9. 5: i:= 1024;
  10. 6: i:= 512;
  11. 7: i:= 256;
  12. else i:=256;
  13. end;
  14. ResultURL:=GetURLBase+version+'&l='+inttostr(getz-1)+'&r='+inttostr(gety*i)+','+inttostr(getx*i)+',256,256';
  15. end.