美
美女1号
Unregistered / Unconfirmed
GUEST, unregistred user!
繁体写的程序,在简体机读出来差很大哦!!!!!!
繁体下:
比如有一文件夾内有两个文件显示在listview中:
浮生六劫.wpl
快乐长门人.wpl
我把它们已utf8的編碼写进来某個文件中(如下),
Assignfile(myfile,'c:/play.wpl');
Rewrite(myfile);
for i:=0 to listview1.Items.Count-1 do
Writeln(myfile,AnsiToUtf8('<media src = "'+ListView1.Items.Item.Caption+'"/>'));
CloseFile(myfile);
这样写完之后,用写字板的打开方式把play.wpl打开汉字是正常显示.
我把程序放在简体的机器下去运行,但是play.wpl里面的汉字已经是乱码了.
繁体下:
比如有一文件夾内有两个文件显示在listview中:
浮生六劫.wpl
快乐长门人.wpl
我把它们已utf8的編碼写进来某個文件中(如下),
Assignfile(myfile,'c:/play.wpl');
Rewrite(myfile);
for i:=0 to listview1.Items.Count-1 do
Writeln(myfile,AnsiToUtf8('<media src = "'+ListView1.Items.Item.Caption+'"/>'));
CloseFile(myfile);
这样写完之后,用写字板的打开方式把play.wpl打开汉字是正常显示.
我把程序放在简体的机器下去运行,但是play.wpl里面的汉字已经是乱码了.