W
wind98
Unregistered / Unconfirmed
GUEST, unregistred user!
大家都用过Word吧，里面有个"字符"菜单，进入后会看到很多的字符，包括汉字！
如何在程序中动态显示这些字符和汉字呢？（保存为字符串String或TStrings中都行）
如何在程序中动态显示这些字符和汉字呢？（保存为字符串String或TStrings中都行）
C
cx139
Unregistered / Unconfirmed
GUEST, unregistred user!
你写个资源文件
实在不行，声明为一个常量也行
实在不行，声明为一个常量也行
M
mxt
Unregistered / Unconfirmed
GUEST, unregistred user!
这个嘛，用它它们的内码不就行了吗？
按内码将Word型数据->成16位字符就行了。
按内码将Word型数据->成16位字符就行了。
W
wonsfon
Unregistered / Unconfirmed
GUEST, unregistred user!
那些字符都是按内码排序的
你找到第一个字符的内码，后面的逐个加一就可以了
你找到第一个字符的内码，后面的逐个加一就可以了
W
wind98
Unregistered / Unconfirmed
GUEST, unregistred user!
大家不要光说不练嘛，写两三句代码没那么困难吧！
W
wind98
Unregistered / Unconfirmed
GUEST, unregistred user!
to cx139:
你的方法不能叫动态生成的！如果我想将这些字符放在程序里就不会在这里提问题了！
那么多的字符加上几千个汉字加到程序中去会增加不少字节数呢！
你的方法不能叫动态生成的！如果我想将这些字符放在程序里就不会在这里提问题了！
那么多的字符加上几千个汉字加到程序中去会增加不少字节数呢！
D
darkiss
Unregistered / Unconfirmed
GUEST, unregistred user!
我想这个问题不难：）
var astrlist :TStringList ;
i,j :Integer ;
begin
astrlist := TStringList.Create;
i := 0 ;
while i < 256 do
begin
if i < 169 then
astrlist.Add(chr(i))
else begin
j := 168 ;
while j < 255 do
begin
astrlist.add(chr(i)+chr(j)) ;
inc(j) ;
end ;
end ;
inc(i) ;
end ;
end ;
var astrlist :TStringList ;
i,j :Integer ;
begin
astrlist := TStringList.Create;
i := 0 ;
while i < 256 do
begin
if i < 169 then
astrlist.Add(chr(i))
else begin
j := 168 ;
while j < 255 do
begin
astrlist.add(chr(i)+chr(j)) ;
inc(j) ;
end ;
end ;
inc(i) ;
end ;
end ;
W
wind98
Unregistered / Unconfirmed
GUEST, unregistred user!
万分感谢darkiss！：）
测试结果可行，但发现有些字符不在此范围内，如下：
◎¤☉⊙Ο●〇★☆■□▓◆◇▲△▼▽▂▃▅▆▇█◣◥◢◤〓』「」【】〖〗·
※∴∷¨…〃＊ΞΘ㊣卐♀♂×÷°℃￥￡‰§ξζω∮βεθγχΨλψπμτㄓ
∑∏∩∪∈Ω∞≌≈∽∝≮≯∠∧∨№∶㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩①②③④⑤⑥⑦⑧⑨⑩
⑴⑵⑶⑷⑸⑹⑺⑻⑼⑽ぇえこぬのめェエィイㄔォオヵカチトニハパミネ々ㄚㄦㄨ
↑↓→←↖↗↘↙⌒√ ╳╭╮╰╯≡╬╱╲∥⊥︵︶︹︺︿﹀︽︾﹃﹄‖
请问这些字符在什么范围内？
测试结果可行，但发现有些字符不在此范围内，如下：
◎¤☉⊙Ο●〇★☆■□▓◆◇▲△▼▽▂▃▅▆▇█◣◥◢◤〓』「」【】〖〗·
※∴∷¨…〃＊ΞΘ㊣卐♀♂×÷°℃￥￡‰§ξζω∮βεθγχΨλψπμτㄓ
∑∏∩∪∈Ω∞≌≈∽∝≮≯∠∧∨№∶㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩①②③④⑤⑥⑦⑧⑨⑩
⑴⑵⑶⑷⑸⑹⑺⑻⑼⑽ぇえこぬのめェエィイㄔォオヵカチトニハパミネ々ㄚㄦㄨ
↑↓→←↖↗↘↙⌒√ ╳╭╮╰╯≡╬╱╲∥⊥︵︶︹︺︿﹀︽︾﹃﹄‖
请问这些字符在什么范围内？
D
darkiss
Unregistered / Unconfirmed
GUEST, unregistred user!
这个。。。。我也不知道了。。。
W
wind98
Unregistered / Unconfirmed
GUEST, unregistred user!
还是十分感谢darkiss,这一百分就全给你吧！：）
（另外请大家以后回答问题不要指点江山式，实干家大家都喜欢）
（另外请大家以后回答问题不要指点江山式，实干家大家都喜欢）
