Skip to main content

AccessTr.neT


Access De Üst Şeridi Gizlemek

Access De Üst Şeridi Gizlemek

Çözüldü #1
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)

[Resim: do.php?imgf=149431012238641.jpg]
Son Düzenleme: 09/05/2017, 09:14, Düzenleyen: hulsen.
Cevapla
#2
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
teşekkür ederim, konuları inceleyip deneyeceğim
Cevapla
#4
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#5
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.
Cevapla
#6
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task