Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Formular Vollbildschirm (Access)





Frage

Hallo, Gibt es ein Möglichkeit ein Formular im Vollbildschirm modus (analog Bildschirmansicht Power Point) anzeigen zu lassen? Bisher habe ich es mit DoCmd.Maximize probiert, allerdings werden dort noch die ganzen Access-Funktionsleisten angezeigt. Habt ihr vielleicht ne Idee wie noch ein bisschen besser geht? Danke Connie

Antwort 1 von Teddy7

nein - es sein denn Du blendest die Accessleisten aus.

Gruß
Teddy

Antwort 2 von Connie

Danke. Wie kann ich die Accessleisten ausblenden?
Ich hab es über Extras/Anpassen/Menüs immer vollständig anzeigen versucht - leider ohne sichtbaren erfolg.

Grüße Connie

Antwort 3 von Teddy7

Hab ich noch nicht gemacht - aber ich hab mir mal diesen Code kopiert:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
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 Const SWP_SHOWWINDOW = &H40
Private Const SWP_HIDEWINDOW = &H80

Public Function HideTray()
Dim hWnd As Long
´ Taskleiste ausblenden
hWnd = FindWindow("Shell_TrayWnd", 0&)
SetWindowPos hWnd, 0&, 0&, 0&, 0&, 0&, SWP_HIDEWINDOW
End Function

Public Function ShowTray()
Dim hWnd As Long
´ Taskleiste einblenden
hWnd = FindWindow("Shell_TrayWnd", 0&)
SetWindowPos hWnd, 0&, 0&, 0&, 0&, 0&, SWP_SHOWWINDOW
End Function
Aufruf dann z.B.:
Call HideTray ´ blendet Taskleiste aus


Gruß
Teddy

Antwort 4 von Connie

Danke Teddy.
Wo muss ich den Code "hinzufügen"?. Bei Eigenschaften des Formulares --> "Beim Öffnen"?

Danke Connie

Antwort 5 von Teddy7

wie gesagt - ich hab´s noch nie gemacht. Aber ich nehme mal an, ja !

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: