mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 19:29:24 +02:00
* dataset.Bookmark changed to TBookMark.
git-svn-id: trunk@20424 -
This commit is contained in:
parent
2e0a5facd2
commit
c60282cd2c
@ -1593,7 +1593,7 @@ Procedure TDataset.DoInsertAppend(DoAppend : Boolean);
|
||||
|
||||
procedure DoInsert(DoAppend : Boolean);
|
||||
|
||||
Var BookBeforeInsert : TBookmarkStr;
|
||||
Var BookBeforeInsert : TBookmark;
|
||||
TempBuf : pointer;
|
||||
|
||||
begin
|
||||
|
@ -1613,7 +1613,7 @@ type
|
||||
function UpdateStatus: TUpdateStatus; virtual;
|
||||
property BlockReadSize: Integer read FBlockReadSize write SetBlockReadSize;
|
||||
property BOF: Boolean read FBOF;
|
||||
property Bookmark: TBookmarkStr read GetBookmarkStr write SetBookmarkStr;
|
||||
property Bookmark: TBookmark read GetBookmark write GotoBookmark;
|
||||
property CanModify: Boolean read GetCanModify;
|
||||
property DataSource: TDataSource read GetDataSource;
|
||||
property DefaultFields: Boolean read FDefaultFields;
|
||||
|
@ -702,7 +702,7 @@ Function TCustomDatasetExporter.Execute : Integer;
|
||||
|
||||
Var
|
||||
B : Boolean;
|
||||
BM : TBookMarkStr;
|
||||
BM : TBookMark;
|
||||
|
||||
begin
|
||||
Result:=0;
|
||||
|
Loading…
Reference in New Issue
Block a user