# | Line 973 | Line 973 | const | |
---|---|---|
973 | ||
974 | implementation | |
975 | ||
976 | < | uses Variants, FmtBCD, LazUTF8, FBMessages, IBQuery; |
976 | > | uses Variants, FmtBCD, LazUTF8, IBMessages, IBQuery; |
977 | ||
978 | type | |
979 | ||
# | Line 3025 | Line 3025 | procedure TIBCustomDataSet.SetUniDirecti | |
3025 | begin | |
3026 | CheckDatasetClosed; | |
3027 | FUniDirectional := Value; | |
3028 | + | inherited SetUniDirectional(Value); |
3029 | end; | |
3030 | ||
3031 | procedure TIBCustomDataSet.SetUpdateRecordTypes(Value: TIBUpdateRecordTypes); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |