Помогите разобраться!!!)необходимо сделать перенос записей из нескольких edit в dbgrid

[Альберт92]

Необходимо сделать перенос данных из нескольких edit в dbgrid таким образом,чтобы при внесении новой записи сохранялась предыдущая,т.е. она заносилась в следующую строку.Как это осуществить?

[xxbesoxx]

перенос данных из нескольких edit в dbgrid

А кто тебя сказал что данных надо перенос в dbgrid ?

[Альберт92]

Вы лучше вместо того,чтобы умничать подсказали бы)вообщем у меня информация из 4х edit должна переноситься в строку dbgrid,состоящую из 4х столбцов.Первая запись заноситься нормально,но когда второй раз пытаюсь добавить выдаёт ошибку:"несоответствие типов данных условию отбора"
Код:

procedure TForm4.Button4Click(Sender: TObject);
begin
begin
ADOTable3.Insert;
ADOTable3.FieldByName('Наружный_диаметр_мм').AsString := Edit2.Text;
ADOTable3.FieldByName('Материал').AsString := Edit6.Text;
ADOTable3.FieldByName('Исполнительная_толщина_мм').AsString := Edit7.Text;
ADOTable3.FieldByName('отбраковочная_толщина').AsString := Edit5.Text;
DBGrid3.Refresh
end;
end;

Подскажите,как необходимо доработать код..

[xxbesoxx]

вообщем у меня информация из 4х edit должна переноситься в строку dbgrid

dbgrid это для отображения данных . это написано на всех учебнике и на форуме сказано несколько раз .

но когда второй раз пытаюсь добавить выдаёт ошибку:"несоответствие типов данных условию отбора"

Потому что данных хранится в таблице и (не dbgrid) и вы добавляйте все значения как (AsString = текст)

Подскажите,как необходимо доработать код

тип поля смотрите на таблице и название столбцов не должен содержать пробел

procedure TForm4.Button4Click(Sender: TObject);
begin
	ADOTable3.Insert;
	ADOTable3.FieldByName('Наружный_диа_метр_мм').AsString := Edit2.Text;
	ADOTable3.FieldByName('Материал').AsString := Edit6.Text;
	ADOTable3.FieldByName('Исполнительн_ая_толщина_мм').AsString := Edit7.Text;
	ADOTable3.FieldByName('отбраковочна_я_толщина').AsString := Edit5.Text;
	ADOTable3.Post;
end;

Книгу если не читайте ! Хотя бы просто полистайте и отпадут такой вопросы

[Stilet]

название столбцов не должен содержать пробел

Ошибочка. Пробел вполне может быть в названии. Просто не рекомендуют.

Подскажите,как необходимо доработать код..

Код вроде не криминальный.
На какой строке происходит ошибка? Фильтрация случайно не выставлена?

[xxbesoxx]

Код вроде не криминальный.

2 begin и end и в конце нету ADOTable3.Post; и что за ADOTable3 ? почему в таблицу не назвали Table1 ? про название Edit6 да это имя осмысленный

[Альберт92]

xxbesox, в коде нету ошибки грубой,так как первую запись dbgrid отображает норм,просто нужно задать условие какое-то,чтобы следующие записи отображались норм со следующей строки..с begin и end там всё норм,просто вырезал криво часть кода

[Альберт92]

ADOTablePost пробовал,он тоже ошибку выдает,напишите и проверьте где-нибудь..если бы я сам мог разобраться,я бы сюда не писал

[xxbesoxx]

так как первую запись dbgrid отображает норм,просто нужно задать условие какое-то,чтобы следующие записи отображались норм со следующей строки

Почему условия ? на какой СУБД вы создали это таблица ? нету там "счетчик" или "auto_increment"

ADOTablePost пробовал,он тоже ошибку выдает

скажите пожалуйста вы Access создали таблица или Paradox

[Stilet]

2 begin и end и в конце нету

Не нужно.

нету ADOTable3.Post

Не обязательно. Зависит от случая.

почему в таблицу не назвали Table1 ?

Не тупи )

про название Edit6 да это имя осмысленный

Моск то включи - не в этом проблема.

просто нужно задать условие какое-то,чтобы следующие записи отображались норм со следующей строки

Никаких условий там не надо для вставки.
Отлаживать код нужно. Тогда станет понятно почему добавление не дается.
Возможно стоит убрать refresh для пробы. Где-то нарушается целостность базы, но автор не говорит ничего о ее структуре.