一個簡單問題﹐動態創建的QRshape畫的線﹐在第二次preview時不是。(10分)

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-21

• #1

Qrquickrep的BeforePrint事件中如下代碼﹕
Var sh:TQRshape, i:integer
sh:=TQRshape.Create(frep.sumband);
sh.Parent :=frep.sumband ;
sh.Top :=0;
sh.Left :=i*25;
sh.Width:=25;
sh.Height :=sumband.Height ;
第一次preview時i=1﹐第二次preview時i=2
問題﹕第二次preview時﹐第一次畫的線還在﹐怎樣使它不顯示﹖
顯示區域是sumband。用 sh.Visible :=false;不行

 

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-21

• #2

高手都不在家嗎﹖還是不 會呢﹖物在等你們。

 

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #3

大哥幫幫忙呀﹗﹗﹗﹗

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #4

不忙，不要使用Visible，使用Enabled就可以了。没问题的，呵呵。

 

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #5

for:=1 to 2
begin
sh:=TQRshape.Create(frep.sumband);
sh.Parent :=frep.sumband ;
sh.Top :=0;
sh.Left :=i*25;
sh.Width:=10;
sh.Height :=sumband.Height ;
end;
用sh.enable:=false只能使最后一次畫的不顯示﹐我想全部不顯示重新畫﹐請 問怎樣實現﹖

 

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #6

[]

 

W

wuxiuling

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #7

我要哭了﹐沒人回答我的問題。