Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uUtils.pas
changeset 14057 1a85afba813d
parent 13980 3183c4dc6e53
child 14072 e54f9a85ccba
equal deleted inserted replaced
14056:7b78c87d80a1 14057:1a85afba813d 
   565        ((#$3200  <= u) and (u <= #$4DBF))  or // Enclosed CJK Letters and Months / CJK Compatibility / CJK Unified Ideographs Extension A / Circled Katakana
 
   565        ((#$3200  <= u) and (u <= #$4DBF))  or // Enclosed CJK Letters and Months / CJK Compatibility / CJK Unified Ideographs Extension A / Circled Katakana
 
   566        ((#$4E00  <= u) and (u <= #$9FFF))  or // CJK Unified Ideographs
 
   566        ((#$4E00  <= u) and (u <= #$9FFF))  or // CJK Unified Ideographs
 
   567        ((#$AC00  <= u) and (u <= #$D7AF))  or // Hangul Syllables
 
   567        ((#$AC00  <= u) and (u <= #$D7AF))  or // Hangul Syllables
 
   568        ((#$F900  <= u) and (u <= #$FAFF))  or // CJK Compatibility Ideographs
 
   568        ((#$F900  <= u) and (u <= #$FAFF))  or // CJK Compatibility Ideographs
 
   569        ((#$FE30  <= u) and (u <= #$FE4F))  or // CJK Compatibility Forms
 
   569        ((#$FE30  <= u) and (u <= #$FE4F))  or // CJK Compatibility Forms
 
   570        ((#$FF66  <= u) and (u <= #$FF9D)))    // halfwidth katakana
 
   570        ((#$FF00  <= u) and (u <= #$FFEF)))    // half- and fullwidth characters
 
   571        then
 
   571        then
 
   572         begin
 
   572         begin
 
   573             CheckCJKFont:=  THWFont( ord(font) + ((ord(High(THWFont))+1) div 2) );
 
   573             CheckCJKFont:=  THWFont( ord(font) + ((ord(High(THWFont))+1) div 2) );
 
   574             exit;
 
   574             exit;
 
   575         end;
 
   575         end;
hedgewars