我想使label1.Caption实现一闪一闪的效果。。。 。。。？特急！！！(100分)

H

hzyingmu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #1

我想使label1.Caption实现一闪一闪的效果，且亮和灭的时间间隔可控制，不知如何实现？
请高手赐教！请详细说明！谢谢！

 

K

Kent

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #2

加个Timer控件,在定时触发的事件里面控制即可...

 

Z

zjc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #3

写段代码，不知合不合你意
var flash:boolean;
procedure TForm1.Button1Click(Sender: TObject);
begin
flash:=true;
timer1.Enabled :=true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if flash then
label1.Font.color:=clred
else
label1.Font.color:=clnone;
flash:=not flash;
end;

 

Z

zengr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #4

用timer自动生成,稍加改造，如增加一些功能键，或按钮来控制字体颜色、闪动凭率等。
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, StdCtrls;

type
TForm1 = class(TForm)
Label1: TLabel;
Timer1: TTimer;
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Enabled := not label1.enabled;
end;

end.

 

M

mantousoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #5

好难！

 

少

少爷的拐杖

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #6

这种问题。。
加TTIME空间控制VISABLE嘛。。

 

刃

刃血

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #7

来晚了

 

H

hamsoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-05

• #8

网上有现成构件,但一时想不起，用搜索引擎

 

I

ilovedelphi4

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #9

AHM元件包里就有！

 

J

Jams

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #10

>>

 

郭

郭玉梁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #11

还是Timer省事，现成控件也有，ExtraForms的包有。

 

B

boys2man

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #12

timer will be better

 

H

huiboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #13

TIMER太....
劝你制作动画或更换图片或用GIF。

 

笑

笑傲江湖

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-06

• #14

如果你需要写一个有比较花哨的界面的软件
如教学游戏类,干脆找一个第三方的控件包,省时省力
你说的这种东西,DELPHI深度历险上就有好多.

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-15

• #15

多人接受答案了。

 

W

wsn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-16

• #16

》》