Поиск в БД в формате dbf через Table

← →
Sewerneik (2011-03-23 15:38) [0]

Здраствуйте! Помогите пожалуйста, просто срочно нужно!
Помогите, как организовать поиск через Table?
За ранее спасибо!)))

← →
Anatoly Podgoretsky © (2011-03-23 15:47) [1]

> () []

Простейший поиск по справке - FindKey, FindNearest

← →
sniknik © (2011-03-23 16:21) [2]

> FindKey
это по "ключу" (индексу) если такового нет, то Locate (+F1)

← →
Anatoly Podgoretsky © (2011-03-23 16:31) [3]

Он не оговаривал это.

← →
Sewerneik (2011-03-23 16:35) [4]

Да я Locate пробывал он ощибку выдает!

procedure TForm1.Button13Click(Sender: TObject);
begin
if not fdm.ADOTable1.Locate("Fam", Edit1.Text, [loCaseInsensitive,
loPartialKey]) then
ShowMessage("Запись не найдена");
end;
ругаеться на вот эту запись "loCaseInsensitive", может я что нибудь пропустил?
Помогите!=)

← →
sniknik © (2011-03-23 17:05) [5]

> Он не оговаривал это.
... он похоже не только это не оговаривал...
> ADOTable1

> ругаеться на вот эту запись "loCaseInsensitive", может я что нибудь пропустил?
смотря какими словами "ругается"... может и пропустил.
но вообще, именно loCaseInsensitive можно выкинуть, ADO ее игнорирует (не действие, а параметр. действие как раз Insensitive по умолчанию).

← →
sniknik © (2011-03-23 17:07) [6]

> Помогите!=)
это невозможно... ты сам себе яму роешь используя в комбинации ADO с Table...
проблемы только начинаются.

← →
Sewerneik (2011-03-23 17:10) [7]

Эта старая запись, я теперь просто с Table работаю! просто не посмотрел что старая...
вот как то так:
procedure TForm1.Button13Click(Sender: TObject);
begin
if not fdm.Table1.Locate("Fam", Edit1.Text, [loCaseInsensitive,
loPartialKey]) then
ShowMessage("Запись не найдена");
end;
вот так она выглядит сейчас!

Так как ругается то?

← →
Виталий Панасенко (2011-03-24 11:43) [9]

Политика конторы не разрешает разглашать эту тайную инфу!

Поиск в БД в формате dbf через Table Найти похожие ветки