Position des Währungszeichens ändern.

[Darlo]

Hallo zusammen,

das Forum konnte mir schon eine Menge Denk- und Lösungsansetze bieten, dafür erstmal vielen Dank! :dp:

Zu der Frage wie ich das Währungsformat von €123,45 auf 123,45 € ändern kann habe ich jedoch
keine Lösung finden können.

Wie man den tsd.-Seperator oder das Währungszeichen ändern kann ist mir klar, nicht jedoch die Position.

Perfekt wäre natürlich wenn man nur die Einstellung für das Programm ändert und nicht für
das System.

Über eure Hilfe freue ich mich.

Gruß
Darlo

[mkinzler]

Du könntest die Ausgabe manuell formatieren

[Wolfgang Mix]

Delphi-Quellcode:

delete(s,1,2);
s:=s+' €';

[himitsu]

Zitat:

Wie man den tsd.-Seperator oder das Währungszeichen ändern kann ist mir klar, nicht jedoch die Position.

Und wie machst du das?

Es gibt den CurrencyString für das Zeichen und CurrencyFormat für die Possition.

[Darlo]

Hmm, da ich mir ziemlich viele Währungen aus einer DB ziehe und mit diesen weiterarbeiten wäre eine
"globale" Lösung das Beste.

[Darlo]

Hallo zusammen,

habe die Lösung gefunden, anbei der Code:

DateSeparator := '.';
ShortDateFormat := 'dd.mm.yyyy';
LongDateFormat := 'dddd, dd.mmmm.yyyy';
DecimalSeparator := ',';
ThousandSeparator := '.';
CurrencyString := '€';
CurrencyFormat := 3; // 1 €
NegCurrFormat := 8; // -1 €

Vielen Dank

Darlo