O QUE TEM DE ERRADO NESTE CÓDIGO?

[b:5bddd82a79]eu estou tentado desabilitar a tecla delete do meu teclado com esse código

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
keypreview:=true;
if key=#46 then
key:=0;
end;

e eu não estou consseguindo compilar o programa dando o seguinte erro incompatible types.
o que tem de errado aqui?
[/b:5bddd82a79]