Hallo himitsu,
gemäß Deinem Hinweis und meiner Änderung im Code :
Delphi-Quellcode:
//==============================================================================
//Im Feld PLZ dürfen nur Zahlen od. auch ein Leerzeichen eingegeben werden (11)
//==============================================================================
procedure TfrmKUNDENVERWALTUNG.cxDBEditPLZKeyPress(Sender: TObject;
var Key: Char);
begin
if not CharInSet(Key,[ '0'..'9', ' ', AnsiChar(VK_BACK) ]) then
key := #0;
end;
funktioniert es jetzt einwandfrei. Keine Warnmeldungen beim Compilieren, zur Laufzeit funktioniert auch alles.
Besten Dank an Dich und DeddyH
