Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Помогите плз... Delphi7>ADO>Access   Найти похожие ветки 

 
Серг73   (2005-10-11 09:48) [0]

clUseServer/ilCursorStability/ltBatchOptimistic

procedure TForm1.DataUpply(Tbl: TADOTable);
var
 TSS:TRecordStatusSet;
begin          // пересылка изменений таблицы в базу данных
while Tbl.UpdateStatus<>usUnmodified do
   begin
   try
     Tbl.UpdateBatch(arCurrent);  //пересылка изменений в базу данных
   except
     try
       Tbl.Refresh; // !!! Вот как обновить UpdateStatus или RecordStatus???
     // Этот Refresh срабатывает раза с 10-го, а иногда и не помагает :((
     except
       on E2: Exception do
             begin
             log ("except2: "+E2.Message+" #"+IntToStr(E2.HelpContext));
             end;
       end;
     TSS:=Tbl.RecordStatus;
     // здесь может быть обработка TSS
     end;
   end;
end;

или может я вообще плохо этот DataUpply задумал?


 
Серг73   (2005-10-11 10:58) [1]

Извиняюсь не clUseServer, а clUseClient


 
msguns ©   (2005-10-11 12:20) [2]

Смешались в кучу кони (курсоры), люди (рефреши)..
А просто почитать справку по ADO, например про транзакции ?



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

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

Наверх




Память: 0.47 MB
Время: 0.053 c
6-1122384608
Almaz
2005-07-26 17:30
2005.11.06
Синхронизация доступа к сокету


2-1128957615
Gall
2005-10-10 19:20
2005.11.06
Получить список папок


3-1127475493
~viper~
2005-09-23 15:38
2005.11.06
Поиск


2-1129294767
d_savrasov
2005-10-14 16:59
2005.11.06
вопрос по quickrep


4-1125750833
Alloun
2005-09-03 16:33
2005.11.06
альтернатива TBitmap ?