SELECT object from yourtable where adress='a' +string1+string2+.... string1:=' or address= ad '; string2:=' OR ...';
ListView或TreeView组件;得到ListView/TreeView的值,使用动态查询。如: adoquery.sql.add('select 地点 from 地点表 where 地点=:Value'); adoquery.parameters('Value').asstring:=Listview1.ItemFocused.Caption
'select 物品名 Form Table Where' & Addr1 & Addr2 & ..... addr1=' or Address=地点1' addr2=........ ...
1.你可以制作一个过程 procedure GetProductInfo(Name:string) begin with adoquery1 do begin close; sql.clear; sql.add('select * from yourdatabaseName'); try sql.add('where productName='''+name+''' or AddressName='''+name+''''); except Messagebox('your information'); end; end; end; 2.控建使用一般的Edit就可以
获得地点的信息,可以放到一个 ListView 中,然后将 ListView 的 CheckBox 显示出来, 查询的时候使用 Select * from Info where Address in (:ADDR) :ADDR 的值就是选择的地点。
+string1+string2+....
string1:=' or address= ad ';
string2:=' OR ...';
adoquery.sql.add('select 地点 from 地点表 where 地点=:Value');
adoquery.parameters('Value').asstring:=Listview1.ItemFocused.Caption
addr1=' or Address=地点1'
addr2=........
...
procedure GetProductInfo(Name:string)
begin
with adoquery1 do
begin
close;
sql.clear;
sql.add('select * from yourdatabaseName');
try
sql.add('where productName='''+name+''' or AddressName='''+name+'''');
except
Messagebox('your information');
end;
end;
end;
2.控建使用一般的Edit就可以
查询的时候使用 Select * from Info where Address in (:ADDR)
:ADDR 的值就是选择的地点。