Скачать: CL | DM;

Как программно удалить master-пароль Paradox-таблицы ?   Найти похожие ветки 

← →
_Вован   (2006-02-09 12:10) [0]

Актуальный пароль известен.

---

← →
_Вован   (2006-02-10 16:49) [1]

Уже сам нашёл :) Если кому интересно, вот:

var
 db: TDatabase;
 Desc: CRTblDesc;
begin
 db := Table1.OpenDatabase;
 FillChar(Desc, SizeOf(Desc), #0);
 StrCopy(Desc.szTblName, PChar(Table1.TableName));
 StrCopy(Desc.szTblType, szParadox);
 StrCopy(Desc.szPassword, "");
 Desc.bProtected := TRUE;
 Check(DbiDoRestructure(db.Handle, 1, @Desc, nil, nil, nil, FALSE));
end;

---

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

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.025 c