什么意思?(在线等)

                            
procedure   TFrmList.BtnFindClick(Sender:   TObject);   
  var   i:integer;  
  begin  
  for   i:=0   to   LstBox.Items.Count-1   do  
      if   comparestr(EdItem.Text,LstBox.Items[i])=0   then  
        begin  
          LstBox.ItemIndex:=i;  
          LstBoxClick(Self);  
          Break;  
        end;  
  end;  
  其中的:LstBoxClick(Self);是什么意思呢?如果没有这句话程序顺利通过,但如果加上这句(LstBoxClick(Self);)那么编译出错:[Error]   Unit1.pas(60):   Undeclared   identifier:   'LstBoxClick'  
  是什么问题呢?  
  (该程序是要在EdItem中输入LstBox中的内容,然后按下BtnFind按纽,之后符合的条目在列表框中处于被选中状态)  
  请各位帮看一下……

查看回复