[求助]求求大家帮帮小弟吧,在线等!谢谢谢谢了!! (50分)

  • 主题发起人 主题发起人 sdralf
  • 开始时间 开始时间
S

sdralf

Unregistered / Unconfirmed
GUEST, unregistred user!
请问大家,如何隐藏报表中的组件啊?
小弟在form1.oncreate事件中用
qrdbtext1.visible:=false
然后直接preview,
可是没有用啊,preview出来qrdbtext1还是看得到的
该怎么实现啊?求大家帮小弟一把,谢谢谢谢!
我可能说得不清楚,再重述一下:
在报表里需要用qrimage显示图片,图片路径由qrdbedit1从数据库取出数据并拼接产生,但是我不想让qrdbedit1在报表打印和预览的时候出现,所以想将qrdbedit1隐藏起来,请问如何实现?
 
没怎么说清楚啊?
 
好像是用enabled := False;
 
没说清楚啊?哦哦~
就是我在做一个报表,这个报表里有一个qrdbedit1控件,但我想在preview的时候把这个qrdbedit1控件隐藏起来,该怎么样实现?
我已经试过qrdbedit1.visible:=false;可是没有用,preview的时候还是可以看得见qrdbedit1
不知道这样算说清了没,小弟嘴笨,不好意思
 
>>好像是用enabled := False;
可是这个qrdbedit1还是要从数据库取数据的,小弟只是想在preview里把它隐藏起来,如果enabled:=false,那是不是就不能用了啊?
 
应该是qrdbtext1.visible:=false
但你不要在form1.oncreate事件中用
在preview之前设qrdbtext1.visible:=false,应该很正常
 
>>应该是qrdbtext1.visible:=false
>>但你不要在form1.oncreate事件中用
>>在preview之前设qrdbtext1.visible:=false,应该很正常
我的原意是想让这个窗体在create的时候(响应另一个form上的btn.click)直接开始preview,就是想让qrdbedit1在“后台”(隐藏)取数据库里的数据,这样不能实现的吗?55555急死我了[:(]
 
把qrdbtext1.visible:=false放在preview后面阿
 
enabled := False;就行啦
怎麼人家都說了你就是不理會呢?
 
>>enabled := False;就行啦
>>怎麼人家都說了你就是不理會呢?
我回了耶……如果enabled:=false那这个qrdbedit1就不能从数据库取出数据了啦……
而且报表里面的qrimage需要用到qrdbedit1,如果enabled false那就用不了了嘛~
 
>>把qrdbtext1.visible:=false放在preview后面阿
没有用啊~
我的代码如下:
procedure TForm2.FormCreate(Sender: TObject);
begin
quickrep1.Preview;
qrdbtext1.Visible:=false;
end;

procedure TForm2.QRDBText1Print(sender: TObject;
var Value: String);
begin
Value := form1.Edit1.Text + Value + '.bmp';
//这里是用几个string拼接出需要的内容然后重新赋予qrdbedit1
end;

然后打算用qrimage调用qrdbtext1的内容
 
to sdralf:
不显示,前面的老兄已讲了,把Enabled那为False就行了。
你要用qrbtext1.text(也就是数据库的数据),你用一个表达式就行了,不用你那样写
代码麻烦,变通一下嘛。不用去多一个qrbtext1。
 
隐藏不了,在TDBText.OnPrint中
Value := '';
 
学习……
 
>>to sdralf:
>> 不显示,前面的老兄已讲了,把Enabled那为False就行了。
>> 你要用qrbtext1.text(也就是数据库的数据),你用一个表达式就行了,不用你那样写
>>代码麻烦,变通一下嘛。不用去多一个qrbtext1。
哦,这样啊,那我说说,您帮我想想办法好吗?
我原意是这样,报表中是包含qrimage的,然后根据数据库中的ID字段值(1,2,3,4……)拼接成图片文件路径(比如c:/pic/1.bmp c:/pic/2.bmp等等),让qrimage调用。如果不用qrdbedit的话,那该怎么才能实现呢?
大家帮帮小弟吧,本以为是个很简单的问题,可是现在……小弟实在是郁闷死了~
 
用query作报表的dataset
在query中用sql写吧
 
[?]这个问题真有那么难吗?关注……
 
用SQL命令能实现的吗?该怎么写?小弟我想不出来……
 
加到 onshow 里面似一下
 
>>加到 onshow 里面似一下
不行啊~在onshow里加上qrdbtext1.visible:=false~可是preview里照样还会出现……
难道真的没有办法了吗?各位大侠教教小弟啊~!要是嫌分少了小弟再开贴加分~!
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部