Привет всем!   

Раньше помню как-то я делал восстановление всех удаленных записей в dbase-таблице (если БД не упаковывалась), а теперь забыл.

Много исходников пересмотрел и тут поискал, но все это не то.

Помогите, пожалуйста!  

Это сообщение отредактировал(а) Olegan - 22.11.2007, 10:27

Вроде это была какая-то функция BDE, в упор не помню!

Помогите, плиzzzz    

DbiUndeleteRecord: Undeletes a dBASE record that has been marked for deletion (a "soft" delete)

Undeletes a dBASE record if it is supported.
This example uses the following input:

  fDbiUndeleteRecord(AnimalTbl);

The procedure is:

procedure fDbiUndeleteRecord(dBASETbl: TTable);
var
  CProps: CurProps;
begin
  Check(DbiGetCursorProps(dBASETbl.Handle, CProps));
  // Raise an EDBEngineError exception if the table is not dBASE
  if (StrIComp(CProps.szTableType, szDBASE) <> 0) then
    raise EDBEngineError.Create(DBIERR_NOTSUPPORTED);
  // Raise an EDatabaseError exception if the cursor does not have soft deletes on
  if (CProps.bDeletedOn = False) then
    raise EDatabaseError.Create('Soft deletes is not on');
  Check(DbiUndeleteRecord(dBASETbl.Handle));
end;

Да она, mutex,