Public hWindow As Long

24/10/2007 - 14:41 von Björn Benatzky | Report spam
Hallo zusammen,

ich nutze A2003 und habe folgendes Problem:
Mit der folgenden Funktion blende ich bei meiner Datenbank das Access
Hauptfenster aus, so daß ich nur noch die Formulare sehe. Dies klappt
wunderbar bei allen Formularen, jedoch nicht bei meinen Berichten, die sehe
ich nicht.
Wo liegt hier das Problem bzw. wie kann ich das àndern ohne vor der Anzeige
der Berichte das Hauptfenster wieder einzublenden (was funktionieren würde)?

Private Sub HideAppWindow ()

dim hWindow As Long
dim nResult As Long
dim nCmdShow As Long
dim Const SW_HIDE = 0
dim Const SW_NORMAL = 1
dim Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal
nCmdShow As Long) As Long

hWindow = Application.hWndAccessApp
nCmdShow = SW_HIDE
nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
Call ShowWindow(Me.hwnd, SW_NORMAL)

End Sub

Vielen Dank im Voraus.
Gruß

Björn
 

Lesen sie die antworten

#1 Jörg Ostendorp
24/10/2007 - 14:50 | Warnen spam
Hallo Björn,

ich nutze A2003 und habe folgendes Problem:
Mit der folgenden Funktion blende ich bei meiner Datenbank das Access
Hauptfenster aus, so daß ich nur noch die Formulare sehe. Dies klappt
wunderbar bei allen Formularen, jedoch nicht bei meinen Berichten, die sehe
ich nicht.
Wo liegt hier das Problem bzw. wie kann ich das àndern ohne vor der Anzeige
der Berichte das Hauptfenster wieder einzublenden (was funktionieren würde)?



hast Du denn Deine Berichte auch auf Popup gestellt?

Grüßle vom Bodensee
Jörg Ostendorp

Access-FAQ: www.donkarl.com

Ähnliche fragen