三毛，你要的代码

[rh]

在桌面上移动的字幕
你选择用透明窗体方法
不如直接把窗体区域设置成文字的形状
或者对桌面的HDC操作（好麻烦！）
这样做：
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
//下面是要设置窗体区域为我们想要说的话
HRGN hRgn;
AnsiString Text = "看我会动耶！哈哈哈哈！";
BeginPath(Canvas->Handle);
SetBkMode(Canvas->Handle,TRANSPARENT);
Canvas->Font->Name = "楷体_GB2312";
Canvas->Font->Style = Canvas->Font->Style<<fsBold;
Canvas->Font->Size = 66;
Canvas->TextOut(1,1, Text);
EndPath(Canvas->Handle);
hRgn = PathToRegion(Canvas->Handle);
SetWindowRgn(Handle,hRgn,true);
Width = Canvas->TextWidth(Text);
DeleteObject(hRgn);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Top++;
}
//---------------------------------------------------------------------------

ok？

[Sammo]

谢谢！！！我试试去！！！:)

[Sammo]

非常感谢！！
已经可以啦！！！！！：）