Skip to main content

AccessTr.neT


Ekran Çözünürlüğü

Ekran Çözünürlüğü

#7
(19/11/2018, 12:28)ozanakkaya yazdı:
(19/11/2018, 11:56)alimadam yazdı: Şuan için işyeri dışında olduğumdan deneme şansım yok.Merak ettğim ve deneyeceğim ilk şey,konudaki uygulamanın içindeki modulde bulunan 1024x768  yazan yerleri 800x600 yaptığımda, 800x600 çözünürlüğünw sahip pc.de çalışacak mı? Yoksa bunun için moduldeki koda ekleme mi yapmak lazım?

Formun açıldığı bilgisayarın çözünürlüğü 800x600 ise çözünürlük 1024X768'e çevrilir.
Kodun amacı 1024X768 olmayanları 1024X768'e çevirmek

 If pir <> "1024 x 768" Then
   Call ChangeTo1024_768
    End If

Peki kullanmayı düşündüğümüz bilgisayarın desteklediği maximum çözünürlük 800x600 ise
bu durumda,1930x1080 ile yapılan uygulama 800x600 için düzgün çalışması için kodda ne yapmak lazım?
Cevapla
#8
Modüldeki

Sub ChangeTo1024_768()
Call ChangeScreenResolution(1024, 768)
End Sub

kodunun altına


Sub ChangeTo800_600()
Call ChangeScreenResolution(800, 600)
End Sub

kodu ekle. modülü kaydet.

formun açıldığında olayındaki kodu da


Dim oGCC As RECT
Metin1.Value = GetSystemMetrics(0)
Metin3.Value = GetSystemMetrics(1)
    Dim pir
    GetClipCursor oGCC
    With oGCC
    pir = .droit & " x " & .bas
    If pir <> "800 x 600" Then
    Call ChangeTo800_600
     End If
     End With

kodu ile değiştir. Uygulamayı 800 X 600 ile açarsan hiçbirşey göremezsin.
Cevapla
#9
(19/11/2018, 13:32)ozanakkaya yazdı: kodu ile değiştir. Uygulamayı 800 X 600 ile açarsan hiçbirşey göremezsin.
1930X1080 Çözünürlükte hazırlanmış uygulama için dediklerinizi yapınca, "Uygulamayı 800 X 600 ile açarsan hiçbirşey göremezsin" demişsiniz,yani program çalışmayacaksa-bir şey gözük-me-yecekse bundan şunu mu anlamak lazım?Yüksek çözünürlükte hazırlanan program düşük çözünürlükte çalışmaz,doğu mudur?
Ya da uygulamayı 800 X 600 ile açarsan hiçbirşey göremezsin demekle neyi ifade ettiniz?
Son Düzenleme: 19/11/2018, 14:05, Düzenleyen: alimadam.
Cevapla
#10
Kısaca şöyle izah edeyim, formun Ekrana Sığdır özelliğini Evet olarak değiştirerek denemeniz lazım. bu şekilde de form ekranın dışına taşıyor ise yapacak birşey yok. Genişliği 30cm olarak belirlenen formun 800X600 çözünürlükte tamamının görünmesini beklemeyin.
Cevapla
#11
Bilgiler için teşekkür ediyorum,işyerine geçer geçmez deneyip,sonucu burada paylaşırım.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task