Zeoslib Portal

:!: In REV 800 BM is totally undefined :!: This code sniplet compiles on Delphi 7 and 2010: { BUG-FIX: bangfauzan addition } if (SortedFields <> '') and not(doDontSortOnPost in Options) then begin {$IFDEF DELPHI12_UP} If BookmarkValid(Bookmark) Then {$ELSE} If BookmarkValid(PPointer(Bookmark)) Then ...

I test the changes in Delphi 2010. The first resync([]) sets the Bookmark to undefined values. :shock: So I moved the check for a valid Bookmark to an earlier Position: { BUG-FIX: bangfauzan addition } if (SortedFields <> '') and not(doDontSortOnPost in Options) then begin If BookmarkValid(Bookmark)...

I test the changes in Delphi 2010. The first resync([]) sets the Bookmark to undefined values. :shock: So I moved the check for a valid Bookmark to an earlier Position: { BUG-FIX: bangfauzan addition } if (SortedFields <> '') and not(doDontSortOnPost in Options) then begin If BookmarkValid(Bookmark)...

For checkin the complete code: {BUG-FIX: bangfauzan addition} if (SortedFields <> '') and not (doDontSortOnPost in Options) then begin FreeFieldBuffers; SetState(dsBrowse); Resync([]); BM:=Bookmark; DisableControls; InternalSort; //BookMark:=BM; Try If BookmarkValid(@BM) Then Begin InternalGotoBookm...

I don't work with bookmarks. My changes avoid external events (OnBeforeScroll, OnAfterScroll), but the internal action is the same. The bangfauzan bugfix is only meaningful if a valid bookmark exists. My large application did not work with this bugfix. With my changes up to now no errors occurred. G...

The BUG-FIX by bangfauzan sets unused bookmarks. This causes the events BeforeScroll and AfterScroll. In fact the dataset is the same as before. The events BeforeScroll and AfterScroll produce many problems in my application. Is this BUG-FIX a bug? :x Is this better? Replace - BookMark:=BM; with - I...