Einzelnen Beitrag anzeigen

janjan

Registriert seit: 16. Jan 2003
Ort: Bonn ("links über Königswinter ")
240 Beiträge
 
Delphi 4 Standard
 
#3
  Alt 18. Feb 2003, 11:33
oder so:

Delphi-Quellcode:
Function PunktToKomma(s: string):string;
begin
  result:=copy(s,0,pos('.',s)-1)+','+copy( s, pos('.',s)+1, length(s)-pos('.',s));
end;
Wobei DecimalSeperator die einfachere Variante ist
  Mit Zitat antworten Zitat