Обработка ошибок?

Plumbum · June 2005

Доброго времени!

FR3.03 Идея такая: нужно вывести значение переменной, либо запись об отсутствии такой переменной. Делаю так:

procedure Memo10OnBeforePrint(Sender: TfrxComponent);
var
  str: string; 
begin
   ...
   str := имя_переменной;
   try
     str := Get(str);
   except
      str := 'не определено';
   end;
   Memo10.Memo.Add(str);
end;

под отладчиком отчет строится, но после построения выдается сообщения, что часть переменныех не найдена. Если же запескать отчет из программы, то вылетает сообщение, что те же переменные не найдеты и отчет вообще не отображается. Но это и понятно, т.к. для постоения отчета использую:

 if frxReport.PrepareReport then
      DMReports3.frxReport.ShowPreparedReport
  else
    ShowMessage('Ошибка при построении отчета');

Установка frxReport.EngineOptions.Silent = true не помогает.

Посоветуйте как обойти. Зарание спасибо.

AlexTZ · June 2005

Кроме правки исходников, не поможет ничего.

Plumbum · June 2005

если не секрет: планируется ли такая правка исходников?

Была шальная мысль сделать нечто вроде:

...

 str := имя_переменной;
  if Report.Variables.IndexOf(str) = -1 then
     str := 'не определена'
  else
     str := Get(str);

но я не могу достучатся до Variables в скрипте. как быть?

Обработка ошибок?

Комментарии

Оставить комментарий