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

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

Как управлять записями в ADOQuery?

pathfinder ©   (2005-11-02 18:56:00) 

Подскажите пожалуйста как делать активной ту или иную запись в ADOQuery.
так почему-то не получается:(

     if adoquery1.RecordCount>0 then
       begin
        for r:=1 to adoquery1.recordcount do
         begin
          adoquery1.RecNo:=r;
          if (adoquery1.FieldByName('w11NAMF').AsString<>S_FAM) and
             (adoquery1.FieldByName('w11NAMI').AsString<>S_NAM) and
             (adoquery1.FieldByName('w11NAMO').AsString<>S_SUR) then
               begin
                memL.Lines.add(adoquery1.FieldByName('w11CLID').AsString)
                memL.lines.add(' ');
              end;
         end;
       end;

---

Игорь Шевченко   (2005-11-03 12:39:00) [1]

Filter не проще ?

---

Baltika-35   (2005-11-02 19:52:00) [2]

while not adoquery1.Eof do
begin
 if (adoquery1.FieldByName('w11NAMF').AsString<>S_FAM) and
            (adoquery1.FieldByName('w11NAMI').AsString<>S_NAM) and
            (adoquery1.FieldByName('w11NAMO').AsString<>S_SUR) then
              begin
               memL.Lines.add(adoquery1.FieldByName('w11CLID').AsString)
               memL.lines.add(' ');
             end;
 adoquery1.Next;
end;

---

pathfinder   (2005-11-02 19:43:00) [3]

точнее получается, но если у меня в выборке 2 записи обрабатывается только одна..

---

Наверх