J
jackeysen
Unregistered / Unconfirmed
GUEST, unregistred user!
最近做的一个报表,每页要打印个陵型的标示,fastreport的shape没陵型,所以只好先做了一个bmp的图片,然后在装进去,报表要求每页都要打印陵型,每次多少页不知,因为格式的关系,不能把陵型放到pagehand上,也因为报表有点复杂,是调用先作好的frf,想在frReport1begin
Page每次开始打一页是创建陵型:
var
page:tfrpage;
s:tfrview;
begin
page:=form1.frReport1.Pages[pgNo];
s:=frcreateobject(gtPicture,'');
s.SetBounds(200,100,200,40);
s.Name:='Picture1';
page.Objects.Add(s);
TfrPictureView(page.FindObject('Picture1')).Picture.LoadFromFile ('d:/packing/xie.bmp');
end;
这样不行啊!!那位大大给点指教呀!!!急啊!!!!
Page每次开始打一页是创建陵型:
var
page:tfrpage;
s:tfrview;
begin
page:=form1.frReport1.Pages[pgNo];
s:=frcreateobject(gtPicture,'');
s.SetBounds(200,100,200,40);
s.Name:='Picture1';
page.Objects.Add(s);
TfrPictureView(page.FindObject('Picture1')).Picture.LoadFromFile ('d:/packing/xie.bmp');
end;
这样不行啊!!那位大大给点指教呀!!!急啊!!!!