浏览代码

* fixed compilation of the video unit on Windows

git-svn-id: branches/unicodekvm@48817 -
nickysn 4 年之前
父节点
当前提交
38ef18b4f4
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/rtl-console/src/win/video.pp

+ 1 - 1
packages/rtl-console/src/win/video.pp

@@ -23,7 +23,7 @@ procedure VideoSetConsoleOutHandle (NewHandle: THandle);
 implementation
 
 uses
-  windows,dos;
+  windows,dos,graphemebreakproperty,eastasianwidth;
 
 {$i video.inc}