HiAsm

Ответов: 8889

Рейтинг: 823

#1: 2014-03-10 01:34:14 ЛС | профиль | цитата

Хотел использовать предустановку по точке doRandSeed, фигушки: говорит что процедура _work_doRandSeed не обозначена

*.ini писал(а):

doRandSeed%Quality%=Предопределяет последовательность...

а в *.pas свойство _prop_Quality обозначено как функция, да ещё и Real

*.pas писал(а):

.
_prop_Quality:function:real;
.
.
procedure THIRandom._work_doRandSeed0;
.
.
procedure THIRandom._work_doRandSeed1;

Аналогичное свойство Mode(Integer,Real) имет формат byte

Пытался чуть переделать установив byte, а в процедурах использовать

if _prop_Quality=0 then
SRnd:=Simple
else SRnd:=Xorshift128;

да запутался в трёх соснах

Искал тему, где Galkov выкладывал изменения, даже через Google не нашёл

Остаётся надеяться на дружескую помощь

карма: 19