EditMask: Zahlen und Sternchen erlauben

[Privateer3000]

Ich vermute mal das Editmask von TEdit
abgeleitet ist, und damit OnKeypress unterstützt
Also prüfe während der Eingabe die Zeichen

Delphi-Quellcode:

if not (Key in ['0'..'9', Char(VK_BACK),'*']) then
  Key := #0;
if (Key in ['.']) then
  Key :=',';