Скачать: CL | DM;

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

← →
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

---

← →
RDA ©   (2003-05-05 09:13) [4]

>>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;


---

← →
Mike Kouzmine ©   (2003-05-05 09:26) [5]

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

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c