Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
648 / 101 / 11
Регистрация: 08.06.2015
Сообщений: 1,564

Отображение форм

06.06.2018, 17:44. Показов 1094. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
На загрузке главной формы прописано

T-SQL
1
2
3
4
5
6
If MsgBox("Замена статусов", vbQuestion + vbYesNo) = vbYes Then
             
             DoCmd.OpenForm "ЗаменаСтатуса"
          Else
          'действия при нажатии no
          End If
Если пользователь нажал да - открывается форма ЗаменаСтатуса, при этом прогружается главная форма и форма ЗаменаСтатуса находится под ней и ее пользователь не видит. Подскажите как форму ЗаменаСтатуса вывести на передний план после загрузки главной формы?
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
06.06.2018, 17:44
Ответы с готовыми решениями:

Внедрение в форму (или отображение на форме) избранных подтаблиц (внедрённых форм) по выбору пользователя
Здравствуйте! Подскажите пожалуйста, можно ли макросом или свойствами элементов управления организовать обзор данных так, чтобы при...

Отображение форм
Как сделать чтобы при переключение с Form1 на Form2,Form2 появлялась на месте Form1 и наоборот ...

Отображение форм.
Здравствуйте.Нужна помощь. Вызываю форму из другой формы.Все хорошо, только нужно чтобы первая форма пропадала. main.cpp ...

9
Эксперт MS Access
26825 / 14505 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
06.06.2018, 17:48
В таких случаях буквально просится сделать форму ЗаменаСтатуса всплывающей. Я бы сделал ее вообще диалоговой. Уж если вызвал форму для замены параметра, то замени. И пока не заменил, ничто другое недоступно. Но хотя бы всплывающей.
1
648 / 101 / 11
Регистрация: 08.06.2015
Сообщений: 1,564
06.06.2018, 18:04  [ТС]
Дело в том что они обе всплывающие, я других не держу.

Добавлено через 2 минуты
И главная перекрывает форму ЗаменаСтатуса

Добавлено через 4 минуты
Вопрос как ее вывести на передний план после загрузки главной?
0
Эксперт MS Access
26825 / 14505 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
06.06.2018, 18:08
Попробуйте перед вызовом сделать форму невидимой
Visual Basic
1
2
3
4
5
6
If MsgBox("Замена статусов", vbQuestion + vbYesNo) = vbYes Then
             Me.Visible=False
             DoCmd.OpenForm "ЗаменаСтатуса"
          Else
          'действия при нажатии no
          End If
А на закрытии формы ЗаменаСтатуса проверять открыта ли главная, и если открыта, задать ей видимость
Visual Basic
1
2
3
If Currentproject.allforms("ЗаменаСтатуса").isloaded then
  Forms!Главная.Visible=True
end if
1
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
06.06.2018, 18:09
Цитата Сообщение от alexpro1979
На загрузке главной формы прописано
А если на текущей записи?
Ведь главная не ленточная и не табличная?
1
162 / 61 / 13
Регистрация: 03.03.2015
Сообщений: 176
06.06.2018, 18:22
может быть так ?
Visual Basic
1
2
DoCmd.Minimize
DoCmd.OpenForm "ЗаменаСтатуса"
а при закрытии "ЗаменаСтатуса"
Visual Basic
1
2
DoCmd.SelectObject acForm, "Главная форма"
DoCmd.Restore
Обычно такой прием использую для предварительного просмотра отчета.
Форма сворачивается, а при закрытии отчета восстанавливается
1
Мы один, давай на "ты"
3838 / 1384 / 343
Регистрация: 16.06.2016
Сообщений: 3,275
06.06.2018, 19:28
Цитата Сообщение от alexpro1979 Посмотреть сообщение
открывается форма ЗаменаСтатуса, при этом прогружается главная форма и форма ЗаменаСтатуса находится под ней и ее пользователь не видит.
Сделай перевод фокуса, например на загрузку главной.
Типа
Visual Basic
1
2
3
4
5
Private Sub Form_Load()
...
    If CurrentProject.AllForms("ЗаменаСтатуса").IsLoaded Then Forms("ЗаменаСтатуса").SetFocus
...
End Sub
Добавлено через 1 минуту
или на событие таймера

Добавлено через 1 минуту
или поменяй очерёдность загрузки форм
1
648 / 101 / 11
Регистрация: 08.06.2015
Сообщений: 1,564
06.06.2018, 19:42  [ТС]
Цитата Сообщение от nape63 Посмотреть сообщение
DoCmd.Minimize
Эту командой из одной формы развернуть другую получиться?

Добавлено через 2 минуты
Все выше примеры не получаются видимо еще формы не прогрузились на момент выполнения команды
0
162 / 61 / 13
Регистрация: 03.03.2015
Сообщений: 176
06.06.2018, 19:53
Лучший ответ Сообщение было отмечено alexpro1979 как решение

Решение

Должно получиться. Если я правильно понял постановку задачи.
1.Открыта Главная форма. Из нее открывается "ЗаменаСтатуса"
Тогда главная не закрывается, а сворачивается. Потом открывается "ЗаменаСтатуса"
А это уже в "ЗаменаСтатуса"
Visual Basic
1
2
DoCmd.SelectObject acForm, "Главная форма"
DoCmd.Restore
при закрытии формы "ЗаменаСтатуса" - событие Close
1
648 / 101 / 11
Регистрация: 08.06.2015
Сообщений: 1,564
06.06.2018, 20:03  [ТС]
Цитата Сообщение от nape63 Посмотреть сообщение
DoCmd.SelectObject acForm, "Главная форма"
DoCmd.Restore
Получилось спасибо, такими командами не пользовался еще ни разу.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
06.06.2018, 20:03
Помогаю со студенческими работами здесь

Отображение форм
Подскажите пожалуйся, у меня есть программа с Form1, я к ней добавил Form2 и хочу чтоб при запуске программы первой всегда запускалась...

Разное отображение форм
Создал в QtDesigner форму.При предосмотре (Ctrl+R) она выглядит так: (1 скриншот),но когда я перевёл ui в py и запустил питон,то получил...

Отображение нескольких форм
Доброго времени суток. Имеется 2 формы, при этом у главной свойство FormStyle = fsmdiForm, у второстепенной - fsNormal. При создании...

Отображение дочерней и родительской форм
Привет всем, подскажите как реализовать: по щелчку кнопки на главной открывается вторая форма, но она отображается поверх...

Отображение разных форм по Timer-у
Подскажите пожалуйста! У меня есть несколько форм как можно сделать чтоб они запускались как слайд щоу через определенное время. На главной...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru