Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.26;
Скачать: 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 вся ветка

Текущий архив: 2003.05.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
7-83769
_sMile
2003-03-24 11:31
2003.05.26
Как убить приложение?


14-83703
Manulo
2003-05-06 15:03
2003.05.26
*.h + Delphi = work


14-83724
- Tsatur -
2003-05-07 00:54
2003.05.26
INI в инете


3-83370
Ruff
2003-05-05 16:30
2003.05.26
Тормоза при работе с DBF


3-83366
Kirill_S
2003-05-05 18:51
2003.05.26
Господа, помогите с QReport !