| # | Line 2714 | Line 2714 | end; | |
|---|---|---|
| 2714 | ||
| 2715 | procedure TIBCustomDataSet.SetDatabase(Value: TIBDatabase); | |
| 2716 | begin | |
| 2717 | < | if (FBase.Database <> Value) then |
| 2717 | > | if (csLoading in ComponentState) or (FBase.Database <> Value) then |
| 2718 | begin | |
| 2719 | CheckDatasetClosed; | |
| 2720 | InternalUnPrepare; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |