Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Как текст на кнопке расположить под заданным углом?

01.01.2007
Как выдать текст под наклоном?

Чтобы вывести под любым углом текст необходимо использовать TrueType Fonts (например «Arial»). Например:

var
 
LogFont: TLogFont;
begin
 
GetObject(Canvas.Font.Handle, SizeOf(TLogFont), @LogFont);
 
{Вывести текст 1/10 градуса против часовой стрелки}
 
LogFont.lfEscapement := Angle * 10;
 
Canvas.Font.Handle := CreateFontIndirect(LogFont);
end;

https://delphiworld.narod.ru/

DelphiWorld 6.0