Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.20;
Скачать: CL | DM;

Вниз

Как управлять записями в ADOQuery?   Найти похожие ветки 

 
pathfinder   (2005-11-02 18:56) [0]

Подскажите пожалуйста как делать активной ту или иную запись в 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;


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

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


 
Baltika-35   (2005-11-02 19:52) [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;


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

Filter не проще ?



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

Текущий архив: 2005.11.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
3-1128264458
john
2005-10-02 18:47
2005.11.20
Как узнать если селект в процедуре нашел запись или нет ?


14-1130804324
Таблоид
2005-11-01 03:18
2005.11.20
Какие есть интересные англоязычные сайты по Delphi ?


2-1130741502
Fostr
2005-10-31 09:51
2005.11.20
TListBox


14-1130707919
Gero
2005-10-31 00:31
2005.11.20
Вышла Civilization IV


2-1130428870
Максим
2005-10-27 20:01
2005.11.20
Массив структур