Master-Detail的一個小問題 |
尚未結案
|
lincw_darharnq
一般會員 發表:18 回覆:12 積分:6 註冊:2003-08-06 發送簡訊給我 |
各位大大:
小弟剛用Delphi不久,因此問的問題可能有點淺,請各位不吝指教。 小弟寫了一個Master-Detail的程式(Form1),另外在寫了一個維護Detail的程式(Form2)。若在FORM1不關的前提下,又開FORM2,並在FORM2下去做增刪修Detail部分的動作,則Form1的下的Detail不會同步Update。 請問"Master(DBGrid1)-Detail(DBGrid2)的Form1"中的"Detail(DBGrid2)"要怎麼寫,才會每當我做異動的同時,就跟著Update??? 附一段小弟FORM2的程式
procedure TForm2.Button1Click(Sender: TObject);//按Form2.Button1來新增
begin Edit1.Text:=DateToStr(now());
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into AV_Order_P_Reference');
ADOQuery1.SQL.Add('(訂單單別,訂單單號,訂單序號,流水號,Reference)');
ADOQuery1.SQL.Add('values(''' DBEdit1.Text ''' , ');
ADOQuery1.SQL.Add('''' DBEdit2.Text ''',');
ADOQuery1.SQL.Add('''' DBEdit3.Text ''',');
ADOQuery1.SQL.Add('''' edit1.Text ''',');
ADOQuery1.SQL.Add('''' edit2.Text ''' )');
ADOQuery1.ExecSQL; //新增的SQL ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from AV_Order_P_Reference where 訂單單別=''' DBEdit1.Text '''') ;
ADOQuery1.SQL.Add('and 訂單單號 =''' DBEdit2.Text '''and 訂單序號 =''' DBEdit3.Text '''');
ADOQuery1.SQL.Add('and 流水號=''' edit1.Text '''and Reference =''' edit2.Text '''');
ADOQuery1.Open; //重新show出insert的結果..... FORM1.ADOQuery1.Close; //我想要讓Form1也同步異動
FORM1.ADOQuery1.SQL.Clear;
FORM1.Edit1.Clear;
FORM1.Edit2.Clear;
FORM1.Edit3.Clear;
FORM1.Edit4.Clear;
FORM1.Edit5.Clear;
FORM1.Edit6.Clear;
FORM1.Edit7.Clear;
FORM1.Edit8.Clear;
FORM1.Edit9.Clear;
FORM1.Edit10.Clear;
FORM1.ADOQuery1.SQL.Add('select * from AV_Order_P order by 預交日');
FORM1.ADOQuery1.ExecSQL;
FORM1.ADOQuery1.Open;
FORM1.DBGrid2.Update; //FORM1.DBGrid2(Detail)的部分不知如何寫才會同步異動更新......
FORM1.DBGrid2.UpdateControlState;
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |