Anzeige farbiger Emoji (unicode Zeichen) mit Segoe UI Emoji Schrift in Delphi

[EWeiss]

Mein Beitrag zu dem Thema..
Sample in GDI+ Windows 7.
Ob es in Windows 10 oder höher wie Win7 farbig ist kann ich nicht testen.

Sei's drum. zumindest habe ich es versucht. ;)
Source enthalten..

gruss

[EWeiss]

Zitat:

Zitat von Sherlock (Beitrag 1405258)

Emil, melde Dich nochmal, wenn Du es schaffst in einem Schriftzeichen mindestens zwei verschiedene Farben unterzubringen. ;)
Denn darum geht es hier. Die dargestellten Emoji haben zB rote Lippen, weiße Augen, gelbe Gesichter und schwarze Konturen. Flächig gefärbte Schriftzeichen kann in der Tat jeder mindestens seit WfW(*).

Sherlock

(*) Windows for Workgroups

Wollte mich zurück melden habe sogar 3 Farben wenn man schwarz mit rechnet und zeigen das es grundsätzlich möglich ist.

Die Zunge habe ich jetzt nicht eingefärbt wäre aber auch kein Problem.
Habe es sogar noch etwas verschönert in dem ich den Rand auf 1 Pixel gesetzt und mit GdipFillPath diesen Bereich gefüllt habe.
Unter Verwendung von ..

1. GdipCreatePath
2. GdipSetSmoothingMode
3. GdipCreateSolidFill
4. GdipFillEllipseI
5. GdipCreatePen1
6. GdipFillPath
7. GdipDrawPath

Und nu?
Aber nein ihr wisst immer alles besser ;)
Damit ihr es auch glaubt noch eins in der Größe -320
Ist genug mit der Spielerei ihr seht es funktioniert aber ich muss es nicht unbedingt haben.

gruss

[KodeZwerg]

@EWeiss: Gratuliere zu Deinem pers. Erfolg :thumb: auch wenn es nicht direkt das eigentliche Thema betrifft; aber Du wurdest ja anscheinend herausgefordert :P

[EWeiss]

Zitat:

Zitat von KodeZwerg (Beitrag 1405384)

@EWeiss: aber Du wurdest ja anscheinend herausgefordert :P

So ist es :)
Bin mir nur nicht sicher sind es jetzt 3 Farben ? :lol:
Mir wurde ja gesagt ich könnte keine Farben unterscheiden.

gruss

[mkinzler]

Aber nicht so wie die Schrift es vorgibt, was Ziel der Frage war. Du nimmst die einfarbige Grundversion und fügst Farben hinzu. In der Vektorschriftdatei befindet sich alles, was benötigt wird.

https://www.typografie.info/3/Schrif...ui-emoji-r154/

[Sherlock]

Emil, ich ziehe meinen Hut! Klasse, ganz ehrlich!
Es ist immer wieder eine Wonne zu sehen, was Du grafisches hervorzauberst. Für mich hätte übrigens das Bildchen mit der Zunge gereicht ;)

Sherlock

[EWeiss]

Zitat:

Zitat von mkinzler (Beitrag 1405386)

Aber nicht so wie die Schrift es vorgibt, was Ziel der Frage war. Du nimmst die einfarbige Grundversion und fügst Farben hinzu. In der Vektorschriftdatei befindet sich alles, was benötigt wird.

https://www.typografie.info/3/Schrif...ui-emoji-r154/

Richtig, am ende ging es nur noch darum mehr als 1 Farbe im Font darzustellen das habe ich gelöst und dokumentiert das es geht.
Ok ist erledigt.

gruss

[EWeiss]

Mich würde aber schon noch interessieren ob das Sample mit GDI+ unter W10 die Emoji farbig anzeigt.
Bisher kam jedenfalls keine Rückmeldung.

gruss

[Uwe Raabe]

Zitat:

Zitat von EWeiss (Beitrag 1405450)

Mich würde aber schon noch interessieren ob das Sample mit GDI+ unter W10 die Emoji farbig anzeigt.

Hier sieht das so aus (exe aus der ZIP einfach gestartet):

[EWeiss]

Zitat:

Zitat von Uwe Raabe (Beitrag 1405451)

Zitat:

Zitat von EWeiss (Beitrag 1405450)

