DBComboBox и ВGrid - БД в Delphi

WALL · 20.10.2010, 15:55

Подключил DBComboBox к DBGrid теперь хочу чтобы при нажатии на кнопку то что я выбрал с DBComboBox сохраняла в БД.

Код:

Form4.ADOQuery1.Open;
Form4.ADOQuery1.Insert;
Form4.ADOQuery1.FieldByName('Фамилия').AsString:=Form5.Edit1.Text;
Form4.ADOQuery1.FieldByName('Имя').AsString:=Form5.Edit2.Text;
Form4.ADOQuery1.FieldByName('Отчество').AsString:=Form5.Edit3.Text;
Form4.ADOQuery1.FieldByName('Дата').AsDateTime:=Form5.DateTimePicker1.Date;
Form4.ADOQuery1.FieldByName('Продукт_питания').AsString:=Form5.DBComboBox1;
Form4.ADOTable1.FieldByName('Количество').AsString:=Form5.Edit5.Text;
Form4.ADOQuery1.Post;

new player · 20.10.2010, 16:34

Может процедуру написать и через ADOStoredProc?

Stilet · 20.10.2010, 16:42

Код:

Form4.ADOQuery1.FieldByName('Продук т_питания').AsString:=Form5.DBCombo Box1;
Form4.ADOTable1.FieldByName('Количе ство').AsString:=Form5.Edit5.Text;

Ниче не перепутал?

WALL · 20.10.2010, 16:52

Цитата:

Сообщение от Stilet

Form4.ADOQuery1.FieldByName('Продук т_питания').AsString:=Form5.DBCombo Box1;
Form4.ADOTable1.FieldByName('Количе ство').AsString:=Form5.Edit5.Text;
Ниче не перепутал?

Ну так вот это первая сточка и не пашит я незнаю как прописать ее все остальные нормально работают

Stilet · 20.10.2010, 16:59

Form5.DBComboBox1.Text; - Будь внимательней и читай ошибки среды.

WALL · 20.10.2010, 17:48

Цитата:

Сообщение от Stilet

Form5.DBComboBox1.Text; - Будь внимательней и читай ошибки среды.

это я уже делал выбивает ошибку на AsString
Другие варианты есть ?

mihali4 · 21.10.2010, 14:46

To WALL, to Stilet...
А что, други мои, правила оформления кода за время моего отсутствия похерили ?

WALL · 21.10.2010, 21:06

ну что не кто не может помочь ?

mihali4 · 21.10.2010, 21:52

Код:

Form4.ADOQuery1.FieldByName('Продук т_питания').AsString:=Form5.DBCombo Box1;

Строке Form4.ADOQuery1.FieldByName('Продук т_питания').AsString вы пытаетесь присвоить не строку, а сам компонент :=Form5.DBComboBox1;
Об этом вам уже указано Стилетом в п.5...
Элементарная невнимательность и постоянное ожидание помощи от чужого дяди...

WALL · 22.10.2010, 10:11

ну я знаю что в этой строке ошибка, как исправить ?

20.10.2010, 16:42	#3
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Код: `Form4.ADOQuery1.FieldByName('Продук т_питания').AsString:=Form5.DBCombo Box1; Form4.ADOTable1.FieldByName('Количе ство').AsString:=Form5.Edit5.Text;` Ниче не перепутал? I'm learning to live... Последний раз редактировалось Stilet; 22.10.2010 в 19:57.

20.10.2010, 16:59	#5
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Form5.DBComboBox1.Text; - Будь внимательней и читай ошибки среды. I'm learning to live...

21.10.2010, 21:52	#9
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Код: `Form4.ADOQuery1.FieldByName('Продук т_питания').AsString:=Form5.DBCombo Box1;` Строке Form4.ADOQuery1.FieldByName('Продук т_питания').AsString вы пытаетесь присвоить не строку, а сам компонент :=Form5.DBComboBox1; Об этом вам уже указано Стилетом в п.5... Элементарная невнимательность и постоянное ожидание помощи от чужого дяди...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
DBComboBox + Query	abr_question	БД в Delphi	1	21.05.2010 23:05
dbcombobox	salima	Помощь студентам	1	03.11.2009 19:30
dbcombobox	Mihailhome	БД в Delphi	1	23.05.2009 12:33
DBComboBox	BAV	Общие вопросы C/C++	1	01.09.2008 00:40
DBComboBox	mongol_78	БД в Delphi	4	29.01.2008 11:15

20.10.2010, 16:34	#2
new player Форумчанин Регистрация: 30.08.2010 Сообщений: 153	Может процедуру написать и через ADOStoredProc?

21.10.2010, 14:46	#7
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	To WALL, to Stilet... А что, други мои, правила оформления кода за время моего отсутствия похерили ?

21.10.2010, 21:06	#8
WALL Пользователь Регистрация: 04.10.2010 Сообщений: 67	ну что не кто не может помочь ?

22.10.2010, 10:11	#10
WALL Пользователь Регистрация: 04.10.2010 Сообщений: 67	ну я знаю что в этой строке ошибка, как исправить ?