小问题，在线等(D7 dbexpress)

Question

Edit1.Text中是输入的管理员帐号，要在Edit2.Text中显示管理员姓名ManagerName
程序中【        】内该如何写？
var
  serchtrue:boolean;
beginwith DataModule2.ClientDataSet1 do
   serchtrue:=locate('ManagerID',Edit1.Text,[]);
   if serchtrue then
      【Edit2.Text:=       】
      else ShowMessage('Fail!');
   end;

Answer 1

你可以在EDIT1 的CHANGE 时间中就得到管理员的姓名不就可以了
然后就直接把这个变量的值给EDIT2不就可以了吗？

Answer 2

with DataModule2.ClientDataSet1 do
   serchtrue:=locate('ManagerID',Edit1.Text,[]);
   if serchtrue then
      Edit2.Text:= 【FieldByName('ManagerName').asstring】
      else ShowMessage('Fail!');
   end;

Answer 3

with DataModule2.ClientDataSet1 do
   serchtrue:=locate('ManagerID',Edit1.Text,[]);
   if serchtrue then
      Edit2.Text:= FieldByName('ManagerName').asstring;
      else ShowMessage('Fail!');
   end;