Access - Marco Inicial Access

   
Vista:

Marco Inicial Access

Publicado por José Maria (134 intervenciones) el 25/03/2016 18:10:37
Buenas,
Llevo meses buscando una mejor solución a la que encontré en su día pero no hay manera.
Mi objetivo es dejar access como una aplicacion de forma que no se vea el marco inicial.

Para conseguí este codigo:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Option Compare Database
 
 
Option Explicit
Global Const SW_HIDE = 0
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3
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
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End Function


Luego ponia todo en Modal Si y Emergente Si

el problema lo tengo con los informes para los cuales he tenido que hacer algo muy sucio y feo y es que cada vez que lo abre fSetAccessWindow (3) y al cerrarlo fSetAccessWindow (0).


En innumerables ocasiones el programa se queda oculto y sin poder hacer na mas que un shit+suprimir para cerrarlo.

Sabeis de una mejor forma?

Un saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder