UTF-8 encode and decode: Difference between revisions
Content added Content deleted
Langurmonkey (talk | contribs) |
m (Replace deprecated functions) |
||
Line 3,927:
writeln("-------------------------------------------------");
for ch range "AöЖ€𝄞" do
utf8 :=
writeln(ch rpad 11 <& "U+" <& ord(ch) radix 16 lpad0 4 rpad 7 <&
hex(utf8) rpad 22 <&
end for;
end func;</syntaxhighlight>
|