<< Click to Display Table of Contents >> Navigation:  »No topics above this level« Delphi Examples: DbiCloneCursor

Return a new cursor positioned at the first record.

This example uses the following input:

 fDbiCloneCursor(Table1.Handle, MyNewCursor);

 

The procedure is defined as:

procedure fDbiCloneCursor(hTmpCur: hDBICur; var hNewCur: hDBICur);

begin

 Check(DbiCloneCursor(hTmpCur, False, False, hNewCur));

 Check(DbiSetToBegin(hNewCur));

 Check(DbiGetNextRecord(hNewCur, dbiNOLOCK, nil, nil));

end;