Mich würde aber schon noch interessieren ob das Sample mit GDI+ unter W10 die Emoji farbig anzeigt.

Hier sieht das so aus (exe aus der ZIP einfach gestartet):

OK Danke..
Dann trifft es zu das es mit GDI+ nicht funktioniert diese farbig darzustellen.
Darum ging es mir um zu prüfen ob der Umweg über Direct2D vernachlässigt werden kann.
Es sei denn es liegt an der Kompilierten Version.. (Kann ich mir aber nicht vorstellen)

gruss

[Jumpy]

So siehts bei Windows10 aus, hab einfach die .exe gestartet.

[EWeiss]

Zitat:

Zitat von Jumpy (Beitrag 1405455)

So siehts bei Windows10 aus, hab einfach die .exe gestartet.

Danke..

gruss

[romber]

Moin zusammen!

Der Thread ist zwar schon etwas älter, das Problem ist (zumindendest für mich) immer noch auktuell. Ich bin auf der Suche nach einem Control (Edit, Memo oder so was in der Art), das farbige Emojis darstellen kann. Bis jetzt zeichnen alle Komponenten, die ich ausprobiert habe, die Empjis-Zeichen schwarzweiss.

Seit der Diskussion ist jede Menge Zeit vergangen, auch die Anfrage von Uwe damals wurde laut Embarcadero bereits in 10.3 umgesetzt. Trodzdem kriege ich es nicht hin mit dem farbigen Emojis.

Habt ihr farbige Emojis in den normalen TEdit oder TMemo hingekriegt? Danke für jeden Hinweis!

D12, Windows 11

[himitsu]

colored smiley win32
https://learn.microsoft.com/en-us/wi...te/color-fonts

https://gist.github.com/nickav/ed342...170888956a7b22
https://stackoverflow.com/questions/...-with-drawtext
https://forum.lazarus.freepascal.org...?topic=56444.0
https://bugs.eclipse.org/bugs/show_bug.cgi?id=528749


Nicht getestet, aber ich würde im Delphi 12 auch mal nach dem neuen Skia-Label schauen.


PS: Früher war die Notepad sowas, wie ein TMemo (Wordpad das TRichEdit),
aktuell (Windows 11) ist wird das Mistding 3D-gerändert, mit GPU-Unterstützung (im Taskmanager zu erkennen) ... wenn ich nun das hier lese, würde ich auf Direct2D tippen. :stupid:

[Uwe Raabe]

Zitat:

Zitat von romber (Beitrag 1537444)

auch die Anfrage von Uwe damals wurde laut Embarcadero bereits in 10.3 umgesetzt.

Ist sie auch! Allerdings geht es dabei um TDirect2DCanvas, aber die wird von Windows bei TEdit und TMemo ja nicht verwendet.

[romber]

Zitat:

Zitat von Uwe Raabe (Beitrag 1537446)

Ist sie auch! Allerdings geht es dabei um TDirect2DCanvas, aber die wird von Windows bei TEdit und TMemo ja nicht verwendet.

Uwe, vielen Dank! Das mit der TEdit und TMemo ist mir natürlich bewusst, habe mich falsch ausgedrückt. Ich meinte eher die Controls mit ähnlicher Funktionsweise.

Kann mir jemand eventuell so ein Control empfehlen?

[MaBuSE]

Ich hab gerade mal ein (VCL) TForm mit TLabel und TEdit erzeugt und in der OnCreate folgendes zugewiesen:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Caption := '❤';
  Edit1.Text := Caption;
  Label1.Caption := Caption;
end;

Das gleiche Verhalten wie damals. Ich verwende Win10 inkl. Updates und Delphi 10.4 (Sydney).

Jetzt hab ich das Gleiche mal mit FireMonkey gemacht:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Caption := '❤';
  Edit1.Text := Caption;
  Label1.Text := Caption;
end;

Hier wird die Titelzeile (Caption) einfarbig gezeigt (wie in VCL).
Aber das Label und das Edit Feld zeigen die farbigen Emojis.

Wenn Du also keine alten VCL Anwendungen erweiterst, nutze FireMonkey und es ist kein Problem. 😊👍

Siehe Screenshot.

[Uwe Raabe]

Unter Vcl könnte man in der aktuellen Delphi-Version auch ein TSkLabel verwenden, aber ein entsprechendes Pendant zum TEdit gibt es dort auch nicht.