Char(VK_DELETE)

[Nils_13]

Hi,

ich kann Backspace drücken, aber Entf nicht. Warum ?

Delphi-Quellcode:

procedure TfrmCreate.eKMKeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9', ',', '.', Char(VK_BACK), Char(VK_DELETE)]) then
    Key := #0;
end;