如何在EDIT1中 输入字段后，在Edit2，Edit3，Edit4中显示对应Edit1字段的其他字段的记录信息？

如果表中有字段(A,B,C,D),在Edit1中输入A后,  
  在Edit2,Edit3,Edit4中显示与A对应的相应字段B,C，D信息.  
  该如何实现？ 问题点数：20、回复次数：4Top

1 楼newfang（传说中的MIC）回复于 2006-05-03 16:15:24 得分 16

with   adODataSet1   do  
  begin  
      Close;  
      CommandText   :=   'select   *   from   table   where   A   =   '''   +   Trim(Edit1.text)   +   '''';  
      Open;  
      Edit2.text   :=   FieldByName('B').asstring;  
      Edit3.text   :=   FieldByName('C').asstring;  
  end;Top

2 楼newfang（传说中的MIC）回复于 2006-05-03 16:17:19 得分 0

顺便说一下,这样写有点隐患,如果在EDIT1里输入字符内包含'就会出问题,所以最好用上  
  QuotedStr函数Top

3 楼huanying3990（）回复于 2006-05-04 11:35:31 得分 4

这么简单，不要做复杂了，你就用DBEdit不就可以了，不要用EDIT,DBedit与数据库容易连接！Top

4 楼laton（）回复于 2006-09-15 16:25:22 得分 0

@@@@@@@@@@@@@@@@@@@@@@@@@@  
    TO:newfang(方方)   (   )    
         
  with   adODataSet1   do  
  begin  
      Close;  
      CommandText   :=   'select   *   from   table   where   A   =   '''   +   Trim(Edit1.text)   +   '''';  
      Open;  
      Edit2.text   :=   FieldByName('B').asstring;  
      Edit3.text   :=   FieldByName('C').asstring;  
  end;  
   
       
  如果我想在输入Edit1或Edit2或Edit3的时候，同步显示数据于其他的Edit框呢？而不知单单是在edit1内输入数据。  
   
     
  Top

相关问题

• 帖主：lhl123hk
• newfang
• huanying3990

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载