paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-28 00:01:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Make find* methods virtual (bug ID 23422)

Browse Source 
git-svn-id: trunk@23106 -
This commit is contained in:
michael 2012-12-03 08:57:50 +00:00
parent 35e6b1a3aa
commit 2642345c1b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
packages/fcl-db/src/base/db.pas
View File

@ -1588,10 +1588,10 @@ type
procedure EnableControls;
function FieldByName(const FieldName: string): TField;
function FindField(const FieldName: string): TField;
function FindFirst: Boolean;
function FindLast: Boolean;
function FindNext: Boolean;
function FindPrior: Boolean;
function FindFirst: Boolean; virtual;
function FindLast: Boolean; virtual;
function FindNext: Boolean; virtual;
function FindPrior: Boolean; virtual;
procedure First;
procedure FreeBookmark(ABookmark: TBookmark); virtual;
function GetBookmark: TBookmark; virtual;