Работа с БД в Делфи 7

[курбанниязов]

При добавление данных в таблицу с помощью ДБедитов после добавления выводит такую ошибку

[IMG]http://http://programmersforum.ru/attachment.php?attachmentid=65006&s tc=1&d=1387652

[Stilet]

Это означает что в поле, которое объявлено ключом не может быть пусто.
Смотри свой код, там где ты добавляешь записи или редактируешь. Где-то в этих местах ключевое поле не вносится в базу. Отсюда и ошибка.

[курбанниязов]

вот код который я прописал на кнопке при добавление записи либо в аксесе может чтото не указал

if DataModule1.MenuName.Modified then
DataModule1.MenuName.Post;
Close;

[Stilet]

Этот код ничего не добавляет. Он просто сохраняет то что нужно внести.
Добавление делается методами insert или append.

[курбанниязов]

Вот код с дабовлением записи он добавляет но после того как перезапускаешь програму и тоже самое когда удаляешь он удаляет после перезапускание проекта

DataModule1.MenuName.Insert;
if DataModule1.MenuName.Modified then
DataModule1.MenuName.Post;
Close;

[Stilet]

Вот код с дабовлением записи

Да это он. Но он только создает пустую запись н внося в нее данные, о чем тебе ошибка и говорит. А вот если ты после Insert начнешь вписывать данные:

DataModule1.MenuName.FieldbyName('Поле такое-то').value:=чему-то

то пойдет запись данных, которое потом Post и сохранит. Кстати if DataModule1.MenuName.Modified then тут лишнее - убери его совсем.
Так вот тут-то и нужно заносить какое-то значение в поле, на которое ругается программа, оно не должно быть пустым. и полюбому должно чем-то заполняться.

[курбанниязов]

Form3.ActiveControl:=Form9.Edit1;
Form9.DBEdit1.Text:='   ';
Form9.DBEdit2.Text:='   ';
Form9.DBEdit3.Text:='   ';
Form3.sComboBox1.Text:='    ';
if (Form9.ShowModal=mrOK)then
begin
DBGrid1.Cells [0,DGrid1.RowCount-1]:=Form9.Edit1.Text;
DBGrid1.Cells [1,DBGrid1.RowCount-1]:=Form9.Edit2.Text;
DBGrid1.Cells [2,DBGrid1.RowCount-1]:=Form9.Edit3.Text;
DBGrid1.Cells [3,DBGrid1.RowCount-1]:=Form9.Edit4.Text;
DBGrid1.RowCount:=DBGrid1.RowCount+1;

Ошибки на этот код выдает

[Error] Unit3.pas(55): Undeclared identifier: 'Cells'
[Error] Unit3.pas(55): ']' expected but identifier 'RowCount' found

[Stilet]

Undeclared identifier: 'Cells'

У DBGrid нет свойства Cells в доступе из-под твоей программы.
Можешь даже и не пытаться так делать.
Если уж хочется глупостями заниматься то хотя бы так пиши:

with DBGrid.DataSource.DataSet do begin
 Insert;
  Fields[0].AsString:=Form9.DBEdit1.Text;
  Fields[1].AsString:=Form9.DBEdit2.Text;
  Fields[2].AsString:=Form9.DBEdit3.Text;
  Fields[4].AsString:=Form9.DBEdit4.Text;
 Post;		
end;

[курбанниязов]

Тогда так но все равно выбивает ошибку(

Form3.ActiveControl:=Form9.Edit1;
Form9.DBEdit1.Text:='   ';
Form9.DBEdit2.Text:='   ';
Form9.DBEdit3.Text:='   ';
Form3.sComboBox1.Text:='    ';
if (Form9.ShowModal=mrOK)then
begin
DBGrid1.Cells [0,DGrid1.RowCount-1]:=Form9.Edit1.Text;
DBGrid1.Cells [1,DBGrid1.RowCount-1]:=Form9.Edit2.Text;
DBGrid1.Cells [2,DBGrid1.RowCount-1]:=Form9.Edit3.Text;
DBGrid1.Cells [3,DBGrid1.RowCount-1]:=Form9.Edit4.Text;
DBGrid1.RowCount:=DBGrid1.RowCount+1;

Ошибки на этот код выдает

[Error] Unit3.pas(55): Undeclared identifier: 'Cells'
[Error] Unit3.pas(55): ']' expected but identifier 'RowCount' found

[Stilet]

Я сдаюсь...
Меня не слышно (