Bir Tuşa İşlem Atama

S

SaviorAngel

Uzman üye
10 Nis 2012
1,073
0
לוס אנג'לס
Bu Dersimizde Mantığı Anlamanız için Boş bir forumda Bastığımız Tuşları Gösteren Bir Olay Yapalım..

Projeye Sadece Bir Timer Nesnesi Ekleyelim ve enabled Özelliğini False Yapalım.

Projemizi Açıp Gerekli Olan Api'yi Tanımlıyoruz....

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Genişletmek için tıkla ...


Hemen Altına Size Aşağıda Verdiğim Tablodan Yararlanarak Tuşumuzun hex kodunu buluyoruz.

Örneğin, Bu derste F1 Tuşunu Ele Alalım.. F1 Tuşunun Hex kodu 70'tir. Başına: &H70 yazdığımızda F1 Tuşunu Tanımlamış oluruz. Aşağıdaki gibi:

Private Const VK_F1 = &H70
Genişletmek için tıkla ...


Form_Load Bölümüne:

Timer1.Interval = 1
Timer1.Enabled = True
Genişletmek için tıkla ...


Burda Timerimizi başlatttık intervali 1 olduğu için Aşırı Hassas Duruma Geldi. Timer'in içine F1'in sabit değeriyle birlikte:

If GetAsyncKeyState(VK_F1) Then 'eğer F1 e basılırsa alttaki komutu çalıştır.
MsgBox "F1 Tuşuna Basıldı" 'Buraya kendi komutunuzu ekleyebilirsiniz.
End If 'koşulumuzu bitiriyoruz.
Genişletmek için tıkla ...


Bitmiştir...
 
Cevap yazmak için giriş yap yada kayıt ol.
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.