Re: Formatierte Ausgabe von Zahlen mit Decimaltrennzeichen ? - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von Olaf Mertgen (263 Beiträge) am Donnerstag, 20.Juni.2002, 22:44. WWW: auto-surf.de
    Re: Formatierte Ausgabe von Zahlen mit Decimaltrennzeichen ?

      Hallo,

      ich habe dafür mal folgende Subroutine geschrieben:
      <perl>
      sub FormatZahl {
       my ($Zahl, $Stellen) = @_;
       my ($s, $i) = ("", 0);
       
       $Zahl = sprintf("%.$Stellen"."f", $Zahl) if ($Stellen > 0);
       
       ($Zahl, $Komma) = split(/\./, $Zahl);
       
       for ($i = 1; $i <= length($Zahl); $i++) {
        $s = (($i % 3 == 0) && ($i < length($Zahl)) ? "." : "") . substr($Zahl, -$i, 1) . $s;
       }
       $Komma = "," . $Komma if length($Komma);
       return $s . $Komma;
      }
      </perl>
      

      Dabei gibt man als Parameter die Zahl und die anzuzeigenden Nachkommastellen an.

      Bei mir funktioniert die Routine problemlos.

      Gruß, Olaf


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von H.Fehde (724 Beiträge) am Donnerstag, 20.Juni.2002, 20:36. WWW: bei123.de
    Formatierte Ausgabe von Zahlen mit Decimaltrennzeichen ?

      Wie gelingt es einem, daß mit Decimaltrennzeichen "Komma" definierte Zahlenwerte auch mit "Komma" ausgegeben werden und mehstellige Zahlen an jeder dritten Stelle einen "Punkt" haben ?

      Ich meine halt sowas: 2.800.141.123,89

      Hat jemand ne Idee ? Gruß Harald

     Antworten

    Beitrag von Olaf Mertgen (263 Beiträge) am Donnerstag, 20.Juni.2002, 22:44. WWW: auto-surf.de
    Re: Formatierte Ausgabe von Zahlen mit Decimaltrennzeichen ?

      Hallo,

      ich habe dafür mal folgende Subroutine geschrieben:
      <perl>
      sub FormatZahl {
       my ($Zahl, $Stellen) = @_;
       my ($s, $i) = ("", 0);
       
       $Zahl = sprintf("%.$Stellen"."f", $Zahl) if ($Stellen > 0);
       
       ($Zahl, $Komma) = split(/\./, $Zahl);
       
       for ($i = 1; $i <= length($Zahl); $i++) {
        $s = (($i % 3 == 0) && ($i < length($Zahl)) ? "." : "") . substr($Zahl, -$i, 1) . $s;
       }
       $Komma = "," . $Komma if length($Komma);
       return $s . $Komma;
      }
      </perl>
      

      Dabei gibt man als Parameter die Zahl und die anzuzeigenden Nachkommastellen an.

      Bei mir funktioniert die Routine problemlos.

      Gruß, Olaf

     Antworten

    Beitrag von H.Fehde (724 Beiträge) am Donnerstag, 20.Juni.2002, 23:26. WWW: bei123.de
    Re: Formatierte Ausgabe von Zahlen mit Decimaltrennzeichen ?

     Antworten


     
 Liste der Einträge von 46200 bis 46350:Einklappen Zur Eingabe 
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge


Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.06s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!