请问如果查找成功怎么代码写入数据表aa呀，并且怎么样写代码把表字段显示在界面上，谢谢了

Question

请问如果查找成功怎么代码写入数据表aa呀，并且怎么样写代码把表字段显示在界面上
procedure  Tfrm_kaoqinji.btn_enterClick(Sender:  TObject);  
var    s:string;  
begin  
 
             s:='select  工号  from  usermsg ';  
               
             if  edt_id.Text  <>''  then  
                             s:=s+ ' where  工号='''+edt_id.Text+'''';  
 
               with  qy_kaoqinji  do  
                   begin 
                   
                   Close  ;  
                   SQL.Clear  ;  
                   SQL.Add(s);  
                   try  
                         Open  ;  
                   except  
                         ExecSQL  ;  
                   end;  
               end;  

Answer 1

查查sql 语句 不知你是生成一个表还是，插入一个表。。
 

Answer 2

qry.fieldbyname('name').asstring := edit1.text;edit1.text := qry.fieldbyname('name').asstringedit1 可以用数据感知组件 DBEDIT

Answer 3

select a,b into table2 form table1 where .....;  //生在表
 insert into table2  select a,b from  table where ....  // 插入一个表
 

Answer 4

用数据感知组件 DBEDIT,怎么就显示表的一部分字段呀