Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.20;
Скачать: CL | DM;

Вниз

ошибка при работе с PReport   Найти похожие ветки 

 
Explorer ©   (2002-05-24 15:06) [0]

Мастера!
На форме две кнопки. Одна вставляет записи в Бд.
Другая, создает отчет (prReport)из этих записей. Все работает.
Но как, только выполняю эти действия (по одной кнопке вставил данные , а затем просмотрел отчет по другой и закрыл его) и пытаюсь закрыть форму на которой все это находиться, выдается ошибка CPU (адрес, значение...). Где я ошибся?
В базу всю правильно заносится. Отчет тоже все корректно выводит

Вот код:


procedure TFormPayments.BitBtnOKClick(Sender: TObject);
begin
QueryFactura.Close;
QueryFactura.ParamByName("IdOfDog").AsInteger:=IdOfDog;
QueryFactura.ParamByName("NumFac").AsInteger:=NumFac;
QueryFactura.Open;

QueryFacTec.Close;
QueryFacTec.ParamByName("IdOfDog").AsInteger:=IdOfDog;
QueryFacTec.ParamByName("NumFac").AsInteger:=NumFac;
QueryFacTec.Open;


prReportOrder.PrepareReport;
prReportOrder.PreviewPreparedReport(false);

end;

procedure TFormPayments.FormClose(Sender: TObject;
var Action: TCloseAction);
begin

QueryFactura.Active:=false;
QueryFacTec.Active:=false;

end;


 
wicked ©   (2002-05-24 16:04) [1]

а под отладчиком?...
а если строчки
> prReportOrder.PrepareReport;
> prReportOrder.PreviewPreparedReport(false);
закомментировать?...


 
Explorer ©   (2002-05-24 16:15) [2]

>wicked ©
Если закомментировать то все работает.
Весь прикол, как раз в том, что после открытия и закрытия отчета, а затем формы - только в этой последовательности ошибка!

Ошибку уже нашел, вот только причину обьяснить так и несмог.
Оказалось, все дело в том, что у меня отчет использует два Query.
Как только, один из них (любой) убираю с отчета все работает!
Может это проблема в PReport"e?



Страницы: 1 вся ветка

Текущий архив: 2002.06.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
3-64902
Browko Dmitrey
2002-05-29 15:18
2002.06.20
ADOQuery и команда CAST


4-65296
SerVS
2002-04-13 22:42
2002.06.20
Как в сервисе отследить LogOut?


3-64909
777
2002-05-25 12:40
2002.06.20
DISTINCT


1-65034
Solver
2002-06-06 06:38
2002.06.20
Как вернуть фокус окну приложения?


1-65077
ask
2002-06-10 13:54
2002.06.20
что за ерунда ?