Üst MenüForum kuralları Üst MenüGenel Haberler Üst MenüSoru Sorun Üst MenüForum Takımı Üst MenüReaL Para Üst MenüVİP Bölüm Üst MenüTurnuval Forum
OyunJet Bütün Oyunlar
Yeni Konu Gönder Yeni Yorum Gönder
 
Konuyu Oyla:
  • Toplam: 28 Oy - Ortalama: 2.79
  • 1
  • 2
  • 3
  • 4
  • 5
GetAsyncKeyState Fonksiyonu
Yazar Konu
aboo67 Çevrimdışı
Acemi Üye
*
Acemi Üye

Yorum Sayısı: 91
Edilen Teşekkürler: 10
Alınan Teşekkürler:
17 mesajında 26 kere
Üyelik Tarihi: 23-06-2012

Rep Puanı: 70
ReaL Para: 184.52
Yorum: #1
GetAsyncKeyState Fonksiyonu
GetAsyncKeyState fonksiyonu basit olarak tuşa basılı olup olmadıgını belirtir. bu mantık dorultusunda tuşlara işlem verebilirsiniz





Yazılı anlatım ve örnek ;

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Function Basılırsa(Key As Integer) As Boolean
Basılırsa = CBool(GetAsyncKeyState(Key)) 'GetAsyncKeyState(Key) Fonksiyonunu Basılırsa Olarak Degiştirdim
End Function
Private Sub Form_Load()
Timer1.Interval = 1
End Sub
Private Sub Timer1_Timer()
'Koşul yaratıyoruz
'örnek Tuşlar
'vbKeySpace
'vbKeyF6
'vbKeyF2 gibi
If Basılırsa(vbKeyF9) Then ' F9 Basılırsa
MsgBox ("Aboo67") ' MsgBox acılcak
End If
End Sub
(Bu konu en son: 01-07-2012 tarihinde, saat: 0:16 düzenlenmiştir. Konuyu düzenleyen: aboo67.)
01-07-2012 0:11
kullanıcının tüm mesajlarını bul Teşekkür Et Alıntı ile Cevapla
Sado Çevrimdışı
Muhammet Çolak
*
Yeni Üye

Yorum Sayısı: 662
Edilen Teşekkürler: 5
Alınan Teşekkürler:
1 mesajında 2 kere
Üyelik Tarihi: 14-01-2012

Rep Puanı: 101
ReaL Para: -324.62
Yorum: #2
RE: GetAsyncKeyState Fonksiyonu
eline sağlık kardeşim

Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
___________________________________

[Resim: 9gmju.gif]
01-07-2012 11:28
kullanıcının web sitesini ziyaret et kullanıcının tüm mesajlarını bul Teşekkür Et Alıntı ile Cevapla
Yeni Konu Gönder Yeni Yorum Gönder


Hızlı Menü:


Şu anda bu konuyu okuyanlar: 1 Ziyaretçi


Kurucu » Yönetici » Üst Yetkili » Yetkili » Platin Üye » Gold Üye » Silver Üye » Yeni Üye » Yasaklı Üye

Dost Linkler
İletişimReaLses Yukarı GitArşivRSS Beslemesi