Borland C++ Builder FAQ
составлен по материалам форума
на sources.ru
TCanvas * DeskTop = new TCanvas; if (DeskTop) { DeskTop->Handle = GetDC(HWND_DESKTOP); DeskTop->Brush->Style = bsClear; DeskTop->Font->Size = 36; DeskTop->Font->Style = TFontStyles() << fsBold; DeskTop->Font->Name = "Lucida Console"; int count = DeskTop->Font->Size*3; int Xit_st = -1; int Yit_st = -1; int X = 50; int Y = 50; for (int y=count;y>0;y--) { int cv = 255-255/y; DeskTop->Font->Color = (TColor)RGB(cv,cv,cv); DeskTop->TextOut(X+Xit_st*y,Y+Yit_st*y,"www.sources.ru"); } ReleaseDC(0, DeskTop->Handle); } delete DeskTop;