Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Добавление данных в DB [D7, dBase, FoxPro, Paradox]

Kirill_21 © (2005-06-08 16:33:00)
мастера, скажите, плз, что не так, почему виснет прога:
With Table2 do begin
First;
while not eof do begin
n:=Table2.FieldByName('NNN').AsString;
IF Table1.Lookup('NNN',n,'Fio')=NULL Then begin
Table1.Append;
Table1.FieldByName('NNN').AsString:=Table2.FieldByName('Npd').AsString;
Table1.FieldByName('Fio').AsString:=Table2.FieldByName('Fm').AsString+' '+
Table2.FieldByName('Im').AsString+' '+Table2.FieldByName('Ot').AsString;
Table1.Post;
Next;
end;
end;
end;

Anatoly Podgoretsky (2005-06-09 09:10:00) [1]
Kirill_21 (08.06.05 18:00) [11]
"это" не определено.

evvcom (2005-06-09 09:00:00) [2]
Используй без with: Table2.Eof и т.д.
А еще Table2.Next у тебя сидит в блоке if ... then begin ... end; отсюда и "невыход из цикла"

Johnmen (2005-06-08 18:08:00) [3]
>а через SQL как это можно сделать?

А что такое SQL ? И что это "это" ?

Kirill_21 (2005-06-08 18:00:00) [4]
а через SQL как это можно сделать?

stakan (2005-06-08 17:49:00) [5]
Next вынеси из условия IF

Johnmen (2005-06-08 17:37:00) [6]
Прикольно :)))

Kirill_21 (2005-06-08 17:35:00) [7]
Table2

Johnmen (2005-06-08 17:32:00) [8]
>"пока не конец файла"

Какого файла ?

Kirill_21 (2005-06-08 17:30:00) [9]
"пока не конец файла"

Johnmen (2005-06-08 17:25:00) [10]
>а без with не работает while not eof...

А что такое eof ?

Kirill_21 (2005-06-08 17:00:00) [11]
а без with не работает while not eof...
а через query то же самое можно обеспечить?

Johnmen (2005-06-08 16:44:00) [12]
Когда не знаком с форматированием исх. текста, то жди и дальше и больше...:)))
А With зачем писАл ?

Anatoly Podgoretsky (2005-06-08 16:40:00) [13]
Цикл бесконечный

Sergey13 (2005-06-08 16:38:00) [14]
Из цикла выйти не может.

Наверх

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