| # | Line 229 | Line 229 | end; | |
|---|---|---|
| 229 | ||
| 230 | procedure TIBMasterDataLink.DoMasterChange; | |
| 231 | begin | |
| 232 | – | if FDelayTimerValue = 0 then |
| 233 | – | inherited DoMasterChange |
| 232 | {$IF FPC_FULLVERSION >= 30002} | |
| 233 | < | else |
| 233 | > | if FDelayTimerValue > 0 then |
| 234 | with FTimer do | |
| 235 | begin | |
| 236 | CheckSynchronize; {Ensure not waiting on Synchronize} | |
| # | Line 244 | Line 242 | begin | |
| 242 | else | |
| 243 | Enabled := true; | |
| 244 | end | |
| 245 | + | else |
| 246 | {$IFEND} | |
| 247 | + | inherited DoMasterChange |
| 248 | end; | |
| 249 | ||
| 250 | constructor TIBMasterDataLink.Create(ADataSet: TDataSet); | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |