Главная страница
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.051 c
14-1130239230
SergP.
2005-10-25 15:20
2005.11.20
Поиск совпадений цифр в списке чисел. Есть ли мысли?


2-1131213661
Michael5
2005-11-05 21:01
2005.11.20
Есть программа, у которой свой графический интерфейс. Она может


1-1130247302
DinoRay
2005-10-25 17:35
2005.11.20
Как изменить FileVersion в файле *.res?


2-1130915853
nbab
2005-11-02 10:17
2005.11.20
Как кнопку сделать плоской, (как в панели быстрого запуска)?


2-1131269512
Максим
2005-11-06 12:31
2005.11.20
"Тихая" установка сервиса