Спасите, помогите !!!!!! [D6, IB6.x, Paradox]
Senator © (2002-12-18 12:22:00)
Народ, 2-ой день сижу, не могу понять в чем дело!!!!
Есть Paradox-ая таблица на удаленном компе и надо перегонять
данные на FireBird на другой тачке. Первый раз (после запуска все
работает, правда очень тормозит), а потом - нехочет обновлять
данные, выскакивает на проверке not EOF-типа уже конец, и новых
данных нету, А ОНИ ЕСТЬ !!!! В чем дело ??????????
with EventTable do
begin
if state=dsBrowse
then Refresh;
IBTransaction1.CommitRetaining;
try
if Locate("idEvent",CurrentEventID,[])
then next
else first;
while not EOF do
begin
//--идет вставка данных из таблицы Paradox в IBQuery
построчно
//-----
CurrentEventID:=FieldByName("idEvent").AsInteger;
next;
end; //while
и все это в Timer выполняеться .....
Senator (2002-12-18 12:48:00) [1]
Что, никто помочь не может ??????????
Наверх 
ЧАТ |
Орешник |
|
