在桌面上显示字幕。。。
类似于酷狗的歌词显示，不过只是汉字的移动而已。。。

学习一下
void __fastcall TForm1::FormPaint(TObject *Sender)
{
    Canvas->Brush->Color = clWhite;  // 透明色
    Canvas->FillRect(ClientRect);
    Canvas->Font->Height = 76;
    Canvas->Font->Style = TFontStyles() < <fsBold;
    Canvas->TextOut(0,0,"Hello");  // 写字
}

引用 1 楼 Waiting4you 的回复:

Form1的TransparentColor属性设为true;
TransparentColorValue属性设为要透明的颜色，比如白色。

Form1的OnPaint事件里写字:

C/C++ codevoid __fastcall TForm1::FormPaint(TObject *Sender)
{
    Canvas->Brush->Color = clWhite;  // 透明色
    Canvas->FillRect(ClientRect);
    Canvas->Font->Height = 76;
    Canvas->Font->Style = TFontStyles() < <fsBold;
    Canvas->TextOut(0,0,"Hello");  // 写字…

高手啊。。什么都会。。为什么设置这个没用。
  TCanvas *pCanvas = Label1->Canvas;

    pCanvas->Brush->Style = bsClear;  // 文字背景透明
    pCanvas->Font->Color = clBlue;

    pCanvas->Font->Handle = CreateFont(
        36,
        72,
        0,
        0,
        FW_DONTCARE,
        FALSE,
        FALSE,
        FALSE,
        GB2312_CHARSET,
        OUT_DEFAULT_PRECIS,
        CLIP_DEFAULT_PRECIS,
        PROOF_QUALITY,//DEFAULT_QUALITY,
        DEFAULT_PITCH &brvbarFF_DONTCARE,
        "宋体"
    );

要对Label1操作？直接这样就行了:

C/C++ code

    Label1->Font->Handle = CreateFont(
        36,
        72,
        0,
        0,
        FW_DONTCARE,
        FALSE,
        FALSE,
        FALSE,
        GB2312_CHARSET,
        OUT_DEFAULT_PRECIS,
        CLIP_DEFAULT_PRECIS,
        PROOF_QUALITY,
        DEFAULT_PITCH|FF_DONTCARE,
        "宋体"
    );
    Label1->Font->Color = clBlue;
    Label1->Transparent = true;

btw,如果你在这里混久了也"什么都会"了

好了。。这个贴也可以结了。。