CnPack Forum - Powered by Discuz! Board

Subject: 助手代码有个bug [Print This Page]

Author: niaoge Time: 2009-3-12 15:12 Subject: 助手代码有个bug

function TCnInputHelper.UpdateCurrList(ForcePopup: Boolean): Boolean;
var
  i, Idx: Integer;
  Symbol: string;
begin
  List.Items.BeginUpdate;
  try
Symbol := UpperCase(FMatchStr);
//这个判断是在原有list进行筛选，而不用再重新生成列表，用于加快速度
//但这个条析永远都不会成立
//因为只要 Length(FLastStr) - Length(Symbol) = 1 成立， Pos(UpperCase(FLastStr), Symbol) = 1) 就不成立
if (Length(Symbol) > 1) and (Length(FLastStr) - Length(Symbol) = 1) and
   (Pos(UpperCase(FLastStr), Symbol) = 1) then

//应改为
if (Length(Symbol) > 1) and (Length(FLastStr) - Length(Symbol) = -1) and
   (Pos(UpperCase(FLastStr), Symbol) = 1) then

Author: niaoge Time: 2009-3-13 16:32

我改过了，助手没有问题，貌似速度快了点

Author: zjy Time: 2009-3-15 22:30 Subject: 这几天服务器CVS挂了

所以还没提交上去。多谢 niaoge 细心指出！

Author: niaoge Time: 2009-3-16 02:50

QUOTE:

原帖由 zjy 于 2009-3-15 22:30 发表
所以还没提交上去。多谢 niaoge 细心指出！

Author: zjy Time: 2009-3-16 22:49 Subject: 已经提交了

Author: please_air Time: 2009-3-20 13:19

麻烦编译一个出来

Welcome to CnPack Forum (http://bbs.cnpack.org/)