Combobox и таблицы SQL (Delphi. Использование связанных DBLookupComboBox )

[Максим1818]

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

Подсказываю:


Выделенное курсивом - запрос

Выделенное жирным - наименование параметра

Вы видите в запросе наименование параметра? Я тоже не вижу.
Запрос должен иметь вид типа

и вот так ничего (((

я не хочу использовать параметр WHERE

if ADOQuery4.Active then ADOQuery4.Close;
ADOQuery4.Parameters.Clear;
ADOQuery4.SQL.Text:='SELECT * FROM ClassDesc Where ClassDesc = 2';
ADOQuery4.Parameters.ParamValues['2'] := Combobox1.Text;
ADOQuery4.ExecSQL;
ADOQuery4.Close;


я тут это все реализовал при помощи DBLookupComboBox
скажите пожалуйста а как можно реализовать ниже указанное

Т.е., допустим, есть у вас таблица "продукт" и таблица "марки продуктов". В "продуктах" - только наименования, например "рис", "макароны" и т.д. В "марках продуктов" - соответствия вида "Макфа|макароны", "Вау|рис", "Мискузи|рис" и т.д.
Соответственно, если выбранный продукт - "макароны", то нужно вывести только те марки продуктов, которые соответствуют макаронам?

[Максим1818]

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

Подсказываю:


Выделенное курсивом - запрос

Выделенное жирным - наименование параметра

Вы видите в запросе наименование параметра? Я тоже не вижу.
Запрос должен иметь вид типа

я Вам конечно очень благодарен, что Вы желаете меня научить языку программирование )))

[Serge_Bliznykov]

во-первых, запомните, если Вы хотите получить набор данных (запрос данных == SELECT), то Query нужно открывать через метод .Open (или Active := true, что одно и то же).
Метод ExecSQL используется для внесения изменений в данные (команды SQL UPDATE/ INSERT/ DELETE и т.д.)

во-вторых, параметер Вы прописали, но ЧЕМУ он должен быть равен?!!!

ADOQuery4.SQL.Text:='SELECT * FROM Class Where ??? = :xyz';
ADOQuery4.Parameters.ParamByName('xyz').Value := Combobox1.Text;
ADOQuery4.Open;

[Максим1818]

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

во-первых, запомните, если Вы хотите получить набор данных (запрос данных == SELECT), то Query нужно открывать через метод .Open (или Active := true, что одно и то же).
Метод ExecSQL используется для внесения изменений в данные (команды SQL UPDATE/ INSERT/ DELETE и т.д.)

во-вторых, параметер Вы прописали, но ЧЕМУ он должен быть равен?!!!

ADOQuery4.SQL.Text:='SELECT * FROM Class Where ??? = :xyz';
ADOQuery4.Parameters.ParamByName('xyz').Value := Combobox1.Text;
ADOQuery4.Open;

я вообще уже запутался

есть MS SQL в ней БД в базе данных таблица Class в таблице Class 2 колонки ClassDesc и ClassID

Хочу в Combobox вывести значение из ClassDesc

[Vanta11a]

'SELECT ClassDesc FROM Class'

- это выбор всех полей в столбце ClassDesc таблицы Class

'SELECT ClassDesc FROM Class WHERE ClassID = 1'

- это выбор всех полей в столбце ClassDesc таблицы Class, для которых ClassIP = 1

Ну и так далее.

[Максим1818]

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

'SELECT ClassDesc FROM Class'

- это выбор всех полей в столбце ClassDesc таблицы Class

'SELECT ClassDesc FROM Class WHERE ClassID = 1'

- это выбор всех полей в столбце ClassDesc таблицы Class, для которых ClassIP = 1

Ну и так далее.

Указал, но все равно не удача ((

if ADOQuery4.Active then ADOQuery4.Close;
ADOQuery4.Parameters.Clear;
ADOQuery4.SQL.Text:='SELECT ClassDesc FROM Class Where ClassID = 1';
ADOQuery4.Parameters.ParamByName('1 ').Value := Combobox1.Text;
ADOQuery4.Open;

[Serge_Bliznykov]

для начала, давайте забудет про параметры и отработаем запрос.
Перейдите в Среда SQL Server Management Studio,
подключитесь к вашей БД, откройте новое SQL окно и напишите там текст:

SELECT ClassDesc FROM Class Where ClassID = 1

нажмите F5 (или Query - Execute)

убедитесь, что запрос отработал и ВЕРНУЛ запись (одну или несколько)..

дальше, переходите в Delphi
и пробуйте такой код:

ADOQuery4.Close;
ADOQuery4.SQL.Text:='SELECT ClassDesc FROM Class Where ClassID = 1';
ADOQuery4.Open;

Если Вы всё сделали верно, то у Вас в тот контрол, который связан с ADOQuery4 выберутся те же записи, что Вы видели в окне выборки SQL Server Management Studio.

Если всё сделаете, то после этого перейдём к параметрам!

[Максим1818]

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

для начала, давайте забудет про параметры и отработаем запрос.
Перейдите в Среда SQL Server Management Studio,
подключитесь к вашей БД, откройте новое SQL окно и напишите там текст:

SELECT ClassDesc FROM Class Where ClassID = 1

нажмите F5 (или Query - Execute)

убедитесь, что запрос отработал и ВЕРНУЛ запись (одну или несколько)..

дальше, переходите в Delphi
и пробуйте такой код:

ADOQuery4.Close;
ADOQuery4.SQL.Text:='SELECT ClassDesc FROM Class Where ClassID = 1';
ADOQuery4.Open;

Если Вы всё сделали верно, то у Вас в тот контрол, который связан с ADOQuery4 выберутся те же записи, что Вы видели в окне выборки SQL Server Management Studio.

Если всё сделаете, то после этого перейдём к параметрам!

В SQL все получилось и показал нужное поле
в Delphi вписал на Combobox1 Events OnChange
ADOQuery4.Close;
ADOQuery4.SQL.Text:='SELECT ClassDesc FROM Class Where ClassID = 1';
ADOQuery4.Open;

Ничего не показало

[Serge_Bliznykov]

Сообщение от Максим1818

В SQL все получилось и показал нужное поле

отлично!

Сообщение от Максим1818

в Delphi вписал на Combobox1 Events OnChange

Ничего не показало

а Вы в Combobox1 что-то меняли?!

Если да, то вот. это проблема.
значит,
1) убедитесь, что событие срабатывает в нужный код Вы попадаете.
(поставьте точку останова на строчке ADOQuery4.Close; )

2) проверьте, с чём у Вас связано ТО, что ничего не показало!

[Максим1818]

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

отлично!


а Вы в Combobox1 что-то меняли?!

Если да, то вот. это проблема.
значит,
1) убедитесь, что событие срабатывает в нужный код Вы попадаете.
(поставьте точку останова на строчке ADOQuery4.Close; )

2) проверьте, с чём у Вас связано ТО, что ничего не показало!

удалил и создал новый combobox, все равно та же проблема

я сейчас видео с экрана сниму всего процесса и выложу, может я где то не туда нажимаю и