Поиск в БД связь с Аксесс

[rdama]

ADOQuery1.SQL.Text:='SELECT * FROM ' +Ind+' WHERE Шифр LIKE '+QuotedStr('%A-174%');

[Dark_Spirit]

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

блин я не пойму как сделать условие,чтоб кнопка поиск зависела от выбранной таблицы...еси через case ничё не получется или где то чего то не хватает

var a,Ind:String;
begin
case combobox1.ItemIndex of
0: Ind:='Ученики';
1: Ind:='Бла бла';

end;
ADOtable1.IndexfieldNames:=Ind;
ADOQuery1.close;
ADOQuery1.SQL.Text:='SELECT * FROM Ind WHERE Шифр LIKE '+QuotedStr('%A-174%');

а зачем писать выделенное условие, у combobox-a есть свойство Text, вот его всемто case и используй


а у тебя combobox заполнен именами таблиц из базы, или он пустой?

[MikaS007]

в комбобоксе написаны так 1Курс, 2 курс и 3Курс...при выборе 1курс загружается таблица Ученики и т.д.

[Dark_Spirit]

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

в комбобоксе написаны так 1Курс, 2 курс и 3Курс...при выборе 1курс загружается таблица Ученики и т.д.

а при выборе 2курс, что грузится? та же таблица или другая?

[MikaS007]

*Бла бла* грузиться, те же столцы и строки,ток данные другие

[Dark_Spirit]

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

*Бла бла* грузиться, те же столцы и строки,ток данные другие

то есть в зависимости от выбора в комбобоксе, ты грузишь результаты какого-то запроса из одной и той же таблицы в дбгрид или из разных таблиц?

[MikaS007]

ну да ДБгрид одна, в зависимости что выбрали в комбобоксе грузиться одна из 3таблиц...вот терь как сделать чтоб поиск зависел что выбрано в комбобоксе,то есть по названию таблицы

[Dark_Spirit]

ну вот теперь я тебя понял, можно сделать таким образм:
при загрузке формы можно сразу к комбокс загрузить имена таблиц, а потом при выборе одной из таблиц в комбобоксе выполнять нужный тебе запрос, типа:

 adoquery1.sql.text:='select * from '+combobox1.text+' WHERE Шифр LIKE '+QuotedStr('%A-174%');

[MikaS007]

нет кажись не понял, TEXT это то что написано в комбобоксе, допустим *1курс* он название таблицы не видит,Код я пробовал не катит..может прогу скинуть те?

[Dark_Spirit]

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

нет кажись не понял, TEXT это то что написано в комбобоксе, допустим *1курс* он название таблицы не видит,Код я пробовал не катит..может прогу скинуть те?

давай кидай