[Lazarus] Encoding agnostic functions for codepoints + an iterator
bartjunk64 at gmail.com
Mon Jun 20 14:14:17 CEST 2016
i := CodePointLength(s); // Should return 26.
writeln('Testing CodePointLength. Result = ', i);
Using UnicodeString + UTF-16
Sizeof(Char) = 2
Testing CodePointLength. Result = 30
Mind you that on my system the Eyes, Wineglass and Heart are
unreadible inside Lazarus IDE (they are presented as an outline of a
Win7 32 bit, fpc 3.0.0 Lazarus trunk.
A tip: put the -dUseUtf16 in a seperate buildmode?
More information about the Lazarus