Как сравнить bookmarks в таблице? |
Previous Top Next |
Code: |
function TBDEDirect.CompareBookmarks(Bookmark1, Bookmark2: TBookmark): Boolean;
var Res: DBIResult; CompareRes: Word;
begin Result := False; if CheckDatabase then begin Res := DbiCompareBookmarks(FDataLink.DataSource.DataSet.Handle, Bookmark1, Bookmark2, CompareRes); if Res = 0 then if CompareRes = 0 then Result := True else else Check(Res); end; end; |
©Drkb::02608