Soru 64 bit Sistemde File dialog

Katılım
17 Haziran 2008
Mesajlar
1,871
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Altın Üyelik Bitiş Tarihi
26-03-2020
Merhaba arkadaşlar;

32 bit sistemde çalışan fonksiyon, 64 bit sistem çalışmuyor., Hata da vermiyor. file dialog penceresini nasıl çıkarabilirim ?

Kod:
Private Declare PtrSafe Function GetSaveFileName Lib _
"comdlg32.dll" Alias "GetSaveFileNameA" _
(pOpenfilename As OPENFILENAME) As Long
 

Zeki Gürsoy

Uzman
Uzman
Katılım
31 Aralık 2005
Mesajlar
4,374
Excel Vers. ve Dili
Office 365 (64 bit) - Türkçe
Win32 API fonksiyonun 64 bit uyumu için yeniden düzenlenmesi gerekiyor. MS Office zaten bu diyalog pencerelerini veriyor...

 
Katılım
17 Haziran 2008
Mesajlar
1,871
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Altın Üyelik Bitiş Tarihi
26-03-2020
Win32 API fonksiyonun 64 bit uyumu için yeniden düzenlenmesi gerekiyor. MS Office zaten bu diyalog pencerelerini veriyor...


hocam hata vermiyor. fonksiyon çalışmuyor.. dvb dosyasında txt kaydeden ve açan iki dialog pencereside çalışmuyor.

nasıl bir düzenleme yapılmalı ? ptrsafe ilave ettim. ancak pencere gelmedi.
 

Zeki Gürsoy

Uzman
Uzman
Katılım
31 Aralık 2005
Mesajlar
4,374
Excel Vers. ve Dili
Office 365 (64 bit) - Türkçe
Arkadaşım, lütfedip bağlantıyı incelersen ikisini (MSO & Win32 API) de göreceksin...
 
Katılım
17 Haziran 2008
Mesajlar
1,871
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Altın Üyelik Bitiş Tarihi
26-03-2020
Arkadaşım, lütfedip bağlantıyı incelersen ikisini (MSO & Win32 API) de göreceksin...
verdiğiniz linke baktım hocam. Fakat bende Class şeklinde bir tanımlama yapılmış durumda. FileDialogs.cls
 

Zeki Gürsoy

Uzman
Uzman
Katılım
31 Aralık 2005
Mesajlar
4,374
Excel Vers. ve Dili
Office 365 (64 bit) - Türkçe
O zaman bağlantıdaki API deklarasyonları kopyalayıp Class'ınıza yapıştırın.
 
Katılım
17 Haziran 2008
Mesajlar
1,871
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Altın Üyelik Bitiş Tarihi
26-03-2020
@Zeki Gürsoy

Şu an ona bakıyorum. İnşallah olur.

Teşekkür ederim.
 
Katılım
17 Haziran 2008
Mesajlar
1,871
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Altın Üyelik Bitiş Tarihi
26-03-2020
@Zeki Gürsoy

Dediğiniz şekilde yaptım. Ancak sonuc değişmedi.

İlgili Class size göndersem bakabilirmisiniz.?

ShowOpen ve ShowSave isiminde iki ayrı fonksiyon yazılmış... Beni aşıyor..
 
Üst