powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / MS Access -> ADO -> проблема с полем типа счетчик
6 сообщений из 6, страница 1 из 1
MS Access -> ADO -> проблема с полем типа счетчик
    #32308807
surovi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
При добавлении новой записи в DBGrid, поле, которое в БД является счетчиком -
не имеет значение. Но это даже не самая большая проблема. Если еще перейти
на новую запись и вернуться на предыдущую (введенную выше), то она до сих
пор еще не получила значение из поля счетчика из БД.
Хотя все свойства TADOTable установлены по умолчанию.

CachSize:= 1;
LockType:= ltOptimistic; и т.п.

и установлены динамические свойства:

procedure TDM.rsTimingAfterOpen(DataSet: TDataSet);
begin
TADOTable(Dataset).Properties['Update Criteria'].Value:= adCriteriaKey; // uses ADOInt;
TADOTable(Dataset).Properties['Update Resync'].Value:= adResyncAutoIncrement;

// так тоже не помогает
//TADOTable(Dataset).Properties['Update Resync'].Value:= adResyncAutoIncrement + adResyncInserts;
//TADOTable(Dataset).Properties['Update Resync'].Value:= adResyncAll;
//TADOTable(Dataset).Properties['Update Resync'].Value:= adResyncAutoIncrement + adResyncUpdates;
//TADOTable(Dataset).Properties['Update Resync'].Value:= adResyncAutoIncrement + adResyncConflicts;
end;

Пробовал ставить свойство поле счетчика

AutoGenerateValue:= arAutoInc;

тоже не помогает.
Использование .Requery() не годится.

Просьба кто знает ответить пожалуйста конкретно без каких-либо аля "может быть"

Огромное спасибо всем понимающим
...
Рейтинг: 0 / 0
MS Access -> ADO -> проблема с полем типа счетчик
    #32309605
Mik Prokoshin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ADOUpdate от Borland установи, если Delphi5. Если не поможет - бери TBetterADODataset. Проблема, насколько я понимаю, в Resync борландовского компонента.
...
Рейтинг: 0 / 0
MS Access -> ADO -> проблема с полем типа счетчик
    #32309649
surovi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо за ответ, но

у меня Delphi 7, MS Access 97

и хотелось бы решить эту проблему при помощи TADOTabel
...
Рейтинг: 0 / 0
MS Access -> ADO -> проблема с полем типа счетчик
    #32311170
MaratIsk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
CursorLocation := clUserServer
...
Рейтинг: 0 / 0
MS Access -> ADO -> проблема с полем типа счетчик
    #32311178
Mik Prokoshin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Одна ли эта таблица задействована или есть другие (типа в lookup'ах)? Проверьте, все Table и Dataset должны быть clUseClient, при clUseServer где-либо в связанных таблицах, возможно неполучение ADO значения IDENTITY.
...
Рейтинг: 0 / 0
MS Access -> ADO -> проблема с полем типа счетчик
    #32318702
surovi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По поводу clUserServer - в таблице имеются 2 lookup поля и таблицы для этих полей clUseClient.
Если делаю свою главную таблицу clUserServer, то возникает ошибка при открытии таблицы:
Current provider does not support the necessary interfaces for sorting or filtering.
Возникает она из-за того, что у меня
IndexFieldNames:= 'PointDate; TimeFrom';
Я убрал IndexFieldNames - таблица открылась нормально, но в событии OnNewRecord
значение счетчика при добавлении новой записи все-равно =0 (или оно появляется после Post?).
Причем, пришлось убрать в AfterOpen
TADOTable(Dataset).Properties['Update Criteria'].Value:= adCriteriaKey; // uses ADOInt
т.к. вознакала ошибка:
Item cannot be found in the collection corresponding to the requested name or ordinal.

А пока решил проблему:

TADOTable.Close;
TADOTable.Open;

не очень хорошо, но работает.

Спасибо за ответы.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / MS Access -> ADO -> проблема с полем типа счетчик
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]