procedure TForm1.Button1Click(Sender: TObject);
var
sSQL : String;
Transaction: TDBXTransaction;
begin
Transaction := SQLConnection1.BeginTransaction(TDBXIsolations.ReadCommitted);
try
try
sSQL := 'SELECT id FROM MyTest';
dsQry.Close;
dsQry.CommandText := sSQL;
dsQry.ExecSQL;
if (dsQry.RecordCount > 0) then //只要使用 BeginTransaction 此行就會錯誤 (Commands out of Sync;)
begin
exit;
end;


SQLConnection1.CommitFreeAndNil(Transaction);
except
SQLConnection1.RollbackFreeAndNil(Transaction);
end;
finally
SQLConnection1.RollbackIncompleteFreeAndNil(Transaction);
end;
end;

dsQry.ExecSQL

因為你的 sql 是 select 所以改成 dsQry.Open; 試看看

試過了,就算用 TSQLQuery 來SELECT 只要有BeginTransaction 就不行

===================引 用 tuga 文 章===================
dsQry.ExecSQL

因為你的 sql 是 select 所以改成 dsQry.Open; 試看看

1.請善用ktop的程式碼區塊功能
2.DBX的「RecordCount 」功能限制較多，建議你可用SQL中的「COUNT(*)」或是將結果導到ClientDataSet中再使用「RecordCount」函式來取代。

以上

你的 dsQry  是 TSQLUQERY 嗎?

如果是的話 TSQLUQERY 是一個 順向的 query , 用 record count 會有問

改用 SimpleDataSet 試看看 或是用 上面大哥 講的, 用 client data set

或是直接用 select count(*) from mytest

問題不在 RecordCount 或 COUNT(*),因為就算我直接去抓欄位資料也不行,ClientDataSet 與 SimpleDataSet我也都試過了只要有使用BeginTransaction 就會錯誤.


===================引 用 GrandRURU 文 章===================
1.請善用ktop的程式碼區塊功能
2.DBX的「RecordCount 」功能限制較多，建議你可用SQL中的「COUNT(*)」或是將結果導到ClientDataSet中再使用「RecordCount」函式來取代。

以上