сделать активным отчет после закрытия диалога

АлексейК
Дата: 09.06.2004 11:13:45
так хорошо получилось:

в диалоговой форме вводятся набор критериев для выборки и группировки в отчете жмешь кнопку - отчет переформировывается

на экране небольшой диалог а под ним виден отчет

снова меняешь параметры -жмешь отчет меняется.

но вот беда если закрыть диалог docmd.close то активным окном становится форма открытая ранее а отчет остается в неактивном окне.

минимизировать диалог можно, но хорошо бы именно закрывать.
paparome
Дата: 09.06.2004 11:19:15
Может поробовать через API фокус передать?
Alexander G
Дата: 09.06.2004 11:24:32
Я делал так
Me.Visible = False
DoCmd.OpenReport strNameReport, acViewPreview
и она так и висит невидимой и закрывается на закрытии отчета
АлексейК
Дата: 09.06.2004 11:27:53
дело в том что можно и повторным выполнением
openreport

только - никак нет события смена активного окна происходит после всех событий выгрузки формы

кстати если минимизировать диалог - вообще выводит окно проводника ))

пока получился лишь вариант с закрытием всех форм при старте диалога

Private Sub Form_Load()
'Выгрузка всех форм кроме текущей

For Each frm In CurrentProject.AllForms If frm.Name <> Me.Name And frm.IsLoaded Then DoCmd.Close acForm, frm.Name Next frm End Sub

хоть и решает частично проблему, но не совсем то чего хотелось бы
paparome
Дата: 09.06.2004 11:30:28
Э-э-э

Что-то я не понял :(

А на закрытие формы сказать еще раз
DoCmd.OpenReport ?

Или я точно, что-то не понял :(
Hummer
Дата: 09.06.2004 11:30:42
2 АлексейК
Лучше не закрывать формы, а попробовать минимизировать - активной по всей вероятности останется последняя. но она будет минимизирована, а на экране будет отчёт.
paparome
Дата: 09.06.2004 11:34:25
Или (только что попробовал)

при закрытии формы диалога

Reports.rep1.Visible = False
Reports.rep1.Visible = True
?
ищ
Дата: 09.06.2004 11:35:33
а естли поиграться свойсвами отчета "всплывающее окно" и "модальное окно"
АлексейЕ
Дата: 09.06.2004 11:49:27
Private Sub Form_Unload(Cancel As Integer)

Me.Modal = False
DoCmd.SelectObject acReport, "Имя_отчета"

End Sub
АлексейК
Дата: 09.06.2004 11:52:02
вот что попробовал:

visible = false все пучком только окно аксесса не закрыть
и форму не отредакировать ))

2 paparome
возможностей активизации окна отчета - много - нет подходящего события
твой способ не помогает


поиграться с модальным окном помогло
если снять модальность то все в порядке, после закрытия остается активным отчет. во как..