| @@ -27,7 +27,7 @@ begin | |||||
| // Выбор зеркала, если не указана версия | // Выбор зеркала, если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| r := random(3) | |||||
| else | else | ||||
| r := StrToInt(version); | r := StrToInt(version); | ||||
| @@ -27,10 +27,10 @@ begin | |||||
| // Выбор зеркала , если не указана версия | // Выбор зеркала , если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| else | |||||
| r := random(3) | |||||
| else | |||||
| r := StrToInt(version); | r := StrToInt(version); | ||||
| case r of | case r of | ||||
| 0: BaseUrl := GetURLBase; | 0: BaseUrl := GetURLBase; | ||||
| 1: BaseUrl := RegExprReplaceMatchSubStr(GetURLBase, '91.237.82.95:8088/pub/ggc', 't.caucasia.ru:80'); | 1: BaseUrl := RegExprReplaceMatchSubStr(GetURLBase, '91.237.82.95:8088/pub/ggc', 't.caucasia.ru:80'); | ||||
| @@ -27,7 +27,7 @@ begin | |||||
| // Выбор зеркала, если не указана версия | // Выбор зеркала, если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| r := random(3) | |||||
| else | else | ||||
| r := StrToInt(version); | r := StrToInt(version); | ||||
| @@ -27,7 +27,7 @@ begin | |||||
| // Выбор зеркала, если не указана версия | // Выбор зеркала, если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| r := random(3) | |||||
| else | else | ||||
| r := StrToInt(version); | r := StrToInt(version); | ||||
| @@ -27,7 +27,7 @@ begin | |||||
| // Выбор зеркала, если не указана версия | // Выбор зеркала, если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| r := random(3) | |||||
| else | else | ||||
| r := StrToInt(version); | r := StrToInt(version); | ||||
| @@ -4,7 +4,7 @@ var | |||||
| begin | begin | ||||
| // Выбор зеркала, если не указана версия | // Выбор зеркала, если не указана версия | ||||
| if version = '' then | if version = '' then | ||||
| r := random(2) | |||||
| r := random(3) | |||||
| else | else | ||||
| r := StrToInt(version); | r := StrToInt(version); | ||||