好象是delphi自己的问题,暂时没有发现好的解决方法
解决方案 »
- 别了,2009,兄弟们明年再见!祝新年快乐!
- 突然发现升星了,放分祝贺
- 一个关于SERVERS控件操作WORD的问题
- oracle相间数据库,有两个表a,b 如何删除a中数据,条件是a.id=b.id and a.date<=to_date('20001231','yyyymmdd')
- 请问如何在初始化的时候重数据库中读取这个图片,给我代码?如果可以我马上结贴!
- 在多層結構中數據為何保存或刪除出錯?謝了!
- ****入门提出的问题****,请各位高手指教!
- stringgridex是for D6的还是for D5的?dsgnintf.dcu怎么解决的啊?你们是怎么装的?
- 请教各位大侠了
- delphi5安装问题
- 在DELPHI5下能用的第三方控件为何到了DELPHI6下就不能用了呢?
- 一个我感到难的问题?急!!急!!急!!急!!
var
i,j,k:integer;
somelist:TStringList;
begin
for i := 1 to (length(tmpstr) div tmpInt+1) do
//如果最后为汉字后半部分,那么i*tmpInt,否则i*tmpInt-1,以避免半个字符的出现
begin
k := 0;
for j := 1 to i*tmpInt do
if j <= length(tmpstr) then
if ord(tmpstr[j]) > 126 then k := k+1;
if (k mod 2 = 0)
then insert(#13#10,tmpstr,i*tmpInt-1)
else insert(#13#10,tmpstr,i*tmpInt);
end;
somelist:=TStringList.Create;
//somelist.Clear;
somelist.Add(tmpstr);
result:=somelist;
end;
该如何调用他呢???
memo,但是这时候就会出现乱码!!
我用Delphi+Windows 2000没有上述问题
在RichEdit 和著名的wmEdit 中也有这个问题,首先在Edit中填写一些中文字符,随便运行一个什么程序,
让程序的界面覆盖Edit,然后移开它,你会发现Edit中的
字符变成乱码了。