Unicode: UTF-16 surrogate pairs?

[Deep-Sea]

*push*

Es muss doch irgend jemanden geben, der wenigstens ja oder nein sagen kann ... das würde mir ya schon reichen

[Bernhard Geyer]

Es geht (D2009 und Windows). Jedoch habe ich keine Font mit entsprechenden Zeichen so das ich nur ein 𝄞 angezeigt bekomme.
Mein Testcode:

Delphi-Quellcode:

var
  str: String;
  OrderText: String;
  i: Integer;
begin
  str := #$D834 + #$DD1E;

  OrderText := '';
  for i := 1 to Length(str) do
    OrderText := OrderText + ' #$' + IntToHex(Ord(str[i]), 4);

  Canvas.TextOut(100, 100, str);
  ShowMessage(Format('%s (%d), %s', [str, Length(str), OrderText]));
  Windows.MessageBox(self.Handle, PChar(str), 'Test', MB_OK);
end;

[Deep-Sea]

Zitat von Bernhard Geyer:

Es geht (D2009 und Windows). Jedoch habe ich keine Font mit entsprechenden Zeichen so das ich nur ein 𝄞 angezeigt bekomme.

Ein 𝄞? du meinst ein leeres Kästchen - denn ich sehe da einen Notenschlüssel (da ich einen passenden Font habe)

Ich habe es eben nochmal getestet: Unter XP geht es nicht (zwei Platzhalter anstatt ein Notenschlüssel), aber unter Vista gehts! Juhu
(Aber vlt. muss man/ich das bei XP nur irgendwie aktivieren oder so?)

[Ydobon]

Eigentlich sollte es XP von sich aus schaffen und hat es zumindest bei mir bisher auch immer, selbst bei absichtlicher Deaktivierung. Aber überprüf das einfach mal: Surrogates and Supplementary Characters

[Deep-Sea]

Zitat von Ydobon:

Eigentlich sollte es XP von sich aus schaffen und hat es zumindest bei mir bisher auch immer, selbst bei absichtlicher Deaktivierung. Aber überprüf das einfach mal: Surrogates and Supplementary Characters

Ya, dass hatte ich vor dem Erstellen des Threads auch schon gelesen, aber nicht so ganz beachtet Nun habe ich's trotzdem nochmal getestet ... und siehe da, nach einem Neustart geht es auch bei meinem XP. Ich bin manchmal auch ein Idiot

Danke an euch alle