Текущий архив: 2002.05.27;
Скачать: CL | DM;
Вниз
QReport - сообщение Найти похожие ветки
← →
Martyn (2002-05-16 14:29) [0]привет всем!
вопрос по QReport:
пример:
begin
QRpreview.QRprinter.free;
sertQR.preview;
end;
в обработчике события sertQR.onPreview
QRPreview.QRprinter := TQRPrinter(sender);
все работает класс:
а если :
begin
QRpreview.QRprinter.free;
sertQR.preview;
QRpreview.QRprinter.free;
sert_nextQR.preview;
end;
то при закрытии окна QRPreview вылетает ошибка:
control has no parent window....
кто знает, в чем проблема??????
← →
Johnmen © (2002-05-16 14:49) [1]Что-то ты замутил....
Я так понял у тебя свой превью...Тогда
при закрытии формы превью :
procedure TPreviewForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin;
QRPreviewW.QRPrinter.Free;
QRPreviewW.QRPrinter:=nil;
Action:=caFree;
end;
← →
Martyn (2002-05-16 15:12) [2]2Johnmen
да, у меня действительно свой Preview, но вся проблема в том, что форма не закрывается, просто при нажатии кнопки Next, предыдущий отчет закрывается и открывается следующий в этом же Preview
← →
Johnmen © (2002-05-16 15:20) [3]Возможно, надо убивать еще и QReport...
← →
Anatoly Podgoretsky © (2002-05-16 15:35) [4]Без это фразы QRPreviewW.QRPrinter:=nil; нельзя, это правило для QR, то что могут быть еще и другие ошибки, то это другое дело, а эту обязательно.
← →
Martyn (2002-05-16 16:52) [5]2Anatoly Podgoretsky , Johnmen
QRPreviewW.QRPrinter:=nil - помогло.... все живет!
Спасибо, мужики!!!
Страницы: 1 вся ветка
Текущий архив: 2002.05.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.013 c
