Commit 2edd9ea8 authored by Martin Schreiber's avatar Martin Schreiber

* Win32 utf16, not finished.

parent 3b7c060d
......@@ -7,7 +7,7 @@ Copyright (c) 1999-2015 by Martin Schreiber
- Tested on i386-linux SuSE 13.1, x86_64-linux SuSE 13.1, x86_64-freebsd,
Raspberry Pi, i386-win32 2000, XP and Vista.
- Links to xlib and gdi32, no external widget library needed.
- Internal character encoding is UCS2.
- Internal character encoding is utf-16.
- Uses anti aliased fonts on Linux (Xft).
- All screen drawing is double buffered.
- Has docking forms and MDI.
......
......@@ -3013,6 +3013,9 @@ begin
inc(po2);
end;
end;
if gcpresults.nglyphs < count then begin
//has surrogate pairs, //todo: insert dummy 0's for low pair part
end;
end
else begin
po1:= text;
......
......@@ -1077,7 +1077,6 @@ procedure tinplaceedit.deleteback;
var
bo1: boolean;
ch1: msechar;
i1: int32;
begin
if fcurindex > 0 then begin
ch1:= finfo.text.text[fcurindex];
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment