@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('2')+random(9)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |
@@ -1,4 +1,6 @@ | |||||
var | |||||
url: string; | |||||
begin | begin | ||||
GetURLBase[24]:=chr(ord('3')+random(8)); | |||||
ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) )); | |||||
ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg'; | |||||
end. | end. |