Търсене в базата данни отидете на следващия ред

Здравейте скъпи майстори! За учебни цели пиша проста база данни. Прочетох статията „Търсене и филтриране на данни в Delphi“, опитвам се да създам търсене в база данни. С помощта на Locate намирам първия ред, който отговаря на изискванията. Как да продължа търсенето и да намеря останалите редове по ред? Имам следния код: procedure TMainForm.BitBtn1Click(Sender: TObject); започнете ако не DataModule2.tInputGrid.Locate(ComboBox1.Text, Edit1.Text, []) тогава ShowMessage("Не е намерено"); край; И още нещо. При конструиране: ако не DataModule2.tInputGrid.Locate(ComboBox1.Text, Edit1.Text, [loCaseInsensitive, loPartialKey]) компилаторът се кълне в loCaseInsensitive и loPartialKey и говори за несъвместим тип TLocalOption и Integer. Какъв е проблема? Благодаря предварително.

> компилаторът се оплаква от loCaseInsensitive и loPartialKey > и говори за несъвместим тип TLocalOption и Integer. > Какъв е проблема?добавете DB модула към употреби и не е ясно какво трябва да търсите или филтрирате

Необходимо е при следващото щракване върху бутона да прескоча до следващия запис, съответстващ на търсения ред в Edit1.Text.

какво не скача? или имате еднакви стойности? ако са еднакви, тогава вероятно трябва да филтрирате

да Имам същите ценности. Ако не можете без филтър, тогава аз ще се справя с него. Благодаря ти. И благодаря за подсказката за DB модула. И тогава си счупих главата и не можах да разбера.

Locate няма да "скочи", защото всеки път започва търсенето от началото на набора от данни. Ако е глупаво, можете просто да използвате бутона "търсене", за да изпълните цикъла без DataSet.Eof. и така нататък, всеки път прекъсвайки цикъла на желания ред.

тогава можете да използвате OnFilterRecord, има такова събитие в DataSet

---