Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 13. Jun 2013
  @AmateurProfi, hattest du selbst eine Umwandlungsfunktion geschrieben ?
  Weil in deinem Anhang konnte ich nur die Datei aus dem ursprünglichen Anhang von blondervolker finden ?
  
  Ich habe die Funktionen von meinem letzen Beitrag mal zur besseren Übersicht in eine extra Unit gepackt.
  Hier nochmal beides.
  
  Unit1 ist ein Beispiel für den Aufruf.
  
  Mfg
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 13. Jun 2013
  Die angefügte Unit mit dem Beispiel macht genau das:
  12,89 -> zwölfeuroneunundachtzig
  
  Dazu habe ich hier diese Funktion genommen http://www.delphi-fundgrube.de/faq13.htm, und eine kleine Änderung gemacht. Außerdem habe ich noch 2 Funktionen, um den String in Cent und Euro zu trennen und entsprechend auszugeben, geschrieben.
  
  Ich habe mal alles Zusammen im Anhang in einer Unit. Sollte in...
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 11. Jun 2013
  @Bjoerk ja stimmt so könnte man es machen.
  Die Listenansicht wäre ja für große Zahlen auf jedenfall sinnvoller, man könnte sie auch mit der ConvertString Version kombinieren.
  
  Aber zurück zum eigentlichen Problem, ich poste mal die ganze Unit (sollte so unter Delphi problemlos Compilieren), dann müsste es aber eigentlich klar sein, oder ich habe das Problem nicht verstanden...
  
  unit Unit1;
  ...
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 11. Jun 2013
  Hier mal beide Versionen im Vergleich (Zahl: 12345678901234567890):
  
  function BuildList...:
  12 Trillionen
  345 Billiarden
  678 Billionen
  901 Milliarden
  234 Millionen
  567 Tausend
  890
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 11. Jun 2013
  Naja bei der Variante fehlt aber noch die 890 zum Schluss als Wort(aber wahrscheinlich ist das Absicht, würde sich ja blöd anhören...). Es ist eher eine Semi-Wort Variante würde ich sagen. Und blondervolker hat nichts von einer Listendarstellung gesagt. Aber auch interessant.
  
  Mfg
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 11. Jun 2013
  Ja der Aufbau hat mich auch erst etwas verwirrt und ich dachte auch erst es wäre Short. Aber Short ist eigentlich eine Funktion von GetShortName.
• Forum: Programmieren allgemein

  AW: Zahl in Worten ausgeben

   
    by Ginko, 11. Jun 2013
  (**
  * Konvertiert einen String mit der Zahl in Ziffern, in einen String mit der
  * ausgeschrieben Zahl.
  *
  * Input - Die Zahl in Ziffern.
  *)
  function ConvertString(const Input: string): string; // Public
  
  sollte die richtige Funktion sein. Steht auch im interface...