Bu yazı yazarın Delphi’nin .NET uyumlu versiyonunu konu ettiği kitabının Api fonksiyonları adlı bölümün bir kısmıdır. http://www.seckin.com.tr/urun.aspx?productID=6451

Caps Lock ve Num Lock Tuşlarının Durumunu Öğrenmek ve Değiştirmek

GetKeyboardState() fonksiyonu kullanıldığı zaman kendisine parametre olarak verilen ve dizi değişkenler gibi işlev gören TKeyboardState tipindeki değişkene tuşların durumu hakkında bilgi aktarmaktadır. Hangi tuş hakkında bilgi edinilmek isteniyorsa KeyboardState tipindeki dizi değişkenin ilgili elemanın içeriğine bakılmalıdır.

Var
    Durum : TKeyboardState;
begin
   GetKeyboardState(Durum);
   If Durum[20] = 0 Then
      Durum[VK_CAPITAL] := 1;
   Else
     Durum[VK_CAPITAL] := 0;
     SetKeyboardState(Durum);
end;