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

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

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

Числовой тип поля в Access [D7, Access]

Smalik © (2004-05-13 17:30:00)
Доброе время суток всем!
Использую DCOM, ADO+Access на сервере, на тонком клиенте не работает следующий код по сохранению данных в базу:

DBGrid1.DataSource.DataSet.Insert;
DBGrid1.Fields[0].AsInteger := StrToInt(Forma2.Edit1.Text);
DBGrid1.Fields[1].Text := Forma2.Edit2.Text;
DBGrid1.Fields[2].AsInteger := Forma2.ComboBox2.ItemIndex;
DBGrid1.Fields[3].AsInteger := Forma2.ComboBox1.ItemIndex;
DBGrid1.Fields[4].AsInteger := StrToInt(Forma2.Edit3.Text);
DBGrid1.DataSource.DataSet.Post;
ClientDataSet1.ApplyUpdates(-1);

Тип поля в Таблице Access числовой кроме DBGrid1.Fields[1].Text

Спасибо.

Smalik (2004-05-14 07:56:00) [1]
Если кому интересно, то заработал следующий код:
Form1.ClientDataSet1.Close;
Form1.ClientDataSet1.CommandText:='INSERT INTO TblNomenkl VALUES (' + Forma2.Edit1.Text + ','''+ Forma2.Edit2.Text + ''',' + IntToStr(Forma2.ComboBox2.ItemIndex) +','+ IntToStr(Forma2.ComboBox1.ItemIndex)+ ',' + Forma2.Edit3.Text + ')';
Form1.ClientDataSet1.Execute;

в ClientDataSet нужно указать BathOptimistic

MU (2004-05-13 18:13:00) [2]
Напишите обработчик OnreconcileError у ClientDataSet1

procedure TForm2.ClientDataSet1ReconcileError(
DataSet: TCustomClientDataSet; E: EReconcileError;
UpdateKind: TUpdateKind; var Action: TReconcileAction);
begin
ShowMessage(E.Message);
end;
И читайте

MU (2004-05-13 18:09:00) [3]
Уникальный ключ есть у записи? Может, происходит дублирование?

MU (2004-05-13 18:04:00) [4]
А что, одно из этих полей счетчик? Тогда его заполнять НЕ надо -он сам получит значение

Smalik (2004-05-13 18:04:00) [5]
счетчика нет

Smalik (2004-05-13 18:02:00) [6]
Не возбуждают, для этого и пытался указать .AsInteger
Может есть какие-нибудь примеры по работе с числовыми типами полей и счетчиками в Ассеsse

MU (2004-05-13 17:59:00) [7]
А что при этом в Forma2.Edit1.Text и Forma2.Edit3.Text
StrToInt не возбуждает исключения? В отладке проходили?

Smalik (2004-05-13 17:39:00) [8]
Не сохраняет новую строку, которую я пытаюсь добавить в таблицу

MU (2004-05-13 17:38:00) [9]
Не работает?! Пишите внятно, что значит "не работает"

Наверх

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