vcrank
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Andryshok Да я читал )) У нас похоже некоторое недопонимание ) Есть новый, пустой отчёт. Если на него кидаю Query,а потом выбираю Файл - Новый мастер простого отчёта, то этот QUERY пропадает Добавлено: Код: procedure TfmMain.cxButton1Click(Sender: TObject); var UniDACQuery: TfrxUniDACQuery; begin UniDACQuery := DMMain.repCardPersonnel.FindObject('UniDACQuery') as TfrxUniDACQuery; UniDACQuery.ParamByName('ID').Value := DMMain.utPersonnel.FieldByName('id_personnel').AsInteger; DMMain.repCardPersonnel.PrepareReport; DMMain.repCardPersonnel.ShowPreparedReport; end; | Вот в таком варианте отчёт показывается, я его закрываю. Всё ОК Но как только я закрываю программу, то сразу получаю Цитата: --------------------------- Debugger Exception Notification --------------------------- Project Personnel.exe raised exception class EAccessViolation with message 'Access violation at address 03634632. Read of address 00000033'. Process stopped. Use Step or Run to continue. --------------------------- OK Help --------------------------- | Если сам по себе отчёт не вызывать, то программа закроется нормально Добавлено: И ошибка вылезает именно при закрытии программы (последней формы). |