一个界面装饰问题(40分)

请问用什么控件可以做到一个界面效果。
显示一行文字，想霓虹灯的效果，从屏幕一头走到另一头。在网站上面有很多可以看见的。请问在form上面如何实现类似的效果。

可以下一个字幕控件,

晕，真的这么难吗？我看见有很多软件都有这种效果。。。。。。

用LABEL控件加TIME控件不就行了吗?

rxlibford7 可以，
找不到的话可以发给你一份

raize控件就有，叫animate label还是什么的，DEMO里面有演示。
www.51delphi.com有下。

要什么控件
lable+time

unit Unit1;

interface

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

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

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption:='测试';
Label1.Font.Color:=clRed;
Label1.Font.Size:=20;
Label1.AutoSize:=true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if Label1.Left < Width then
Label1.Left:=Label1.Left+1
else
Label1.Left:=0;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Interval:=100;
Timer1.Enabled:=true;
end;

end.