Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.005 c
1-88553
Hela
2002-05-16 14:16
2002.05.27
Экспорт из FastReport в Word


6-88588
kvcomp
2002-03-16 01:12
2002.05.27
Соединение с Интернетом!


6-88587
BMax
2002-03-14 08:05
2002.05.27
Сохранение с Интернета


14-88629
D.R.
2002-04-17 22:14
2002.05.27
Подскажите...


1-88511
alkmas
2002-05-13 10:48
2002.05.27
Вызов метода объекта класса





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский