Ingresar sólo decimales en un Edit

[[eduarcol]]

no se que caracter represente el #8 pero con esta modificacion propuesta debe funcionar

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject;
  var Key: Char);
begin
   if ((Key < '0') or (Key > '9')) and (Key <> #8) and (Key <> ',') then
      Key := #0;
end;