Тема: AHK: создание изображений
Есть ли примеры реализации создания изображений с каким-либо текстом?
Например, функция пишет текущее время в файл time.jpg. То-есть аналог библиотеки GD2 на PHP.
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Есть ли примеры реализации создания изображений с каким-либо текстом?
Например, функция пишет текущее время в файл time.jpg. То-есть аналог библиотеки GD2 на PHP.
Есть http://www.autohotkey.com/forum/topic32238.html, но это вроде не совсем то...
Первое, что в голову приходит - через Paint. ![]()
Сможете такое написать? Я нет)
Можно обратиться к теме AutoHotkey: Сохранить маленький произвольный кусок экрана http://forum.script-coding.com/viewtopi … 28&p=3.
F12::
FileName := A_DD "." A_MM "." A_YEAR "=" A_Hour "Hour" A_Min "Min" A_Sec "Sec.bmp"
DetectHiddenWindows, On
SendInput {PRINTSCREEN} ; снимок всего экрана (PrtSc)
FileAppend,, %FileName%
Run, MSPaint %FileName%,, Hide
WinWait, ahk_class MSPaintApp
PostMessage, 0x111, 57637, 0, , ahk_class MSPaintApp
PostMessage, 0x111, 57603, 0, , ahk_class MSPaintApp
PostMessage, 0x111, 57665, 0, , ahk_class MSPaintApp
ReturnОстаётся только воспользоваться инструментом "Надпись". Возможно, придётся отказаться от скрытого окна.
Есть http://www.autohotkey.com/forum/topic32238.html, но это вроде не совсем то...
Да ладно? ![]()
#NoEnv
SetBatchLines, -1
Text = Текущее время`n`n %A_Hour%:%A_Min%:%A_Sec%
File = %A_Desktop%\Time.jpg
; Uncomment if Gdip.ahk is not in your standard library
;#Include, Gdip.ahk
; Start gdi+
If !pToken := Gdip_Startup()
{
MsgBox, 48, gdiplus error!, Gdiplus failed to start. Please ensure you have gdiplus on your system
ExitApp
}
; Create a 300x300 pixel gdi+ bitmap
pBitmap := Gdip_CreateBitmap(300, 300)
; Get a pointer to the graphics of the bitmap, for use with drawing functions
G := Gdip_GraphicsFromImage(pBitmap)
; Set the smoothing mode to antialias = 4 to make shapes appear smoother (only used for vector drawing and filling)
Gdip_SetSmoothingMode(G, 4)
; Create a blue brush
pBrush := Gdip_BrushCreateSolid(0xff0000ff)
Gdip_FillRectangle(G, pBrush, 0, 0, 300, 300)
Gdip_DeleteBrush(pBrush)
Gdip_TextToGraphics(G, Text, "x36 y0 w300 h300 cffffffff r4 s30 Italic vCenter", "Arial")
Gdip_SaveBitmapToFile(pBitmap, File, 100)
; The bitmap can be deleted
Gdip_DisposeImage(pBitmap)
; The graphics may now be deleted
Gdip_DeleteGraphics(G)
; ...and gdi+ may now be shutdown
Gdip_Shutdown(pToken)
ExitApp
ReturnСпасибо!
Не смог разобратся.
Как мне на моём рисунке, в нужных координатах вставить например другой рисунок с нужным (заданным скриптом) размером?
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться