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

Вниз

Программное восстановление MDX файла для DBF   Найти похожие ветки 

 
Антон СПб ПП   (2002-07-23 10:11) [0]

После того, как я восстанавливаю прораммно файл MDX содержащий в себе 3 составных индекса 2 из них уникальные появляется ошибка key vialotion, после подтверждения индексов в DataBase desktop все работает нормально.
Сравнивал структуры индексов полностью индентичны.
Что делает Dbd и что не делаю я, после или при восстановлении индексов.
Спасибо.


 
sniknik ©   (2002-07-23 10:21) [1]

проверь сам dbf файл, 28 байт (считая с нуля) отвечает за "индексированость" таблици (0 нет, 1 индексир.). не знаю как ты делаеш индексы но возможно твои методы не устанавливают этот признак.


 
Антон СПб ПП   (2002-07-23 11:20) [2]

Индекс делаю так:
var
NewIndex: IDXDesc;
Begin
tbl.Open;
NewIndex.szTagName := "DN";
NewIndex.bPrimary := False;
NewIndex.bUnique := TRUE;
NewIndex.bDescending := False;
NewIndex.bMaintained := True;
NewIndex.bSubset := False;
NewIndex.bExpIdx := True;
NewIndex.iFldsInKey := 0;
NewIndex.aiKeyFld[0] := 0;
NewIndex.szKeyExp :="STR(NNAKL)+STR(KOD_OTPR)+DTOC(DATE_ON)";
NewIndex.szKeyCond := "";
NewIndex.bCaseInsensitive := False;
NewIndex.iBlockSize := 0;
Check(DbiAddIndex(Tbl.dbhandle, Tbl.handle, nil,
szDBASE, NewIndex, nil));
А как вы создали такой индекс?



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
3-35162
MsGuns
2002-07-22 11:01
2002.08.12
Функция Ditto в Delphi


3-35161
Alex Shulg
2002-07-22 13:34
2002.08.12
Не работает AutoInc поля


7-35472
ol
2002-05-28 15:30
2002.08.12
контроллер весов


14-35418
esprit_bel
2002-06-06 11:27
2002.08.12
Исходник


3-35197
Explorer
2002-07-23 14:56
2002.08.12
Как связать(Master/Detail) два DBGrida