*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->


Join the forum, it's quick and easy


*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->

Would you like to react to this message? Create an account in a few clicks or log in to continue.

● En Güncel Paylaşım Platformu ●

---Misafir--- Hos Geldiniz Daha iyi Bir Hizmet İçin Üye olunuz.ÜyeLer Link GörebiLir

    Vb Kod Ram Ölçer

    MnyTirith
    MnyTirith
    MnyTirith
    ● Admin ●
    ● Admin ●


    <b>Doğum tarihi</b> Doğum tarihi : 20/06/90
    • Post n°1

    Vb Kod Ram Ölçer Empty Vb Kod Ram Ölçer

    Mesaj tarafından MnyTirith Cuma Mart 12, 2010 9:42 pm

    'Ram bilgilerini öğrenmek için;
    'Bir adet timer ve 4 adet textbox ekleyin, Timerin intervalini 1000 yapın

    Private Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As RamBilgileri)
    Private Type RamBilgileri
    boyut As Long
    yuzderam As Long
    toplamram As Long
    bosram As Long
    End Type
    Private Sub Timer1_Timer()
    Dim bilgiler As RamBilgileri
    GlobalMemoryStatus bilgiler
    Text1.Text = "% " & bilgiler.yuzderam 'yüzde ram kullanımı
    Text2.Text = bilgiler.toplamram / 1024 / 1024 & " MB" 'toplam ram
    Text3.Text = bilgiler.toplamram / 1024 / 1024 - bilgiler.bosram / 1024 / 1024 & " MB" 'kullanılan ram
    Text4.Text = bilgiler.bosram / 1024 / 1024 & " MB" ' boş ram
    End Sub

    • Sayfa başına dön

      Similar topics

      -

      Forum Saati Paz Mayıs 19, 2024 9:07 pm