小弟用Database Dektop建的库,其中有‘年份’(用的是Alpha类型),当用如下语句对此表进行查询时,静态查询有结果,二动态查询去没有。请高手指点一下.
静态查询:
str1:='select * from Tplan.db where 年份="1999")';
with Query1 do
begin
close;
sql.Clear;
SQL.Text:=str1;
open;
end;
动态查询:
with Query1 do
begin
close;
Sql.Clear;
sql.Add('select distinct 年份 from Tplan.db');
open;
ComboBox1.Clear;
ComboBox1.Items.Add('');
for i:=1 to recordcount do
begin
ComboBox1.Items.Add(fieldbyname('年份').AsString);
next;
end;
end;
str1:='select * from Tplan.db where (年份="1999" and (单位编号="A2"))';
with Query1 do
begin
close;
sql.Clear;
SQL.Text:=str1;
open;
end;
静态查询:
str1:='select * from Tplan.db where 年份="1999")';
with Query1 do
begin
close;
sql.Clear;
SQL.Text:=str1;
open;
end;
动态查询:
with Query1 do
begin
close;
Sql.Clear;
sql.Add('select distinct 年份 from Tplan.db');
open;
ComboBox1.Clear;
ComboBox1.Items.Add('');
for i:=1 to recordcount do
begin
ComboBox1.Items.Add(fieldbyname('年份').AsString);
next;
end;
end;
str1:='select * from Tplan.db where (年份="1999" and (单位编号="A2"))';
with Query1 do
begin
close;
sql.Clear;
SQL.Text:=str1;
open;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货