【结】[求助] 代码不执行，是低级错误吗？**

拓思科技

procedure TRYXXBD.DataEditPIDChange(Sender: TObject);
var
   lPerson  : TPerson;
   stri :string;
begin
     lPerson :=  TPerson.Create;
     stri := DataEditPID.Text; //a
     try
         if stri.Length > 0 then  //b
         begin
              lPerson :=  Org.OrgSys.OrgSystem.GetPerson(DataEditPID.Text);
              DataEditperCNNAME.Text := lPerson.DisplayName;
         end;
     finally
         lPerson.Free;
     end;
end;

这是写在表单里的代码，为什么a，b两行代码，被跳过去了，没有执行？我delphi不是很熟。

Akon

是不是没编译?编译一下试试

拓思科技

确实是没编译，不是自动编译吗，我感觉有的时候不编译也正常啊

jiahaiming

功能调试运行时会自动编译，但是信息和文档不一定。

拓思科技

明白了 谢谢 结贴吧