Delphi 2009 - Probleme mit Unicode

[sonicus83]

Also bei folgendem steht ein Eurozeichen da:

Caption := 'Stundensatz ['+chr(8364)+'/h]'; Wenn ich statt FloatToStrF das Eurozeichen direkt ausgeben lasse, erscheint dies auch im VST, es liegt also nicht an der Schrift, FloatToStrF liefert also anscheinen das falsche Zeichen zurück.

Wenn ich mir die Variable CurrencyString ausgeben lasse, zeigt er mir auch das Eurozeichen an, wenn ich CurrencyString das Eurosymbol zuweise, zeigt er weiterhin das falsche Symbol an, wenn ich CurrencyString z.B. 'A' zuweise, erscheint auch das A..

Zusammenfassung:

CellText := FloatToStr(stundensatz) + '€'; => funktioniert

CellText := FloatToStrF(stundensatz, ffCurrency, 18, 2); => funktioniert nicht

Delphi-Quellcode:

CurrencyString := '€';
CellText := FloatToStrF(stundensatz, ffCurrency, 18, 2);

=> funktioniert nicht

Delphi-Quellcode:

CurrencyString := 'A';
CellText := FloatToStrF(stundensatz, ffCurrency, 18, 2);

=> (funktioniert)