正常情况下,SelStart报告的应该是一个中文两个长度的,如edit中文字“中华人民共和国”,光标停在“人”前面时,selstart应该是4,但是现在报告2,不只怎么回事。
我的edit是自己创建的:
myEdit:=TEdit.Create(Self);
myEdit.Parent:=SG1;
myEdit.Ctl3D:=False;
myEdit.ReadOnly:=True;
myEdit.Visible:=False;
myEdit.PopupMenu:=PopupMenu1;
写在formCreat事件里,不只问题在哪里
在线急盼回复
我的edit是自己创建的:
myEdit:=TEdit.Create(Self);
myEdit.Parent:=SG1;
myEdit.Ctl3D:=False;
myEdit.ReadOnly:=True;
myEdit.Visible:=False;
myEdit.PopupMenu:=PopupMenu1;
写在formCreat事件里,不只问题在哪里
在线急盼回复
解决方案 »
- 请教一个生成ttreenodes的问题
- 关于DELPHI中控件dbGrid的一个BUG(DELPHI6和DELPHI7都存在)不知道各位高手有没有解决方法!
- dephi中,黑匣子的问题!
- (急)delphi6怎么链Access2000的数据库?
- 有关treeview控件 找出上一节点的内容,请高手们给解决,本人急。
- 大虾们有没有用NMUDP控件传文件的例子,给我看看啊。谢谢
- ACCESS里对某几个字段不是全部字段插入一条纪录的语句是什么?
- 如何在报表预览时正确设置页面?急!
- msdn给分的方式是否需要改变一下,好象成功率不高。
- 哪里有全中文(最好是像FASTREPORT一样由公司开发并能提供升级服务)报表打印控件下载或出售?
- ado连接释放问题
- 关于Listview控件在大图标显示模式下的图标位置问题
给多点代码来看看
另:我自己新建了一个application,在新的工程里,edit的selStart就不出错,所以我估计是我哪里的因素设错了
if State=[gdFocused,gdSelected] then begin
myEdit.SetBounds(Rect.Left,Rect.Top,Rect.Right-Rect.Left,Rect.Bottom-Rect.Top);
myEdit.Text:=SG1.Cells[ACol,ARow];
myEdit.Visible:=True;
end;
begin
SendMessage(Handle, EM_GETSEL, Longint(@Result), 0);
end;
selStart是通过发送消息取值的
区域设置都是默认的中文
同时我在同样的机器上再建立一个程序(XP系统),就不会出现这种错误
真是见鬼了
XPMan还会影响这个`
谢谢楼主喽。