Access De Üst Şeridi Gizlemek

09/05/2017, 09:11

hulsen

Merhaba,
Access de microsot un en üst şeridini nasıl gizleyebilirim, forumda da araştırdım ancak bulamadım. Tüm ayarlardan baktım ama gizlemeyi başaramadım. Seçeneklerden şerit ile ilgili kısımlara baktım ancak o şerit özelleştirme sadece araç çubukları,yarım vs için şeriti kapatıyor . Ben yaptığım formun bir office uygulaması gibi değil de sadece form olarak gözükmesini istiyorum. Office üst şeridi gözümesin istiyorum. Uzman arkadaşlardan yanıt bekliyorum. teşekkürler
(Resim ekleyemiyorum foruma,onedenle Access de en üstteki bordo alanın gizlenmesini istiyorum)


09/05/2017, 09:35

atoz112

Sayın hulsen,

Bahsettiğiniz talebinize yönelik olarak;

Site arama sayfasında "Pencere gizleme" ya da benzeri ifade ile arama yaptığınızda edineceğiniz çeşitli içeriği olan konuları inceleyiniz.

Bilginize...iyi çalışmalar, saygılar.
09/05/2017, 10:12

hulsen

teşekkür ederim, konuları inceleyip deneyeceğim
10/05/2017, 12:02

atoz112

sayın hulsen,

bahsettiğiniz talebinize yönelik olarak;

Cvp: Access Penceresini Gizleme - 137

yukarıdaki bağlantıdaki konuda yer alan örnek uygulamayı de fikir edinmek üzere inceleyebilir ve deneyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
10/05/2017, 12:02

biberli33

Sayın Hulsen, yeni bir modül oluşturun ve aşağıdaki kodları yapıştırıp kaydedin.

Option Compare Database

Option Explicit
 
Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3
 
Private Declare 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
        If nCmdShow = SW_HIDE Then
            loX = apiShowWindow(hWndAccessApp, nCmdShow)
            Err.Clear
        End If
    Else
 
            loX = apiShowWindow(hWndAccessApp, nCmdShow)
 
    End If
    fSetAccessWindow = (loX <> 0)
End Function

Daha sonra açılışta çağrılan formun "Açıldığında" kısmına aşağıdaki kodu yazın.

Call fSetAccessWindow(0)

Access penceresi gizlenecektir. Kolay gelsin.
28/05/2017, 17:15

atoz112

sayın hulsen,

konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.

şüphesiz,işlemleriniz tamamlanmış ve sorununuzu çözmüş de olabilirsiniz.site içi aramalarınız neticesinde sitede yer alan konuları ve örnekleri incelemelerinizin sonucu ile bazı gelişimler elde etmiş de olabilirsiniz...bilgilendirmek ister misiniz lütfen.teşekkürler.

bilginize...iyi çalışmalar,saygılar.