Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.07;
Скачать: CL | DM;

Вниз

Востановление ранее удаленных записей   Найти похожие ветки 

 
sterran ©   (2003-03-20 10:19) [0]

Здравствуйте Мастаки. Нашел в Helpe следующий пример по востановлению помеченных на удаления записей, пытаюсь применить к своей базе выдает ошибку "Soft deletes is not on", почему не знаю, чисто теоретически все должно работать в базах нет ничего осебенного.

procedure fDbiUndeleteRecord(dBASETbl: TTable);
var
CProps: CurProps;
begin
Check(DbiGetCursorProps(dBASETbl.Handle, CProps));
if (StrIComp(CProps.szTableType, szDBASE) <> 0) then
raise EDBEngineError.Create(DBIERR_NOTSUPPORTED);
if (CProps.bDeletedOn = False) then
raise EDatabaseError.Create("Soft deletes is not on");
Check(DbiUndeleteRecord(dBASETbl.Handle));
end;


 
Mike Kouzmine   (2003-03-20 11:32) [1]

Может быть надо установить bDeletedOn в True?


 
sterran ©   (2003-03-20 11:38) [2]

bDeletedOn - BOOL - This value is set to TRUE if the curSOFTDELETEON property is TRUE. This field makes sense only if the cursor supports the soft delete concept. If TRUE, deleted records can be seen while using this cursor (dBASE and FoxPro only).

т.е. если ключ стоит True то удаление разрешено, в противном запрещено, поэтому представленный мною код правильный.


 
Anatoly Podgoretsky ©   (2003-03-20 12:41) [3]

if not CProps.bDeletedOn then



Страницы: 1 вся ветка

Текущий архив: 2003.04.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
14-19840
StarCon
2003-03-19 11:10
2003.04.07
Wise Install Master


1-19673
Dimonich
2003-03-24 15:04
2003.04.07
Авторан


1-19536
vlad40
2003-03-25 09:04
2003.04.07
Memo без ограничения размера


1-19526
Rafik
2003-03-25 14:10
2003.04.07
Распечатка в отчте


8-19700
BirdNickOff
2003-01-04 00:58
2003.04.07
Как в Delphi переделать рисунок из 24 бит в 8 бит?