diff --git a/packages/fcl-db/tests/testdbbasics.pas b/packages/fcl-db/tests/testdbbasics.pas index 34a851d87e..9700fdb892 100644 --- a/packages/fcl-db/tests/testdbbasics.pas +++ b/packages/fcl-db/tests/testdbbasics.pas @@ -324,7 +324,7 @@ begin AssertEquals('deDataSetChange:0;',DataEvents); DataEvents := ''; next; - AssertEquals('deCheckBrowseMode:0;DataEvent;deDataSetScroll:0;',DataEvents); + AssertEquals('deCheckBrowseMode:0;DataEvent;deDataSetScroll:0;DataSetScrolled:1;',DataEvents); close; end; aDatasource.Free;