---Zak---
Скриптер
- Сообщения
- 455
- Репутация
- 120
Добрый всем день.
Уже 3 часа ломаю себе голову, но ничего интересного не придумал.
Имеется скрипт, который выводит png и с возможностью перемещения (взято от сюда - http://autoit-script.ru/index.php/topic,9289.0.html)
Но как на этом всем (картинке) написать текст ?
Уже 3 часа ломаю себе голову, но ничего интересного не придумал.
Имеется скрипт, который выводит png и с возможностью перемещения (взято от сюда - http://autoit-script.ru/index.php/topic,9289.0.html)
Код:
#Include <GUIConstantsEx.au3>
#Include <WindowsConstants.au3>
#include <Misc.au3>
#Include <GDIPlus.au3>
#Include <WinAPIEx.au3>
Global $hForm
Func1()
Do
Until GUIGetMsg() = -3
Func Func1()
_GDIPlus_Startup()
$hPng = _GDIPlus_ImageLoadFromFile(@ScriptDir&"\0.jpg")
$hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hPng)
$hForm = GUICreate('', _GDIPlus_ImageGetWidth($hPng), _GDIPlus_ImageGetHeight($hPng), 200, 200,$WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST))
_WinAPI_UpdateLayeredWindowEx($hForm, 200, 200, $hBitmap, 255, 1)
;~ /////////////////////////
;~ $hGraphic = ????????????????????
;~ _GDIPlus_GraphicsDrawString($hGraphic, "Hello world", 140, 110)
;~ /////////////////////////
_GDIPlus_ImageDispose($hPng)
_GDIPlus_Shutdown()
GUIRegisterMsg($WM_NCHITTEST, 'WM_NCHITTEST')
GUISetState()
WinSetOnTop ( $hForm, "", 1 )
EndFunc
Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
Switch $hWnd
Case $hForm
Return $HTCAPTION
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NCHITTEST
Но как на этом всем (картинке) написать текст ?
Код:
_GDIPlus_GraphicsDrawString($hGraphic, "Hello world", 140, 110)