您所在位置：主题：报表输出怎么没有内容啊？
triumph
[专家分：160] 发布于 2006-05-06 14:11:00
procedure Tsysqueform.RzBitBtn5Click(Sender: TObject);
begin
biao1form:=tbiao1form.Create(self);
biao1form.QuickRep1.Preview;
biao1form.Show;
end;
procedure Tbiao1form.FormCreate(Sender: TObject);
begin
with query1 do
begin
sql.Clear;
sql.Add('select * from t_meeting where sj=:sj');
parambyname('sj').AsDate:=sysqueform.RzDBDateTimeEdit1.Date;
open;
quickrep1.Preview;
end;
end;
运行程序时，报表竟然一点东西都没有，什么原因啊
begin
biao1form:=tbiao1form.Create(self);
biao1form.QuickRep1.Preview;
biao1form.Show;
end;
procedure Tbiao1form.FormCreate(Sender: TObject);
begin
with query1 do
begin
sql.Clear;
sql.Add('select * from t_meeting where sj=:sj');
parambyname('sj').AsDate:=sysqueform.RzDBDateTimeEdit1.Date;
open;
quickrep1.Preview;
end;
end;
运行程序时，报表竟然一点东西都没有，什么原因啊
