Вниз
Скачать: CL | DM;

фильтр по 2 полям   Найти похожие ветки 

 
Kley   (2007-03-24 16:02) [0]

Звдравствуйте есть SQL запрос следующего вида:
procedure TForm5.sCheckBox1Click(Sender: TObject);
begin
if Form5.sCheckBox1.Checked=true then
begin
Form5.cxLookupComboBox1.Enabled:=true;
datamodule1.TovarQuery.Close;
datamodule1.TovarQuery.SQL.Clear;
 datamodule1.TovarQuery.SQL.Add("SELECT *");
 datamodule1.TovarQuery.SQL.Add("From Tov1");
 datamodule1.TovarQuery.SQL.Add("Where Vname LIKE """+Form5.cxLookupComboBox1.Text+"""");
 datamodule1.TovarQuery.SQL.Add("ORDER BY Name");
 datamodule1.TovarQuery.open;
end
else
begin
Form5.cxLookupComboBox1.Enabled:=false;
datamodule1.TovarQuery.Close;
datamodule1.TovarQuery.SQL.Clear;
 datamodule1.TovarQuery.SQL.Add("SELECT *");
 datamodule1.TovarQuery.SQL.Add("From Tov1");
 datamodule1.TovarQuery.SQL.Add("ORDER BY Name");
 datamodule1.TovarQuery.open;
end;
end;
в котором отбираются данные поп полю VName=Form5.cxLookupComboBox1.Text
Из этих данных хочу организовать еще одну выборку  Sname=Form5.cxLookupComboBox2.Text
datamodule1.TovarQuery.Close;
datamodule1.TovarQuery.SQL.Clear;
 datamodule1.TovarQuery.SQL.Add("SELECT *");
 datamodule1.TovarQuery.SQL.Add("From Tov1");
 datamodule1.TovarQuery.SQL.Add("Where Sname LIKE ""+Form5.cxLookupComboBox2.Text+"%" and Vname Like ""+Form5.cxLookupComboBox1.Text+"%"" );
 datamodule1.TovarQuery.SQL.Add("ORDER BY Name");
 datamodule1.TovarQuery.open;
выходят данные равные только по одному полю.
как быть?


 
Desdechado ©   (2007-03-24 16:53) [1]

В первом случае ты используешь две одинарных кавычки, а во втором SQL - одну двойную.


 
Johnmen ©   (2007-03-24 19:35) [2]

и зачем это if true=true и if false=true ???
:)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.017 c
15-1179324164
GeLLeR
2007-05-16 18:02
2007.06.10
Что-бы такого написать...


1-1176716998
well
2007-04-16 13:49
2007.06.10
BDS. Как создать иконку если нет ImageEditor


15-1179303837
TUser
2007-05-16 12:23
2007.06.10
Создание инсталяшки ... опять


2-1179705309
dreamse
2007-05-21 03:55
2007.06.10
Подскажите ключ реестра


2-1179422547
Shark280289
2007-05-17 21:22
2007.06.10
Delphi 7. Работа с ListView.




   Наверх