AccessTr.neT
Accessin Kapatma Düğmesini Pasif Yapma(Kapatmayı Engelleme) - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: Accessin Kapatma Düğmesini Pasif Yapma(Kapatmayı Engelleme) (/konu-accessin-kapatma-dugmesini-pasif-yapma-kapatmayi-engelleme.html)

Sayfalar: 1 2


Accessin Kapatma Düğmesini Pasif Yapma(Kapatmayı Engelleme) - feraz - 25/01/2020

Merhaba.

Accessi kaptma olayını engelleyen ek yüklüyorum.

Hayırlı olsun Img-grin


Cvp: Accessin Kapatma Düğmesini Pasif Yapma(kapatmayı Engelleme) - tekinuygun - 25/01/2020

(25/01/2020, 14:25)feraz yazdı: Merhaba.

Accessi kaptma olayını engelleyen ek yüklüyorum.

Hayırlı olsun Img-grin

Paylaşım için teşekkürler sayın @feraz


Cvp: Accessin Kapatma Düğmesini Pasif Yapma(kapatmayı Engelleme) - feraz - 25/01/2020

(25/01/2020, 16:20)tekinuygun yazdı:
(25/01/2020, 14:25)feraz yazdı: Merhaba.

Accessi kaptma olayını engelleyen ek yüklüyorum.

Hayırlı olsun Img-grin

Paylaşım için teşekkürler sayın @feraz
Rica ederim sayın @tekinuygun


Cvp: Accessin Kapatma Düğmesini Pasif Yapma(kapatmayı Engelleme) - accessman - 26/01/2020

teşekkürler 64 bit de else ile end if arası  kırmızı harflere dönüşerek hata verdi neden olabiilir

#If VBA7 Then
    Private Declare PtrSafe Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal wRevert As Long) As Long
    Private Declare PtrSafe Function EnableMenuItem _
          Lib "user32" (ByVal hMenu As Long, ByVal wIDEnableItem As Long, ByVal wEnable As Long) As Long
#Else
    Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal wRevert As Long) As Long
    Private Declare Function EnableMenuItem _
          Lib "user32" (ByVal hMenu As Long, ByVal wIDEnableItem As Long, ByVal wEnable As Long) As Long

#End If


Cvp: Accessin Kapatma Düğmesini Pasif Yapma(kapatmayı Engelleme) - feraz - 26/01/2020

Rica ederim.
Ben 64bitte denememiştim 32bit olduğu için benim office.

64 bit için ptrsafe ekleniyor sadece ve if ile onu eklemiştim çalışır diye.

64 bit yükleyip denerim sonra.


Cvp: Accessin Kapatma Düğmesini Pasif Yapma(kapatmayı Engelleme) - feraz - 26/01/2020

64 bit yükledim ve kırmızıya boyandı ve hatasız çalıştı.