Biblioteka allegro - obsługa klawiatury

Próbuję napisać program, który będzie obsługiwał klawiaturę:

Program Klawiatura;

uses
crt, allegro;

begin
        al_init; //inicjuję tryb graficzny
        al_set_gfx_mode(al_gfx_autodetect_windowed,1000, 700, 0, 0); //wlaczam tryb graficzny
        al_install_keyboard; //instaluje klawiature
        al_message('Wcisnij klawisz t'); 
        if al_key[al_key_t]<>0 then 
                al_message('Wcisnieto klawisz t') //to program ma wyswietlic po wcisnieciu klawisza t
        else
                al_message('Error'); //a to w przeciwnym razie
        al_message('Koniec');
        al_exit;
end.
 

Ale nie chce zajarzyć. Co robię nie tak?

EDIT: Jak napisałem tak:

Program Klawiatura;

uses
crt, allegro;

begin
        al_init;
        al_set_gfx_mode(al_gfx_autodetect_windowed,1000, 700, 0, 0);
        al_install_keyboard;
        while al_key[al_key_t]=0 do;
        al_message('Wcisnieto klawisz t'); 
        al_message('Koniec');
        al_exit;
end.
 

To działa, ale program robi trochę co innego.

To działa, ale program robi trochę co innego.

Co to znaczy "co innego"? Robi to co mu kazałeś - póki klawisz t nie jest wciśnięty, pętla nic nie robi; Jak wciśniesz klawisz t to pętla się kończy, wyświetlone zostają dwa napisy i program jest zamykany.