Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Глюки в цыкле с таблицей [D5, DBISAM]


RDA ©   (2003-05-04 17:20:00) 

какой-то глюк, или я чего-то не замечаю

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;

В любом случае исправляет только первую запись и выходит из цыкла сколько бы не было записей в таблице.


Mike Kouzmine   (2003-05-05 09:26:00) [1]

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


RDA   (2003-05-05 09:13:00) [2]

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


Anatoly Podgoretsky   (2003-05-05 08:37:00) [3]

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


MsGuns   (2003-05-04 22:41:00) [4]

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


DrPass   (2003-05-04 19:24:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо