
展开全部
添加个label控件,上面写上要闪烁的字。在system选项卡中添加个timer控件,设置它的interval属性完整timer事件的代码如下:procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Font.Color:=rgb(random(255),random(255),random(255));
end;
end.
祝你学习愉快!呵呵
begin
label1.Font.Color:=rgb(random(255),random(255),random(255));
end;
end.
祝你学习愉快!呵呵
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询