Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
6 / 6 / 0
Регистрация: 01.04.2016
Сообщений: 56

Контекстное меню, если оболочка Access свернута

19.11.2017, 08:25. Показов 1091. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Не работает контекстное меню если оболочка Access свернута,

можно ли как-то это исправить?
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.11.2017, 08:25
Ответы с готовыми решениями:

Контекстное меню Access 2007
Доброго времени суток! Возникла следующая проблема, был бы очень признателен Вам за помощь. Есть база с расширением accdb...

Как востановить доступ к элементам навигации Access (модальное окно + отключено контекстное меню и горячие кл)
Помогите решить проблему! Создал базу данных вместе с формами для работы с ней. Все формы, это модальные окна, доступ для редактирования...

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

2
Эксперт MS Access
26826 / 14506 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
19.11.2017, 10:54
Видимо их надо включить. В 2010 => меню Файл => Параметры => Текущая база данных => Параметры ленты и панелей инструментов => поставить галку на Контекстные меню по умолчанию.

Или Вы о чем-то более другом?
0
6 / 6 / 0
Регистрация: 01.04.2016
Сообщений: 56
19.11.2017, 21:04  [ТС]
Да, там настройки по умолчанию стоят, контекстное меню работает нормально если оболочка не свернута.
Имеется код который сворачивает оболочку и оставляет только форму, так вот когда оболочка свернется то перестает работать контекстное меню
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Option Compare Database
Private Declare PtrSafe Function apiShowWindow Lib "user32" Alias "ShowWindow" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
Function fSetAccessWindow(nCmdShow As Long)
 
Dim loX As Long
Dim loForm As Form
On Error Resume Next
Set loForm = Screen.ActiveForm
 
If Err <> 0 Then
loX = apiShowWindow(hWndAccessApp, nCmdShow)
Err.Clear
End If
 
If nCmdShow = 2 And loForm.Modal = True Then
MsgBox "Cannot minimize Access with " _
& (loForm.Caption + " ") _
& "form on screen"
ElseIf nCmdShow = 0 And loForm.PopUp <> True Then
MsgBox "Cannot hide Access with " _
& (loForm.Caption + " ") _
& "form on screen"
Else
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End If
fSetAccessWindow = (loX <> 0)
End Function
 
Private Sub Form_Load()
    fSetAccessWindow (2)
End Sub
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
19.11.2017, 21:04
Помогаю со студенческими работами здесь

Контекстное меню
не могу найти пример как работать с контекстным меню Только это http://office.microsoft.com/ru-ru/access-help/HA010282509.aspx Но...

Контекстное меню
Уважаемые, проблемы такова... Как к контестному меню прицепить свое действие, т.е. как его создать я нашла, а вот как сделать это...

Контекстное меню не открывается
создал базу данных. кто-то взял, закрыл доступ к изменению форм, на правую кнопочку мыши не реагирует!!!! Нужна помщь!

Как создать контекстное меню. Например нажимая на richTextBox правой кнопкой мыши, мне бы предоставлялось контекстное меню
Как создать контекстное меню. Например нажимая на richTextBox правой кнопкой мыши, мне бы предоставлялось контекстное меню???

Работа программы даже если она свернута
Уважаемые форумчане, такой вопрос. Как сделать чтоб при запуске программы, она сразу-же сворачивалась в трей, и работала даже если она...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
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, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru