我是新手,学DELPHI不到一星期,遇上问题不知道如何是好?
我在FORM1上面有个BUTTON,一个EDIT1,一个ADOQUERY,
我想要点击BUTTON,打开一个新的FORM,显示的是DBGrid,内容是一个SELECT出来的列表,比如职工名单,然后想点击其中一条纪录,将关闭这个窗口,返回到主窗口,在EDIT1.text上面显示所选的职工名字。
我要该怎么做,有谁帮我???

解决方案 »

  1.   

    呵呵,你自己应该多看看书的,希望下面代码对你有所帮助。
    uses detailForm;
    Button1_Event:
    procedure TForm1.Button1Clicked(Sender);
    begin 
      if not assigned(NewForm) then NewForm:=TNewForm.Create(self);
      NewForm.DbGrid.dataSet:=Form1.AdoQuery;  
      With AdoQuery do begin
         SQL:='Your sql';
         Open;
       end;
      newForm.ShowModal;
    end;In NewForm:
    uese form1;
    procedure TNewForm.dbgridclicked(Sender);
    begin
      Form1.Edit1.Text:=DbGrid.selecked;
      close;
    end;