Главная страница
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.026 c
11-1111753608
CHES
2005-03-25 15:26
2005.11.20
KOL для Free Pascal


14-1130338041
Starcom
2005-10-26 18:47
2005.11.20
Variant Asynh for D7


14-1130511082
Hello!
2005-10-28 18:51
2005.11.20
Как определить, какие библиотеки использует программа?


1-1130402074
Rentgen
2005-10-27 12:34
2005.11.20
Загрузка формы из библиотеки?


2-1131111375
San1
2005-11-04 16:36
2005.11.20
Как программно открыть файл PDF. txt, doc и т. д.