Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#8
  Alt 24. Jun 2003, 20:00
Code:
if pos (DecimalSeparator,text) <> 0 then begin // Komma überhaupt da ??
then
        key := #0; // zweites Komma unterdrücken
P.S.: nicht getestet !
Gruß
Hansa