Master Detail 問題 |
尚未結案
|
SuperLowB
初階會員 ![]() ![]() 發表:96 回覆:77 積分:34 註冊:2003-06-11 發送簡訊給我 |
我用Delphi 5 ADO 我用兩個TADOTable分連住兩Table(Master & Detail)(圖一)
Tform 上有兩個button,一個是Button1,另一個是Button2,
當我按下button1時(原想把Detail的Status='C'的filter走),但卻出現以下Errror message(圖二),請問應如何解決?
unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids, Wwdbigrd, Wwdbgrid, Db, Wwdatsrc, ADODB; type TForm1 = class(TForm) ADOConnection1: TADOConnection; tbMaster: TADOTable; tbDetail: TADOTable; wwDataSource1: TwwDataSource; wwDataSource2: TwwDataSource; wwDBGrid1: TwwDBGrid; wwDBGrid2: TwwDBGrid; Button1: TButton; Button2: TButton; Label1: TLabel; Label2: TLabel; procedure FormCreate(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.FormCreate(Sender: TObject); begin tbMaster.close; tbMaster.open; tbDetail.close; tbDetail.open; end; procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin tbMaster.close; tbDetail.close; action:=cafree; end; procedure TForm1.Button1Click(Sender: TObject); begin tbDetail.Filtered:=false; tbDetail.Filter:='Status<>''C'''; tbDetail.Filtered:=true; end; end. |
william
版主 ![]() ![]() ![]() ![]() ![]() 發表:66 回覆:2535 積分:3048 註冊:2002-07-11 發送簡訊給我 |
|
pillar62
資深會員 ![]() ![]() ![]() ![]() ![]() 發表:9 回覆:324 積分:271 註冊:2002-04-15 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |