Sprawdzanie stanu klawisza ALT

Aby na etykiecie Label1 wyświetlany był stan klawisza ALT (tzn. czy jest wciśnięty, czy nie) umieszczamy na formularzu komponent Timer z zakładki System i tworzymy dla niego zdarzenie OnTimer, w którym do określenia stanu klawisza ALT używamy funkcji Windows API GetKeyState():

Unit1.cpp

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   if (HiWord(GetKeyState(VK_MENU)) != 0)
      Label1->Caption = "Wciśnięty";
   else
      Label1->Caption = "Nie wciśnięty";
}