Фильтрация в Delphi

[Лукманов Александр]

Как мне сделать чтобы сразу несколько ComboBox на форме, фильтровали поля DbGrid?

[master-sheff]

SELECT *
FROM Твоя_долбаная_таблица
WHERE ((Первое_поле=ComboBox1) and (Второе_поле=ComboBox2))

PS: Учи SQL.

[hoza_syl]

master-sheff так не сойдет. Как ты из SQL запроса получиш доступ к свойствам компонентов???
Так что учи SQL master-sheff.

Делай так:

кинь вместо TTable - TQuery. Дважды щелкни по его свойству SQL
и там напишы следующие:

SELECT *
FROM Твоя_таблица
WHERE ((Первое_поле=:param1) and (Второе_поле=:param2) ...
and (N-тое_поле=:paramN))

Дальше в обработчике нажатия на кнопке Фильтровать или как там у тебя, пишы:

Query1.ParamByName('param1').AsString:=comboBox1.Items.ValueFromIndex(combobox1.itemIndex);
Query1.ParamByName('param2').AsString:=comboBox2.Items.ValueFromIndex(combobox2.itemIndex);
...
Query1.ParamByName('paramN').AsString:=comboBoxN.Items.ValueFromIndex(comboboxN.itemIndex);

Не знаю нет ли ошыбок писал без компилятора.
Обязательно перед названием параметра (param1, param2) ставить двоеточие.

[master-sheff]

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

master-sheff так не сойдет. Как ты из SQL запроса получиш доступ к свойствам компонентов???
Так что учи SQL master-sheff.

Конечно не получу, я это прекрасно знаю. Я написал пример, а не работающую программу, помоему прекрасно всё видно как нада делать!!!

Ну если не нравится, то примерно так:

PHP код:

        Query1.Active := False;
        Query1.SQL.Clear;
        Query1.SQL.Add('SELECT * FROM Таблица WHERE Первое_поле='+ComboBox1.Items[ComboBox1.ItemIndex]+'and Второе_поле='+ComboBox2.Items[ComboBox2.ItemIndex]);
        Query1.Active := True; 


[master-sheff]

За работаспособность не ручаюсь, я привёл пример, а не работающую программу!