Что нового

Как в окне блокнота вывести текст заданным размером шрифта?

Tapok

Чайник
Сообщения
203
Репутация
0
Как в окне блокнота вывести текст заданным размером шрифта?
 

belotooth

Чайник
Сообщения
7
Репутация
0
Можно сменить через реестр перед запуском.

Код:
;~ сохраняем старое значение
$backup = RegRead("HKCU\SOFTWARE\Microsoft\Notepad", "iPointSize")
;~ устанавливаем размер шрифта, тут 20 (нужный размер надо умножить на 10)
RegWrite("HKCU\SOFTWARE\Microsoft\Notepad", "iPointSize", "REG_DWORD", 200) 
;~ запускаем блокнот
Run("notepad.exe") 
;~ ждем появления окна
WinWaitActive("Безымянный — Блокнот")
;~ печатаем текст
Send("Это текст написан 20 шрифтом.")
Sleep(2000)
;~ еще раз меняем шрифт
RegWrite("HKCU\SOFTWARE\Microsoft\Notepad", "iPointSize", "REG_DWORD", 300) 
Run("notepad.exe") 
;~ ждем появления окна
WinWaitActive("Безымянный — Блокнот")
;~ печатаем текст
Send("Это текст написан 30 шрифтом.")
;~ восстанавливаем старое значение
RegWrite("HKCU\SOFTWARE\Microsoft\Notepad", "iPointSize", "REG_DWORD", $backup)
 
АТ
T

Tapok

Чайник
Сообщения
203
Репутация
0
belotooth, большое спасибо!
 
Верх