Tastencodes auslesen und darstellen

Hallo,

ich habe ein kleines Prog geschrieben, welches die gedrückten Tasten der Tastatur (Event OnKeyPress) einließt und des ASCII Code dazu darstellt.
Funktioniert soweit, aber die Codes für Shift und Tab usw. werden nicht angezeigt. Wie komme ich an diese Tasten ran?

YLIREBUS

void __fastcall TImageForm::FormKeyDown( TObject *Sender,
                                         WORD &Key,
                                         TShiftState Shift )
{

if ( Shift.Contains( ssCtrl ) ) 
{
      ShowMessage("CTRL gedrückt");
}

if ( Shift.Contains( ssAlt )) 
{
      ShowMessage("ALT gedrückt");
}

}

USW.

Ich bedanke mich. Mit dem Event KeyDown komme ich an die "Sondertasten" ran.