Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Tasen sperren mit key /Wie gebe ich entf/del frei?

**Hallo_Thomas**

Delphi-Quellcode:

			procedure TForm2.NurGanzezahlen(Sender: TObject; var Key: Char);

begin

  if not (Key in [Ord('0')..Ord('9'), VK_INSERT, VK_DELETE])  then Key := #0;

end;

Fehlermeldung: inkompatiple Typen: 'Char' und 'Integer'

Hallo_Thomas Registriert seit: 18. Apr 2005 Ort: Dresden 405 Beiträge Delphi 2005 Professional	#3 Re: Tasen sperren mit key /Wie gebe ich entf/del frei? 4. Apr 2006, 14:25 markieren Delphi-Quellcode: procedure TForm2.NurGanzezahlen(Sender: TObject; var Key: Char); begin if not (Key in [Ord('0')..Ord('9'), VK_INSERT, VK_DELETE]) then Key := #0; end; Fehlermeldung: inkompatiple Typen: 'Char' und 'Integer'
	Zitat

Einzelnen Beitrag anzeigen

Re: Tasen sperren mit key /Wie gebe ich entf/del frei?