Woher kommen meine unbekannten Zeichen?

[kirchfritz]

Hallo,

Ich finde in meinen Sourcecode Folgendes:

Code: Alles auswählen

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Forms, Controls, StdCtrls;

type
   TForm1 = class(TForm)
    Button1: TButton;
    ListBox1: TListBox;
    procedure Button1Click(Sender: TObject);
  private
  public
  end;

var
  Form1: TForm1;

implementation
{$R *.lfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
  Listbox1.Items.Clear;
  ListBox1.Items.Add('🏠' + ' Home');
  ListBox1.Items.Add('📁' + ' Aufträge');
  ListBox1.Items.Add('📊' + ' Berichte');
  ListBox1.Items.Add('👥' + ' Team');
  ListBox1.Items.Add('⚙️' + ' Einstellungen');
  ListBox1.Items.Add('❓' + ' Hilfe');
end;

end.               

Leider weiß ich nicht mehr, woher ich diesen Sourcecode habe.
Macht ja nix, funktioniert bestens.

Nun möchte ich dies erweitern und zusätzlich Listboxeinträge hinzufügen.
Kann mir jemand sagen, wie ich zu weiteren Icons dieser Art komme.
In welcher Schriftart finde ich diese Zeichen, wie lauten die Codepoints?
Wie schreibt man das am Besten wartungsfreundlich in den Quellcode?

Mein vollständiges Demo-Projekt findet man hier:

project1.zip

(95.88 KiB) 11-mal heruntergeladen

Screenshot 2025-11-17 093950.png (19.35 KiB) 399 mal betrachtet

Viele Grüße
Fritz

[theo]

viewtopic.php?p=151535#p151535

[kirchfritz]

Vielen Dank theo.

Noch offen:
In welcher Schriftart finde ich diese Zeichen, wie lauten die Codepoints?
Wie schreibt man das am Besten wartungsfreundlich in den Quellcode?

[theo]

In welcher Schriftart finde ich diese Zeichen, wie lauten die Codepoints?
Wie schreibt man das am Besten wartungsfreundlich in den Quellcode?

Schriftart: Da gibt es viele. Am Besten ausprobieren.
Codepoints: siehe Anhang. Ist aber eigentlich selten nötig, dass man das wissen muss.
Du brauchst diese nicht gesondert behandeln, das sind Zeichen wie andere auch.
Einfach in der Zeichentabelle auf das Zeichen klicken und schon landet es im Quellcode an der Cursorposition.
Es ist natürlich denkbar, dass der gewählte Editor-Font diese nicht anzeigen kann, aber sie sind trotzdem da im Quelltext.

[kirchfritz]

Diese Seite zeigt sehr schön, welche Emoji möglich sind.
https://emojiterra.com/keyboard/

[kirchfritz]

Hallo theo,

kannst Du mir eine Quellcodezeile zeigen, wie ich das Emoji mit Hilfe eines Codepoints ausgeben kann, ohne das Emoji selbst in den Quellcode einfügen zu müssen.

Code: Alles auswählen

 ShowMessage(WideChar($F0$9F$A5$B4));

Das funktioniert nicht.

[theo]

Nee, mit Widechar geht das nicht.

Z.B. Diese Möglichkeiten:

Code: Alles auswählen

  ShowMessage(Chr($F0)+Chr($9F)+Chr($A5)+Chr($B4));

oder

Code: Alles auswählen

uses LazUTF8;
  ShowMessage(UnicodeToUTF8($1F974));      

Aber warum? Nimm doch einfach das Zeichen als solches, auch wenn der Glyph nicht angezeigt wird.
Diese Hexzahlen sagen ja auch nichts aus.

[wp_xyz]

Das steht oben hinter "UTF8", ist also gar kein WideString. Daher einfach als normalen hex-String verwenden:

Code: Alles auswählen

  ShowMessage(#$F0#$9F#$A5#$B4); 

[EDIT]
theo war schneller

[theo]

Das steht oben hinter "UTF8", ist also gar kein WideString. Daher einfach als normalen hex-String verwenden:

Code: Alles auswählen

  ShowMessage(#$F0#$9F#$A5#$B4); 

[EDIT]
theo war schneller

Dafür ist deine Variante kürzer.
Es stimmt, dass das Chr() hier nicht nötig ist, aber vielleicht trägt es etwas zum Verständnis bei.

[Mathias]

Was auch noch eine Methode ist, um mal schnell ein paar Symbole zu holen. Wen man ein Chat-Programm wie Telegram hat, da hat es eine riessen Flut von Smiley. Von dort kann man diese Symbole recht einfach kopieren.

[theo]

Was auch noch eine Methode ist, um mal schnell ein paar Symbole zu holen. Wen man ein Chat-Programm wie Telegram hat, da hat es eine riessen Flut von Smiley. Von dort kann man diese Symbole recht einfach kopieren.

Wenn schon extern, dann gleich die Referenz bei Unicode.org.
https://unicode.org/emoji/charts/full-emoji-list.html

[kirchfritz]

Hallo Theo,
in der Referenz bei Unicode.org finde ich dieses Zeichen

Screenshot 2025-11-19 075953.png (6.29 KiB) 118 mal betrachtet

Wie kann ich das mit ShowMessage(...) ausgeben?

Code: Alles auswählen

ShowMessage(UTF8Encode(#$1F642+#$200D+#$2195+#$FE0F)); 

funktioniert nicht!

Würdest Du mir auf die Sprünge helfen?

[Mathias]

Würdest Du mir auf die Sprünge helfen?

Ganz zu oberst bei dem Link https://unicode.org/emoji/charts/full-emoji-list.html steht "Full Emoji List, v17.0"
So wie ich festgestellt habe, wurde diese Zeichen am 9. September 2025 veröffentlicht.
Das könnte ein Grund sein, das es nicht geht.

Hier findet man einte Tabelle, wann welche Version erschienen ist.
https://www.unicode.org/reports/tr51/#Emoticons

[kirchfritz]

Das sagt die KI zu meinem Zeichen:

Das Emoji "head shaking horizontally" hat die Codepoints \(1F642\), \(200D\), \(2194\) und \(FE0F\).
Es handelt sich dabei um eine sogenannte ZWJ-Sequenz, die aus dem Emoji für ein leicht lächelndes Gesicht (), einem "Zero Width Joiner" (\(200D\)) und einem horizontalen Pfeil (\(2194\)) besteht, gefolgt von einem Varianten-Selektor (\(FE0F\)) für die korrekte Darstellung. 

Codepoints: \(1F642\) \(200D\) \(2194\) \(FE0F\)
Komponenten: (leicht lächelndes Gesicht) + \(200D\) (Zero Width Joiner) + (horizontaler Pfeil) + \(FE0F\) (Varianten-Selektor)
Unicode-Version: 15.1
Funktion: Die ZWJ-Sequenz bewirkt, dass die einzelnen Zeichen auf unterstützten Plattformen als ein einzelnes Emoji angezeigt werden. 

Bleibt also die Frage:
Wie kann ich solche ZWJ-Sequenzen mit Freepascal/Lazarus richtig darstellen?

[theo]

@kirchfritz: Kopier's doch einfach in den Editor. Was willst du immer mit diesem Hex-Code?
Ob du eine "unterstützte Plattform" hast, ist eine andere Frage. Hier z.Zt. eher unwahrscheinlich.