发现delphi的一个bug!!(0分)

  • 主题发起人 主题发起人 lsxjj
  • 开始时间 开始时间
L

lsxjj

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
seltextbuf:pchar;
begin
GetMem(seltextbuf,RichEdit1.SelLength);
RichEdit1.GetSelTextBuf(seltextbuf,RichEdit1.SelLength);
form1.caption:=string(seltextbuf);
end;
你在编辑框中写:sssssssssssssssssssss(随便多少个,要多一点)
单你选中8个s:(就是ssssss)的时候会出错
而选中任意其他数目的s的时候却可以正常运行!!
各位说这是不是一个bug?

 
delphi 6中没有发现!
你用的是那个版本?
 
真的吗?
gz一下
 
掉,bug多啦,我就不信这么大型的软件没有.
比较不喜欢的是挂上了组件开发,拿到别的地方没有安装这个组件的环境,程序无法打开.
还有,数据库连接上,换个地方,目录不同了,打开项目,报告出错,然后退出.掉.
 
UP:
一般不要在编辑状态下连上数据库 ^_^
 
我用的是5.0
你们试了是不是这样?
是RichEdit1.GetSelTextBuf()这个函数有问题
我用
caption:=copy(richedit1.Text,richedit1.SelStart+1,richedit1.sellength);
现在来达到了目的。不敢用那个函数了:(
 
后退
顶部