我用了 兩個TADOQuery(q1跟q2)
q1 查詢商品部門資料，

q1->SQL->Text="select * from dept";
q1->Open();

q2：查詢商品資料，這裡的資料我希望由q1指向的dept資料來帶出來

所以我在q1的OnMoveComplete事件中寫了

String depNo=q1->FieldByName("deptNo")->AsString;
q2->SQL->Text="select * from item where deptNo='"dept_No "'";
q2->Open();

然後卻發生了錯誤，我不能理解這個錯誤的原因，還請各位指導。

編輯記錄

請問有練習程式可以參考嗎？

應更正如下:
q2->SQL->Text = "select * from item where deptNo = '" depNo "'";

ColumnName = 'Strins Value' 寫法, 須每次變更 q2->SQL->Text, 效率較不理想.

改為:
q2->SQL->Text = "select * from item where deptNo = :depNo";

且於 q1->AfterScroll() 時執行:
// 可先判斷是否 q1 真的已換到新錄, 因已在 1st Record 再 Up 仍會觸發 AfterScroll(),
// 且很多其他動作也會觸發 AfterScroll().
q2->Close();
q2->ParamByName("depNo")->AsString = q1->FieldByName("deptNo")->AsString;
q2->Open();

如此 TQuery 可以省去每次重新解譯 SQL 指令的時間.

編輯記錄

在主表的afterScroll事件中寫了這樣的程式碼
String customer_no=queryCustomer->FieldByName("customer_no")->AsString;
queryPurchMain->Close();
queryPurchMain->SQL->Text="select * from purchmain where customer_no=:p1";
queryPurchMain->Parameters->ParamByName("p1")->Value=customer_no;
queryPurchMain->Open();

又發生令人費解的錯誤。

編輯記錄

請參考這篇 adoquery1: parameter 'A' not found ，使用 hagar 版主的

ADOQuery.Parameters.ParseSQL(ADOQuery.SQL.Text, True)

===================引 用 littlecheng 文 章===================
在主表的afterScroll事件中寫了這樣的程式碼
String customer_no=queryCustomer->FieldByName("customer_no")->AsString;
queryPurchMain->Close();
queryPurchMain->SQL->Text="select * from purchmain where customer_no=:p1";
queryPurchMain->Parameters->ParamByName("p1")->Value=customer_no;
queryPurchMain->Open();

又發生令人費解的錯誤。

------
價值的展現，來自於你用哪一個角度來看待它!!