我在一百多张的报表中都静态装了图片呀!!(0分)

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #1

我在一百多张的报表中都静态装了图片呀!!
变成报表很大!!!
现在想编程去修改报表!!!
把里面的picture中的图片清空!!!

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #2

报表中的图片控件用的是哪一个？遍历一下报表窗体，把图片控件中的图片清空就可以啊。

 

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #3

我是初学者呀！！
不然怎么回这么冲动！！！
搞了一百多张的图片呀！！！
你能不能说具体点！
先谢了！！

 

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #4

我是初学者呀！！
不然怎么回这么冲动！！！
搞了一百多张的图片呀！！！
你能不能说具体点！
先谢了！！

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #5

晕！！！报表中的图片控件用的是哪一个？

 

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #6

fastreport 的 picture!!!!

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #7

procedure ClearPictures(AForm: TForm);
var
I: Integer;
begin
if Assigned(AForm) then
with AFormdo
for I := 0 to ComponentCount - 1do
if Components is TImage {是这个类么？} then
(Components as TImage).Picture := nil;
end;

 

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #8

(Components as TImage).Picture := nil;
这段代码是置空！！！
再次运行时还回有！！！
现在是报表文件*.frf中有图片！！！
呀！！

 

T

thx1180

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #9

用程序清报表文件？那可比较复杂啊，[]
你可以把这段代码加到程序中去啊，每次运行时让它帮你清。

 

F

fjtdabc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-13

• #10

谢谢你thx1180!!
我再想想别的办法!!!