FastReport

← →
Алексей Петухов (2006-02-21 19:24) [0]

Здравствуйте, уважаемые Мастера.
Вот работаю с FastReport.
В отдельном потоке вызываю frxReport.ShowPreparedReport.
Подскажите как можно закрыть это окно программно.

Заранее благодарю.

← →
Алексей Петухов (2006-02-22 06:28) [1]

Есть идеи?

← →
Ormada © (2006-02-22 07:26) [2]

канешна есть! зачем ты показываешь отчёт(может тебе просто сформировать его нада а-ля prepare) ? а если показал то пусть юзар его и закрывает! Хош сам закрыть - ищи окно к примеру по имени класса и заголовку!

← →
Алексей Петухов (2006-02-22 07:56) [3]

1. Я пояснил, что отчеты открываются в отдельных потоках.
2. Соответственно их пожет быть открыто несколько.
3. Пользователь может переключаться между ними и работать в основной программе.
4. а так-же программу захотеть закрыть.
5. В свызи с этим необходимо корректно закрыть все открытые отчеты.
6. отсюда вопрос - как корректно нажать на кнопку "Закрыть" програмно?
7. Понятно, что можно использовать SendMessage(x,WM_Close,0,0);
8. как получить дескриптор окна неиспользуя поиск по имени класса и заголовку?
9. Может быть есть другие способы решения задачи? Например дописать процедуру Close в код FastReport.

Вот Так.

← →
Алексей Петухов (2006-02-22 07:57) [4]

Просьба незаморачиваться вопросами типа "а зачем ты показываешь отчёт"?

← →
Алексей Петухов (2006-02-22 07:57) [5]

А так-же давать советы Юзерам что им делать....

← →
Ormada © (2006-02-22 10:06) [6]

ответ вполне нормальный -а если показал то пусть юзар его и закрывает!
написал бы сразу всё что в [3] вопросов бы не возникало
с наездами(4+5) можешь идти куда подальше!
учись правильно задавать вопросы!
хочешь дописать OnClose -пиши никто тебя не останавливает.

← →
Экспериментатор (2006-02-23 00:10) [7]

По поводу первого
зачем отчеты открываются в отдельных потоках.
Может не в отдельных все-таки
Это окна MDI или что?

Думаю стоит задать этот вопрос на форуме Fastreport.ru, тем более если Вы покупали FR

← →
Алексей Петухов (2006-02-25 20:06) [9]

Фенькс ту ал.

Тем более что думалось мне что здесь более высокая концентрация порофессионалов чем на фастрепорт (не в фастрепорт камень).

Не принимайте близко к сердцу (это к профи а не к тем кто возбудился на 3-4).
Сорри, если задел кого ненароком (от души, без претензий на мнительность).

Прощаюсь с Вами ненадолго :-).

P.S. Если ормада недогнал о чем это я - то посмотри не [3][4] а [3].1-[3].9, а твой ответ [2] я принял но это пустое на 80% (см. мои комменты), если обидел - извини.

2 Алексей Петухов
дык [2] - ответ без знания ситуации кот ты описал тока в [3]
frReport1.MDIPriview:=True;
frReport1.ModalPriview:=False;
MainFrom.FormStyle:=fsMDIForm;
потом в ОнДестрой главной формы
var i, CNT : integer; begin Result := False; CNT := Self.MDIChildCount; for i := 0 to CNT - 1 do Self.MDIChildren[i].Close;

FastReport Найти похожие ветки