Вниз
Скачать: CL | DM;

Поиск в БД: переход на следующую строку   Найти похожие ветки 

 
VadimLG   (2003-12-02 14:19) [0]

Здравствуйте, уважаемые мастера! В целях обучения пишу простенькую БД. Прочитал статью "Поиск и фильтрация данных в Delphi", пытаюсь создать поиск по базе. С помощью Locate нахожу первую строку, отвечающую требованиям. Как продолжить поиск и найти остальные строки по порядку? У меня следующий код:
procedure TMainForm.BitBtn1Click(Sender: TObject);
begin
if not DataModule2.tInputGrid.Locate(ComboBox1.Text, Edit1.Text, []) then ShowMessage("Not found");
end;

И еще. При конструкции:
if not DataModule2.tInputGrid.Locate(ComboBox1.Text, Edit1.Text, [loCaseInsensitive, loPartialKey])
компилятор ругается на loCaseInsensitive и loPartialKey и говорит про Incompatible type TLocalOption and Integer. В че проблема?
Заранее спасибо.


 
Silver Alex ©   (2003-12-02 14:36) [1]


> компилятор ругается на loCaseInsensitive и loPartialKey
> и говорит про Incompatible type TLocalOption and Integer.
> В че проблема?

добавь в uses модуль DB, и не понятно что тебе надо поиск или фильтрация


 
VadimLG ©   (2003-12-02 14:45) [2]

Нужно чтобы я при очередном нажатии на кнопку прыгал на следующую запись, соответствующую искомой строке в Edit1.Text.


 
Silver Alex ©   (2003-12-02 15:04) [3]

а что не прыгает? или у тебя одинаковые значения?если одинаковые то наверное надо фильтровать


 
VadimLG ©   (2003-12-02 15:09) [4]

Да. У меня одинаковые значения. Если без фильтра нельзя обойтись, значит буду разбираться с ним. Спасибо. И за подсказку насчет модуля DB спасибо. А то все голову ломал не мог понять.


 
Vlad ©   (2003-12-02 15:14) [5]

Locate не будет "прыгать", т.к. каждый раз начинает поиск от начала набора данных.
Если втупую, то можно просто по кнопке "поиск" выполнять цикл
while not DataSet.Eof do... итд, каждый раз прерывая цикл на искомой строке.


 
Silver Alex ©   (2003-12-02 15:14) [6]

можно юзать тогда OnFilterRecord, есть такое событие у DataSet



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

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



Память: 0.46 MB
Время: 0.017 c
3-86262
bss
2003-12-03 15:12
2003.12.26
Редактирование данных в таблице Access через ADOQuery


14-86555
KILLER_ABV
2003-12-02 16:00
2003.12.26
Нужен HELP по Flash Macromedia


1-86347
csr
2003-12-12 17:27
2003.12.26
Как скрыть закладки в TPageControl?


11-86329
Ал
2003-04-10 14:04
2003.12.26
Как избежать увелич. шрифта в RichEdit, если в Win - крупный?


3-86259
peypivo
2003-12-03 17:30
2003.12.26
Отображение валют в StringGrid




   Наверх