Delphi undeclared identifier 'key' hatası alıyorum.

Merhaba arkadaşlar delphi de bir program hazırlıyorum ancak bir texbox a sadece rakam girilmesini istiyorum bunun içinde

procedure CheckText(Sender:TEdit; var Key:Char);
begin
If not (Key in ['0'..'9','.',#8, #13]) then
Key := #0;
If Key = '.' then
begin
If Pos('.', Sender.Text) > 0 then
Key := #0;
end;
end;

bunun gibi bir kod kullanıyorum ancak delphi kod çalıştırınca undeclared identifier 'key' hatası veriyor buradaki 'key kodunu tanımıyor. Bilgisi olan anlayan varsa yardım ederse çok sevinirim.'