[Image.Canvas.TextOut] €-Zeichen "malen"

[himitsu]

Zitat von xZise:

Wass soll ich da herausfinden? Und wie kann ich Unicodezeichen in einen String schreiben?


[edit]Also ein Chr(128) anstelle des € hats nicht getan

icht was es in deinem Ansi (im QuellText für einen Code hat, sonden den Code aus dem Zeichensatz

z.B. ein Edit mit der Schriftart und dem Zeichen und dann.
Edit1.Text := IntToStr(Ord(Edit1.Text[1])); oder mal mit
Edit1.Text := '€'; überprüfen.

und du bist dir auch sicher, daß der Text innerhalb des Bildes liegt und nicht nur ä bissl außerhalb?


[add]
OK, ich seh grad es sollte zentriert sein ._.

PS: einmal berechnen reicht auch schon aus

Delphi-Quellcode:

S := FloatToStr(MONEY[i + 14]) + ' €';
RightMoney.Canvas.TextOut((RightMoney.Width - RightMoney.Canvas.TextWidth(S)) div 2, i * 24 + 5, S);