Показать сообщение отдельно
  #7  
Старый 21.03.2013, 10:54
cyborgg4655 cyborgg4655 вне форума
Начинающий
 
Регистрация: 16.03.2013
Сообщения: 151
Версия Delphi: Delphi 2010
Репутация: 10
По умолчанию

Цитата:
Сообщение от Страдалецъ
Как я понял у вас существует логическая связь ADOQuery1.FieldByName('Код') = ADOQuery4.FieldByName('Код') и вы хотите выполнить ваш код для всех записей из Query1?
1. Вместо ручного поиска записи по Locate воспользуйтесь механизмом Мастер-Деталь. Что это такое и как делать найдете.
2. А обход записей делается так:
Код:
While not Query1.Eof
do begin
    //Помещаете сюда ваш блок кода 
    end;
При первом нажатии на кнопку цикл проходит как надо на УРА, а вот если я на нее жму повтрно то все зависает)) в каком моенте мне лучше вставить
Код:
if a4=a6 then
begin
 exit;
end else
либо что то другое)
Ответить с цитированием