Damit kannst du den String auf verbotene Zeichen prüfen:
Delphi-Quellcode:
function StringUeberpruefenHex(s:string): string;
var i: cardinal;
begin
if s<>'' then for i := 0 to Length(s)-1 do
if s[i] in ['0'..'9','A'..'F','a'..'f'] then
Result := Result+s[i]
end;
// Mit Dez und Bin gehts genauso, nur musst du dann
['0'..'9','A'..'F','a'..'f']
// durch
['0'..'9']
// bzw.
['0','1']
// ersetzen