Показать полную графическую версию : MS Access: Настройка пользовательского интерфейса
Как можно избавиться от оболочки MS Access при запуске БД. Т.е. Главную форму я создал, назначил ее формой просмотра, а теперь мне нужно, чтобы при ее запуске, только она и отображалась на экране.
Файл - Параметры - Настройка ленты - отключите все стандартные панели.
Настройка ленты - Access - Office.com (http://office.microsoft.com/ru-ru/access-help/HA010355697.aspx#BM1)
Настраиваем ленту в Office 2010 под себя (http://www.thevista.ru/page12075-nastraivaem_lentu_v_office_2010_pod_sebya)
Это все я уже нашел в настройках. Таким способом можно удалить панели инструментов и навигации, но окно access все равно остается. Мне же нужно, чтобы отображалась только моя форма.
но окно access все равно остается. Мне же нужно, чтобы отображалась только моя форма. »
Разве такое возможно?
Вам, скорее, надо что-то наподобие такого:
Развертывание приложений Access 2007 (http://technet.microsoft.com/ru-ru/library/cc751805(v=office.12).aspx)
Развертывание приложения Access 2007 - Access - Office.com (http://office.microsoft.com/ru-ru/access-help/HA010218864.aspx)
P.S. Соответствующие статьи под 2010 может и есть, но я не сходу нашёл.
Развертывание это тоже не то.
Разве такое возможно? »
Возможно. Пример в прикрепленном файле. Правда, я не могу понять как это сделано. Скорее всего с помощью кода VB.
Правда, я не могу понять как это сделано. Скорее всего с помощью кода VB. »
Ну, да, это WinAPI:
Option Compare Database
Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hwndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, _
ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hWnd As Long, _
ByVal nCmdShow As Long) As Long
Option Explicit
Public Function hidde_on()
Dim HWND_TOPMOST, SWP_SHOWWINDOW
SetWindowPos Application.hWndAccessApp, HWND_TOPMOST, -30, -30, 0, 0, SWP_SHOWWINDOW
End Function
Public Function hidde_off()
Dim HWND_TOPMOST, SWP_NOACTIVATE, SWP_SHOWWINDOW
SetWindowPos Application.hWndAccessApp, HWND_TOPMOST, 0, 0, 1200, 1200, SWP_SHOWWINDOW
' 0, 0, 1200, 1200, SWP_SHOWWINDOW ' С этими значениями можно поиграть
' зависит от размера экрана
End Function
А в чём у Вас проблема? Пробуйте аналогично. Насколько устойчиво сие, правда, будет работать — не знаю.
Ну я никогда не сталкивался с программирование в Access. Понятия не имею даже где это вводится.
Ну я никогда не сталкивался с программирование в Access. Понятия не имею даже где это вводится. »
Вон оно в чём дело… Откройте Microsoft Access. Откройте выложенную Вами базу данных, удерживая при этом нажатой клавишу «Shift». После чего нажмите «Alt-F11». Попадёте в редактор VBA. Искомый код находится в модуле «WinAccess».
P.S. Вот именно для того, чтобы исключить возможность несанкционированного доступа к базе и/или коду — и нужно т.н. «развёртывание (http://technet.microsoft.com/ru-ru/library/cc751805(v=office.12).aspx)». После того, как приложение будет окончательно готово — делаете *.accde/*.accdc и уже его распространяете. Если у Вас уже развёрнут Microsoft Access на целевых машинах — отдельный пакет Среда выполнения Microsoft Access 2010 (http://www.microsoft.com/downloads/ru-ru/details.aspx?FamilyID=57a350cd-5250-4df6-bfd1-6ced700a6715) не нужен.
Модуль скопировал, назначил на событие "открыть". Главную форму открывает так как я хотел, но не показывает ни один из отчетов. Они, видимо, открываются, но на экране не отображаются.
Решил отказаться от этой затеи. Пусть все будет в дочерних окнах. Спасибо за помощь.
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.