我现在有两个窗口,一个是主窗口,一个是查询窗口,主窗口上有新增,修改,查询等按钮.我现在要修改记录,但是我只知道记录的流水号(主键),所以就要通过查询按钮来查找符合条件的记录,并把查询的值赋给主窗口中的相应字段,(假设主窗口中有这几个edit2,edit3,edit4,combobox1,combobox2控件,数据库中对应的字段为m1,m2,m3,me4,me5)请问各位高手这个代码应该怎么写?
  if edit1.Text=''then
    showmessage('请输入查询条件!')
    else
    begin
    adoquery1.Close;
    adoquery1.sql.Clear;
    adoquery1.sql.add('select * from cg where m1='''+edit1.text+'''');
    adoquery1.Open;
    end;
我只会写这么一点,后面的就不会写了

解决方案 »

  1.   

    if edit1.Text=''then
        showmessage('请输入查询条件!')
        else
        begin
        adoquery1.Close;
        adoquery1.sql.Clear;
        adoquery1.sql.add('select * from cg where m1='''+edit1.text+'''');
        adoquery1.Open;
        Edit1.Text:=adoquery1.FieldByName('m1').AsString;
    ....
        end;
      

  2.   

    edit2,edit3,edit4,combobox1,combobox2是在主窗口中,但是代码是写在查询窗口中的,按楼上的写法,编译时会提示edit2,edit3,edit4,combobox1,combobox2等标识符末定义
      

  3.   

    if edit1.Text=''then
        showmessage('请输入查询条件!')
        else
        begin
        adoquery1.Close;
        adoquery1.sql.Clear;
        adoquery1.sql.add('select * from cg where m1='''+edit1.text+'''');
        adoquery1.Open;
       主窗口名字.Edit1.Text:=adoquery1.FieldByName('m1').AsString;
    ....
        end;