[cloayza]

Tambien podrias usar lo siguiente, y asi evitar buscar el codigo ascii de las letras que deseas utilizar.

Código Delphi [-]
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
    //67 y 99 son el código ascci de C y de c 
      If ( (Key in [Ord('C'), Ord('c')] ) And (ssCtrl in Shift)) Then
      //if ((key=67) or (key=99)) and (ssCtrl in Shift) then
        Close;
end;

Saludos