@Reinhard:
Das hatte ich befürchtet - und gehofft, dass es vielleicht doch eine fertige Funktion dafür gibt...
@all:
Ich musste nur auf WideChar-Funktionen umstellen:
Delphi-Quellcode:
with Canvas
do
begin
Font.
Name := '
Arial';
DrawTextW(
Handle, PWideChar(WideChar($2192) + '
G' + IntToStr(No)), -1, Rect, ...);
...
Stahli