Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Access Penceresini Gizleme

ozanakkaya
ozanakkaya
Access Dersleri
169
124647

Access Penceresini Gizleme

#127
bigdaddy_isi
Üye
bigdaddy_isi
Bul
Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: Ofis 2013 64 Bit
Son Oturumu: 18/01/2019,01:26
Yorumları: 31
Konuları: 3
Kayıt Tarihi: 15/11/2014
Teşekkür Puanı: 10
Selamlar Sadece Paylaşmak istedim.

Programınızı açtığınızda sadece Form görünsün ve Access'e ait hiçbirşey görünmesin istiyorsanız

Otomatik olarak açtığınız Form'un Vba bölümüne aşağıdaki KOD'u girmeniz kafidir.

Kod:
Private Sub Form_Open(Cancel As Integer)
   Dim hWindow As Long
   Dim nResult As Long
   Dim nCmdShow As Long
   hWindow = Application.hWndAccessApp
   nCmdShow = SW_HIDE
   nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
   Call ShowWindow(Me.hwnd, SW_NORMAL)
End Sub
NOT: Sorunsuz çalışıyor

Saygılar
Cevapla
#128
mehmetdemiral
.
mehmetdemiral
Bul
Uzman
Adı Soyadı: Me.... De....
Yaşı: 59
Konum: Samsun
Ofis Versiyonu: Ofis 2013 32 Bit
Son Oturumu: 10/07/2024,19:24
Yorumları: 5.123
Konuları: 224
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 1.947
Mesleğiniz: Öğretmen
Merhaba
Bu kodların çalışması için modüle gerek olduğunu ve ayrıca tüm form ve raporların Açılan ve Kalıcı olarak işaretlenmesi gerektiğini yazmamışsınız.
İnadına, ille de Accesstr.net...
Cevapla
#129
bigdaddy_isi
Üye
bigdaddy_isi
Bul
Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: Ofis 2013 64 Bit
Son Oturumu: 18/01/2019,01:26
Yorumları: 31
Konuları: 3
Kayıt Tarihi: 15/11/2014
Teşekkür Puanı: 10
Merhaba Mehmet bey, cevabınız için Teşekkür ederim.

En az Kalıcı bir Form gerekiyor, bu doğru, ama Modul'e gerek yok.

Kod Modulsüz çalışıyor. Başlangıç Form'un Vba bölümüne yazmanız kàfi.

Saygılar.
Cevapla
#130
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
sayın bigdaddy_isi,

evet bahsettiğiniz gibi bu kod için bir modül yazmaya gerek yok,bu şekilde de kullanılabilir.
fakat eklediğiniz kod bu hali ile yetersiz kalmakta ve 
Kod:
ShowWindow(ByVal hWindow, ByVal nCmdShow)
kod satırı üzerinde hata verecektir,bu işlevin sağlanması söz konusu olmayacağından.

eğer ilgili açılış formunun hem ÖZELLİKLER-DİĞER sekmesindeki AÇILAN ve KALICI satırlarını EVET olarak işaretlerseniz ve hem de Option Explicit satırının bir altına aşağıdaki kod satırını da ilave ederseniz,o zaman sorunsuz kullanabilirsiniz.
Kod:
Const SW_HIDE = 0       ' Fenster ausblenden

   Const SW_NORMAL = 1     ' Fenster wiederherstellen bzw. einblenden
   Private Declare Function ShowWindow Lib "user32" _
   (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
ayrıca,formun KALDIRILDIĞINDA olay yordamına da
Kod:
Application.Quit
kod ifadesini yazmalısınız ki,form kapatıldığında ya da uygulamadan çıkıldığında arka planda açık kalmasın ve .LBD dosyası oluşmasın.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
#131
bigdaddy_isi
Üye
bigdaddy_isi
Bul
Üye
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: Ofis 2013 64 Bit
Son Oturumu: 18/01/2019,01:26
Yorumları: 31
Konuları: 3
Kayıt Tarihi: 15/11/2014
Teşekkür Puanı: 10
Sayın atoz112, kapsamlı ek bilgileriniz için Teşekkür ederim.

Yazdıklarınıza katılıyorum. Ben olaya hep kullanıcı gözü ile bakıyorum.

Yani kullanıcı için gerekli her önlem alınması, ve Programın sıfır hatalı çalışması için büyük gayret gösteririm.

Alıntı:Const SW_HIDE = 0       ' Fenster ausblenden (Pencereyi gizle)

  Const SW_NORMAL = 1     ' Fenster wiederherstellen bzw. einblenden (Pencereyi göster)

"Const SW_NORMAL = 1 " Programlayan için geçerlidir. gerektiğinde tekrar açıp Programda değişiklik yapmak içindir.

Lakin Programın finalinde "Const SW_HIDE = 0" olarak kalabilir. Çünkü kullanıcı, adı üzerinde sadece kullanacaktır ve Access Penceresine ihtiyacı olmayacaktır.

Benim örnek olarak #127. mesajda vermiş olduğum Kod ile ilavesiz sorunsuz çalışıyor ve Option Explicit elbette mevcut.

Bu konuda meseleyi sizde bende biliyoruz. Maksat diğer okuyucuların faydalanması ve öğrenmesidir.

Başarılarınızın devamını dilerim
Saygılarımla
Cevapla
#132
atoz112
Onursal Üye
atoz112
Bul
Onursal Üye
Adı Soyadı:
Yaşı: 55
Konum: İstanbul
Ofis Versiyonu: Ofis 2007
Son Oturumu: 09/12/2017,11:02
Yorumları: 5.716
Konuları: 9
Kayıt Tarihi: 04/08/2009
Teşekkür Puanı: 1.172
sayın bigdaddy_isi,

bir yanlış yorumlama durumu söz konusu olduğu gerekçesi ile şu hususu belirtmekte fayda var kanısındayım.

konunun 130.mesajında yer alan ilave kod dahil etme açıklamasının amacı şu:

127.mesajda yazdığınız kod eğer sadece o hali ile geçerli olarak kullanılırsa,130.mesajda da bahsi geçtiği üzere ilgili satırda hata verecektir.

Kod:
Const SW_HIDE = 0       ' Fenster ausblenden

   Const SW_NORMAL = 1     ' Fenster wiederherstellen bzw. einblenden
   Private Declare Function ShowWindow Lib "user32" _
   (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
kodlarını yazmadığınız takdirde.çünkü;ShowWindow adlı fonksiyonun declare edilmesi (tanıtılması) gerekmektedir ki,fonksiyon işlerlik kazanabilsin.

Alıntı:...örnek olarak #127. mesajda vermiş olduğum Kod ile ilavesiz sorunsuz çalışıyor...

bu kod ilave edilmeden direkt sadece sizin eklediğiniz kodlar olarak ilgili olay yordamına dahil edildiğinde sorunsuz çalışması söz konusu olmayacaktır.hata verir.

kodlardaki ifadelerin hazırlayan veya son kullanıcı için bir anlam içermesi şart değil.

size dair bir zaruretten dolayı da yapılmamıştır bu açıklama.sadece bir düzeltme ihtiyacı gereksinimi olduğu düşüncesi ile belirtilmiştir.paylaşım için de 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