Club Builder

[TOÑO]

//Solo funciona con fuentes True type
int Rotar = 45; // Nº de grados de rotacion
AnsiString Text = "Hola";
TRect Area = ClientRect;

LOGFONT lf;
Canvas->Brush->Style = bsClear;
ZeroMemory(&lf, sizeof(LOGFONT));
lf.lfEscapement = 10 * Rotar;
lf.lfOrientation = 10 * 15;
lf.lfHeight = Canvas ->Font ->Height;
lf.lfCharSet = Canvas ->Font ->Charset;
strcpy(lf.lfFaceName, Canvas ->Font
->Name.c_str());
Canvas->Font->Handle = CreateFontIndirect (&lf);

//visualizar el texto

DrawText(Canvas->Handle, Text.c_str(), strlen(Text.c_str()),
&Area, DT_CENTER | DT_VCENTER | DT_SINGLELINE);

Canvas ->TextOut(0, 0, Text);