Tmeasures вычисляемые показатели

Шубин

День добрый. Используем в проекте FastCube 1.6. Вычисляемые показатели создаются, при проверке компиляции в форме создания/редактирования все без ошибок. В сетке показателя значения возвращаются если задать константы, но при попытке обращения к полям сетки выдает сообщение что класс TMeasures не найден. И соответственно в поле показателя ничего не выводиться. Как с этим бороться? Delphi 7, скомпилена с опцией INCLUDE_SCRIPT.

-=oleg=-

Приветствую.

Как компилировали пакеты? Вручную или с помощью recompile.exe?
Можете привести текст скрипта?

С уважением, Олег.

Шубин

Пакеты компилировал вручную. В проекте используется еще FastScript и FastReport. При загрузке куба, инициализации Slice, по коду данный класс объявляется в скриптере (смотрел через отладчик - код выполняется). Похоже на то что пространство скриптера разное. По поводу скрипта - result := Measures[0].EditValue пробывал и через наименование. Да, в проекте используется TeeChartPro.

Шубин

Извиняюсь за задержку в ответе, что-то по подписке ничего не упало на ящик.

-=oleg=-

Приветствую.

Правильное обращение к значению показателя - CurrentValue, а не EditValue :

Measures[AMeasureName].CurrentValue
или
Measures.ItemByCaption[AMeasureCaption].CurrentValue

И сделайте компиляцию с помощью recompile.exe.
В качестве пути к библиотеке FastScript укажите путь к библиотеке FastReport.
Укажите нужную версию TeeChart.

Желательно, что-бы *.dpk и fc.inc были оригинальные неизмененные.

С уважением, Олег

-=oleg=-

TMeasures и остальные классы регистрируются в скриптах отдельно для формы редактирования и для операции расчета.
Соответственно в модулях fcfsFormulaEditor и fcInterpreter.
И дефайн для подключения FastScript назвается INCLUDE_FAST_SCRIPT.

Шубин

Да я видел код. В момент редактирования показателя все работает. Я имел ввиду регистрация класса в интерпретаторе. Т.е. при по шаговой отладке видно что класс регистрируется. Опцию просто перепутал.

Шубин

Эх, причину то я нашел. В проекте используется общий модуль fsGlobalUnit. В момент инициализации выполняется код AddRTTI и выставляет признак загрузки модулей. Далее подхватываются новые модули, но так как признак загрузки стоит выполянется выход из метода и регистрации не производится. Если выполнить предварительно ClearRTTI, то теряются предыдущие объявления.

До сих пор не победил.

Шубин

Проблема разрешилось заменой кода с RTTIModules на TFunction.Create(fsGlobal...)