ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/nongui/IBCustomDataSet.pas
(Generate patch)

Comparing ibx/trunk/runtime/nongui/IBCustomDataSet.pas (file contents):
Revision 216 by tony, Thu Mar 15 17:21:13 2018 UTC vs.
Revision 217 by tony, Fri Mar 16 10:27:26 2018 UTC

# Line 1437 | Line 1437 | begin
1437    if FDelayTimerValue = AValue then Exit;
1438    FDelayTimerValue := AValue;
1439    {$IF FPC_FULLVERSION >= 30002}
1440 +  if (AValue > 0) and not IsMultiThread then
1441 +    IBError(ibxMultiThreadRequired,['TIBQuery/TIBDataset MasterDetailDelay']);
1442    FTimer.Interval := FDelayTimerValue;
1443    {$IFEND}
1444   end;
# Line 1461 | Line 1463 | begin
1463      if FDelayTimerValue > 0 then
1464      with FTimer do
1465      begin
1466 +      CheckSynchronize; {Ensure not waiting on Synchronize}
1467        if Enabled then
1468        begin
1469          StopTimer;
# Line 5095 | Line 5098 | end;
5098   function TIBDataSetUpdateObject.GetRowsAffected(
5099    var SelectCount, InsertCount, UpdateCount, DeleteCount: integer): boolean;
5100   begin
5101 +  Result := true;
5102    SelectCount := 0;
5103    InsertCount := 0;
5104    UpdateCount := 0;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines