Unicode-Wert eines Zeichens ausgeben

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Sunny
Beiträge: 290
Registriert: 19.02.2009 06:02

Unicode-Wert eines Zeichens ausgeben

Beitrag von Sunny »

Gleich mal zum Thema...
Mit dem Befehl "Chr()" kann man sich ja das ASCII-Zeichen eines wertes ausgeben.
Beim Wert 65 würde dann der Buchstabe "A" ausgegeben werden allerdings funktioniert das eben nur mit den ASCII-Zeichen.

Was muss ich machen, damit mir beim Wert 9824 ein "Pik" (wie vom Kartenspiel) angzeigt wird...
(Also ich weiß schonmal so viel, dass es nicht reicht den Befehl "Chr()" zu nutzen und bei den Compiler-Optionen, "Unicode Executable erstellen" zu aktivieren.)
Benutzeravatar
STARGÅTE
Kommando SG1
Beiträge: 7031
Registriert: 01.11.2005 13:34
Wohnort: Glienicke
Kontaktdaten:

Re: Unicode-Wert eines Zeichens ausgeben

Beitrag von STARGÅTE »

Wenn du das File-Format auf UTF8 stellst (und natürlich Unicode aktivierst), dann arbeitet (die Compiler-Funktion) Chr() auch mit Unicode-Werten:

Code: Alles auswählen

Enumeration
	#Window
	#Gadget
EndEnumeration


OpenWindow(#Window, 0, 0, 800, 600, "WindowTitle", #PB_Window_MinimizeGadget|#PB_Window_ScreenCentered)
	TextGadget(#Gadget, 10, 10, 200, 40, Chr(9824))
	SetGadgetFont(#Gadget, FontID(LoadFont(#PB_Any, "Arial Unicode MS", 20)))

Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
andersrum gibt auch Asc() einen 2-Byte-Wert zurück:

Code: Alles auswählen

Debug Asc("♠")
PB 6.01 ― Win 10, 21H2 ― Ryzen 9 3900X, 32 GB ― NVIDIA GeForce RTX 3080 ― Vivaldi 6.0 ― www.unionbytes.de
Aktuelles Projekt: Lizard - Skriptsprache für symbolische Berechnungen und mehr
Antworten