WideChar in Set-Ausdrücken auf ByteChar verkürzt ?

[nachtstreuner]

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