Search results for 'Rotated Text Drawing'. 1 post(s) found.
- 2007/09/11 How to draw rotated text
How to draw rotated text
This example creates a rotated font and displays it on the form by assigning the handle of the rotated to the Form’s Canvas Font via the Font’s Handle property. Rotating fonts is a straightforward process, so long as the Windows Font Mapper can supply a rotated font based on the font you request.
If you are using a TrueType font there is virtually no reason for failure.
var
lf: LOGFONT; // Windows native font structure
begin
Canvas.Brush.Style := bsClear; // set the brush style to transparent
FillChar(Addr(lf), SizeOf(lf), Byte(0)) ;
lf.lfHeight := 20;
lf.lfEscapement := 10 * 45; // degrees to rotate
lf.lfOrientation := 10 * 45;
lf.lfCharSet := DEFAULT_CHARSET;
StrCpy(lf.lfFaceName, 'Tahoma') ;
Canvas.Font.Handle := CreateFontIndirect(Addr(lf)) ;
Canvas.TextOut(10, 100, 'Rotated text') ; // output the rotated font
end;
lf: LOGFONT; // Windows native font structure
begin
Canvas.Brush.Style := bsClear; // set the brush style to transparent
FillChar(Addr(lf), SizeOf(lf), Byte(0)) ;
lf.lfHeight := 20;
lf.lfEscapement := 10 * 45; // degrees to rotate
lf.lfOrientation := 10 * 45;
lf.lfCharSet := DEFAULT_CHARSET;
StrCpy(lf.lfFaceName, 'Tahoma') ;
Canvas.Font.Handle := CreateFontIndirect(Addr(lf)) ;
Canvas.TextOut(10, 100, 'Rotated text') ; // output the rotated font
end;
Another posts included in "Delphi"
| How to draw transparent text on Windows Desktop (0) | 2007/09/11 |
| Extract an icon from an Windows application and paint on a Form (0) | 2007/09/11 |
| How to convert HIcon to TIcon ? (0) | 2007/09/11 |
| How to convert an ICO to a BMP (0) | 2007/09/11 |
| How to Convert Pixels to Millimeters (0) | 2007/09/11 |
| How to capture Windows Desktop to Bitmap (0) | 2007/09/11 |
| Cut a rectangle from an Image to Clipboard (0) | 2007/09/11 |
| Convert TColor to Hex & Hex to TColor (0) | 2007/09/11 |
Trackback : Cannot send a trackbact to this post.
-
Subject different money making ideas
2010/01/29 05:25
moneyideas
-
Subject different money making ideas
2010/01/29 14:10
moneyideas
-
Subject different money making ideas
2010/01/31 16:39
moneyideas
Prev
Rss Feed