*.ini писал(а):
doRandSeed%Quality%=Предопределяет последовательность...*.pas писал(а):
.
_prop_Quality:function:real;
.
.
procedure THIRandom._work_doRandSeed0;
.
.
procedure THIRandom._work_doRandSeed1;
Пытался чуть переделать установив byte, а в процедурах использовать
if _prop_Quality=0 then
SRnd:=Simple
else SRnd:=Xorshift128;
да запутался в трёх соснах Искал тему, где Galkov выкладывал изменения, даже через Google не нашёл
SRnd:=Simple
else SRnd:=Xorshift128;
Остаётся надеяться на дружескую помощь