Ошибка в Run-time при использовании Tfrxdbetable
День добрый.
Плизз, наставьте на путь истинный...
разрабатываю отчет, на вкладку Данные поместил TfrxBDETable (с именем tblSysMain), в отчете же написал маленькую функцию:
function ZNF(ZZ:integer):String;
var
z:string;
tmp:string;
begin
z:=Trim(IntToStr(zz));
If tblSysMain.Active=False then tblSysMain.Open;
tblSysMain.Filter:='CODE='+z;
tblSysMain.filtered:=true;
tmp:= tblSysMain.FieldByName('znach').AsString;
If tblSysMain.Active=True then tblSysMain.Close;
result:=tmp;
end;
в Design-Time, при предварительном просмотре - функция отрабатывает, в отчет выводится полученное из функции значение..
Запускаю приложение, при формировании этого отчета получаю ошибку :
"Были обнаружены следующие ошибки: Не удалось найти классTfrxBDETable" жму ОК, открывается окно предпросмотра и ощибка:
"Набор данных tblSysMain не найден "
подскажите, где собака порылась?
Плизз, наставьте на путь истинный...
разрабатываю отчет, на вкладку Данные поместил TfrxBDETable (с именем tblSysMain), в отчете же написал маленькую функцию:
function ZNF(ZZ:integer):String;
var
z:string;
tmp:string;
begin
z:=Trim(IntToStr(zz));
If tblSysMain.Active=False then tblSysMain.Open;
tblSysMain.Filter:='CODE='+z;
tblSysMain.filtered:=true;
tmp:= tblSysMain.FieldByName('znach').AsString;
If tblSysMain.Active=True then tblSysMain.Close;
result:=tmp;
end;
в Design-Time, при предварительном просмотре - функция отрабатывает, в отчет выводится полученное из функции значение..
Запускаю приложение, при формировании этого отчета получаю ошибку :
"Были обнаружены следующие ошибки: Не удалось найти классTfrxBDETable" жму ОК, открывается окно предпросмотра и ощибка:
"Набор данных tblSysMain не найден "
подскажите, где собака порылась?
Комментарии