Registriert seit: 13. Jul 2013
10 Beiträge
Delphi 2007 Professional
|
Variable ersetzen
11. Aug 2013, 16:59
Hallo zusammen,
ich möchte in dem folgenden Quellcode das ß durch eine Variable ersetzen
if (length(edit1.text)<9) and ((edit1.text[1] in ['ß']))
Hintergrund: In dem Programm wird eine Packung eingescannt.
Leider senden manche Scanner statt dem "ß" ein "-" Zeichen.
-7314486 scannt der Quantumscanner und ß7314486 liest ein Honeywellscanner.
In wollte das nun so lösen:
if (length(edit1.text)<9) and ((edit1.text[1] in [edit17.text]))
Damit könnte ich, je nach Arbeitsplatz und Scanner, das Vorzeichen ganz easy anpassen.
Gehtr leider nicht. Kennt jemand dazu eine Lösung?
|