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.