Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Help ! Поиск по индеку в DBF-файле ... [dBase, FoxPro]


Burlik ©   (2003-02-19 14:02:00) 

Поиск по индеку в DBF-файле ...

Использую Halcyon Version 06.04.01 (11 Dec 98) ...

см. samlpe ...
...
dmMain.dbfPolis.Active := true;
dmMain.dbfPolis.Index("POLIS.CDX","POLIS"); ...
где DBF - POLIS.DBF(+.CDX)
TAG - POLIS

далее ...
... if dmMain.dbfPolis.Locate("POLIS",VarPolis,[])) then ...
, где
FIELDPOLIS - поле DBF-файла ...
VARPOLIS - переменная ...

... ну вообще не ищет :-((

Может использовать не LOCATE ? И что именно ?

Burlik
ic-biv@tfoms.vrn.ru


sniknik   (2003-02-19 14:22:00) [1]

TDest.IndexFileInclude(PDest+"\G_Artikl.Ntx");
TDest.IndexName:= "G_ARTIKL";
while not TSour.Eof do begin
if TDest.Find(TSour.Fields[MasT2[2]].AsString ,True, False) then begin
TDest.Edit;
UpEdit:= UpEdit + 1;
end else begin
TDest.Append;
UpAdd:= UpAdd + 1;
end;
.....

тоже Halcyon версия 6,94 от 18.04.2002 ничего работает.
(может просто поменяеш на новую)
http://www.vodonosov.newmail.ru/develop/develop.htm
(уже 6,95 есть не ставил т.к. много изменений делал прямо в исходниках, а то что в 6,95 исправили я не использую)


Наверх

Титульная страница Поиск, карта сайта Написать письмо