Глюки в цыкле с таблицей

← →
RDA © (2003-05-04 17:20) [0]

какой-то глюк, или я чего-то не замечаю
if not Shb.IsEmpty then begin Shb.First; while not Shb.Eof do begin if ShbCHIP.AsBoolean=True then begin Shb.Edit; ShbCHIP.AsBoolean:=False; Shb.Post; end; Shb.Next; end; end;
В любом случае исправляет только первую запись и выходит из цыкла сколько бы не было записей в таблице.

← →
DrPass © (2003-05-04 19:24) [1]

А как насчет вообще заменить всю эту байду на
update shb set chip=<чего там у тебя в булевом поле>

← →
MsGuns © (2003-05-04 22:41) [2]

Скорее всего, этот CHIP у тебя каким-то образом участвует в упорядочении записей (ключ/Индекс или указан в Order By запроса)

← →
Anatoly Podgoretsky © (2003-05-05 08:37) [3]

MsGuns © (04.05.03 22:41)
100 процентов, ну и еще немного остается на добулю обработчиков After/Before

>>DrPass Нет в запросе это реализовать нельзя (по нескольким причинам)
>>MsGuns Индексов нет, таблица в запросах не участвует
>>Anatoly Podgoretsky - After/Before пустые.

Но мистика вот в чем после 20 минут мучений и не пониманий переписал так и все заработало (сам знаю что бред - но пашет)

if not Shb.IsEmpty then begin Shb.First; while not Shb.Bof do begin if ShbCHIP.AsBoolean=True then begin Shb.Edit; ShbCHIP.AsBoolean:=False; Shb.Post; end; Shb.Prior; end; end;

Все врет, все..

Глюки в цыкле с таблицей Найти похожие ветки