Y
ylm107
Unregistered / Unconfirmed
GUEST, unregistred user!
var
query:tquery;
begin
query:=tquery.Create(nil);
dataname:=getcurrentdir+'/data';
query.DatabaseName :=dataname;
query.SQL.clear;
query.SQL.Add('Select * From workbl');
query.Active:=true;
quickreport1.dataset :=query;
quickreport1.QRDBText1.DataSet:=query;
quickreport1.QRDBText1.DataField:='number';
quickreport1.Preview ;
end;
预缆报表为何无数据,请各位赐教
query:tquery;
begin
query:=tquery.Create(nil);
dataname:=getcurrentdir+'/data';
query.DatabaseName :=dataname;
query.SQL.clear;
query.SQL.Add('Select * From workbl');
query.Active:=true;
quickreport1.dataset :=query;
quickreport1.QRDBText1.DataSet:=query;
quickreport1.QRDBText1.DataField:='number';
quickreport1.Preview ;
end;
预缆报表为何无数据,请各位赐教