[code lang=”delphi”]\/\/Rotating fonts is a straight forward process, so long as the Windows font
\n\/\/ mapper can supply a rotated font based on the font you request. Using a\\
\n\/\/ TrueType font virtually guarantees success.<\/p>\n
\/\/ Here is an example of creating a font that is rotated to
\n\/\/ whatever degree you specify
\nProcedure TForm1.DrawRotatedText(TheCanvas : TCanvas; TheAngle : Integer; TheText : String);
\nvar
\n lf : TLogFont;
\n tf : TFont;
\nbegin
\n with TheCanvas do begin
\n Font.Name := ‘Arial’;
\n Font.Size := 24;
\n Brush.Style := bsClear;
\n tf := TFont.Create;
\n try
\n tf.Assign(Font);
\n GetObject(tf.Handle, sizeof(lf), @lf);
\n lf.lfEscapement := TheAngle * 10;
\n lf.lfOrientation := TheAngle * 10;
\n tf.Handle := CreateFontIndirect(lf);
\n Font.Assign(tf);
\n finally
\n tf.Free;
\n end;
\n TextOut(20, Height div 2, TheText);
\n end;
\nend;<\/p>\n
\/\/ Call it like so
\nprocedure TForm1.RotatedTextClick(Sender: TObject);
\n Var
\n TheAngle : Integer;
\nbegin
\nTheAngle := StrToInt(Edit1.Text);
\n DrawRotatedText(Image2.Canvas, TheAngle, ‘Hello’);
\nend;
\n[\/code]<\/p>\n
[tags]Dephi, Graphic, Fonts[\/tags]<\/p>\n","protected":false},"excerpt":{"rendered":"
[code lang=”delphi”]\/\/Rotating fonts is a straight forward process, so long as the Windows font \/\/ mapper can supply a rotated font based on…<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":""},"categories":[11],"tags":[102,103,101],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p71Tml-2i","_links":{"self":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/142"}],"collection":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/comments?post=142"}],"version-history":[{"count":0,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/142\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/media?parent=142"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/categories?post=142"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/tags?post=142"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}