Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Бази";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

індексація бизи FoxPro Знайти схожі гілки


Серж   (2001-12-05 06:13) [0]

Як програмно проіндексувати бизу даних формату FoxPro нічого не виходить ні через TTable ні через SQL?



panov   (2001-12-05 07:02) [1]

Індексую таблиці.
Якщо у тебе VFP - то можеш не напружуватися.

Якщо просто FOXPRO, то формуєш в TQuery.SQL
INDEX ON <ім'я індексу> ON <ім'я таблиці> (<ім'я поля>)



Серж   (2001-12-06 04:00) [2]

Просто FoxPro, але після виконання того що Ви написали вилазить повідомлення
Invalid use of keyword. Token INDEX

Якщо робити оператором
CREATE INDEX індекс ON база (поле, ...)
вилазить повідомлення
Invalid index descriptor
File or directory does not exist
File: база.CDX
Index does not exist
File база.MDX



Серж   (2001-12-06 04:07) [3]

Необхідно програмно створити УНІКАЛЬНИЙ індекс по декількох полях!



Dick Gonsales   (2001-12-06 07:09) [4]

Це описано в help BDE а не в довідці Delphi, (dbiAddIndex, IDXDesc)
Там написано які параметри треба використовувати (їх там багато,
але реально тобі потрібні штуки 4-5 типу формат бази, унікальність, тег ...)

if TQurey - CREATE INDEX then
Він для dbf створить індекс * .mdx а не * .cdx тому вважає
його dBase а не Fox. Якщо індекс є він його не гримне
а видасть помилку

А взагалі тут є певна лажа. Delphi створює старий cdx індекс,
(Якщо через TTable)
який ледь не в два рази більше ніж рідний fox 2.0 &>. І якщо його
reindex з Delphi він його теж перетворити в старий формат.
Можливо буде краще написати реіндексацію або створення індексу
в fox і запускати окремо це додаток з Delphi?

Ця процедура створює індекс, в uses додати BDE
==========================
procedure fDbiAddIndex4 (Tbl: TTable);

було
NewIndex: IDXDesc;
починати
NewIndex.szTagName: = "NewIndex1";
NewIndex.bPrimary: = False;
NewIndex.bUnique: = True;
NewIndex.bDescending: = False;
NewIndex.bMaintained: = True;
NewIndex.bSubset: = False;
NewIndex.bExpIdx: = False;
NewIndex.iFldsInKey: = 1;
NewIndex.aiKeyFld [0]: = 2;
NewIndex.szKeyExp: = "";
NewIndex.szKeyCond: = "";

NewIndex.bCaseInsensitive: = False;
NewIndex.iBlockSize: = 0;
Check (DbiAddIndex (Tbl.dbhandle, Tbl.handle, PChar (Tbl.TableName),
szFoxPro, NewIndex, nil));
end;
==============================



сторінки: 1 вся гілка

Форум: "Бази";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.57 MB
Час: 0.026 c
14-22380
бармен
2001-11-09 10:37
2002.01.08
Москвичі, хто-небудь бачив у продажу довідник по Win API?


14-22322
дрімучий
2001-11-03 14:10
2002.01.08
Хто візьметься зробити? Стати в нагоді всім.


14-22365
Ketmar
2001-10-16 06:22
2002.01.08
от цікаво: з Сімферополя я тут один?


4-22457
Zabl
2001-11-01 13:15
2002.01.08
Проблемма з Dll


3-21979
Maxman
2001-12-06 13:21
2002.01.08
DBTreeView





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська