Вот держи пример пример.
Код
FontFile := "TEST.TTF" ; указать путь к файлу со шрифтом
FontName := "WarfaceRegularEnglish" ; указать имя шрифта из файла
if !DllCall("AddFontResourceEx", Str, FontFile, UInt, FR_PRIVATE := 0x10, Ptr, 0)
{
MsgBox, % "Не удалось установить шрифт. Ошибка " . A_LastError
return
}
SendMessage, WM_FONTCHANGE := 0x1D, 0, 0,, % "ahk_id" HWND_BROADCAST := 0xFFFF
Gui, -Caption +ToolWindow +LastFound +AlwaysOnTop
Gui, Color, 0x0000FD
Gui, Font, s80 q3, % FontName
Gui, Add, Text, cRed, шестёрка бубей
WinSet, TransColor, 0x0000FD
Gui, Show
Return
Esc::ExitApp
