Четверг, 28.11.2024, 06:41 | Приветствую Вас Гость

...

Код

Главная » Статьи » Autoit

autoit js generator

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Local $hGUI = GUICreate("Example", 700,700)
Local $idMyedit = GUICtrlCreateEdit("" , 0,0, 500,250, $ES_AUTOVSCROLL + $WS_VSCROLL)
Local $idLabel = GUICtrlCreateLabel("путь к изображению",5, 300,250)
Local $idInput = GUICtrlCreateInput("i.jpg", 5, 350, 300, 20)
Local $idButton = GUICtrlCreateButton("создать разметку", 5,400, 150, 25)


GUISetState(@SW_SHOW, $hGUI)


While 1


Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
   ExitLoop
Case $idButton
Local $image = GUICtrlRead($idInput)

Local $q = """"
Local $d =""


$d &= "<html>" & @CRLF & _
"<head>" & @CRLF & _
"<script>" & @CRLF & _
"function myfunc1()" & @CRLF & _
"{" & @CRLF & _
"var i = document.getElementById('myimage');" & @CRLF & _
"i.height+=15;" & @CRLF & _
"i.width+=15;" & @CRLF & _
"}" & @CRLF & _
"</script>"  & @CRLF & _
"</head>" & @CRLF & _
"<body onload=" & $q & "setInterval('myfunc1()', 1000)" & $q & ">" & @CRLF & _
"<center>" & @CRLF & _
"<img id='myimage' height='200' width='200' src='" &$image& "'>" & @CRLF & _
"</center>" & @CRLF & _
"</body>" & @CRLF & _
"</html>"

GUICtrlSetData($idMyedit,$d)


EndSwitch
WEnd

 

Категория: Autoit | Добавил: moskov (03.04.2020)
Просмотров: 185 | Рейтинг: 0.0/0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Меню сайта

Категории раздела

PHP [41]
C++ [71]
Autoit [108]
Processing [105]
Basic4GL [7]
Fasm [2]
PABC [7]
Js [236]
Gentee [1]
Python [204]
Java android [3]
Small Basic [9]

Мини-чат

Статистика


Онлайн всего: 14
Гостей: 14
Пользователей: 0

Форма входа

Друзья сайта

  • ЗОВ КОСМОСА

  • Хулиган Вселенной

  • Тюремная поэзия

  • Религиозная поэзия

  • Сайт клана ЛеГиоН
  • Поиск