Ergebnis der Suchanfrage

• Forum: Library: Algorithmen

  Re: Tausender- Trennzeichen in einem Zahlenstring einfügen

    Delphi
    by CalganX, 21. Nov 2004
  Von TypusMensch kommt eine Funktion, die selbiges auch bei Komma-Zahlen (Floats) erreicht. Diese Funktion kann sowohl mit Komma-Zahlen als auch mit normalen Integer-Zahlen verwendet werden:
  function ThouSep2(sTemp: String; cTemp: Char): String;
  var
  iTemp: Integer;
  komma:boolean;
  begin
  komma := Pos(',',stemp) > 0;
  
  if komma = True then begin
  Result := sTemp;