Referans hata alıyorum

**#1)** **ZGH2016** » 18 Haz 2023 10:46

Merhaba,

Aşağıdaki resim hata veriyor.

1687067588206.png

**#2)** **Tarkan VURAL** » 19 Haz 2023 13:42

Merhaba,
Hangi resim ? Soru pek anlaşılmadı.

**#3)** **ZGH2016** » 19 Haz 2023 13:50

Merhaba,

Dosya ektedir.

**#4)** **ZGH2016** » 19 Haz 2023 13:51

Dosyaları yükleyiyorum olmadı.

**#5)** **ZGH2016** » 19 Haz 2023 13:53

Şimdi oldu, galiba, ekran resim görüntüsü ekliyorum.

**#6)** **Tarkan VURAL** » 19 Haz 2023 14:00

Merhaba,
İşletim sisteminiz 64bit ama kodlar 32bit için uygun görünüyor.

Kırmızı satırları silip yerine aşağıdakileri ekleyip dener misiniz ?

Kod: Tümünü seç: #If Win64 Then Private Declare PtrSafe Function FindWindowA Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPtr Private Declare PtrSafe Function GetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long) As LongPtr Private Declare PtrSafe Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As LongPtr #Else Private Declare Function FindWindowA Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function GetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long #End If

**#7)** **ZGH2016** » 19 Haz 2023 14:06

Kodları ekledim, hata verdi, resim görüntüsü ekledim.