Что нового

Браузер. При запуске браузера своя картинка

Романыч

Новичок
Сообщения
35
Репутация
1
Здраствуйте дорогие жители форума. Столкнулся с такой проблемой, возможно ли реализовать примерно такое: запускается програма, в ней встроеный IE, хочу чтоб отоброжалась в браузере моя картинка, а потом там на кнопку нажал ну и поехало)
Код типо:
Код:
$oIE.navigate("http://сайт.ру/brauzer.jpg")

не подходит, ну сами понимаете. Картинку отображает ну не корректно.
Спасибо.
 

---Zak---

Скриптер
Сообщения
455
Репутация
120
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

;~ Загружаем необходимый файл из инета на ПК
InetGet("http://cs308523.userapi.com/u95937250/a_22cb87a7.jpg", @TempDir & "\brauzer.jpg")
;~ Создаем форму
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
;~ Создаем кнопку
$Button1 = GUICtrlCreateButton("Button1", 536, 408, 75, 25)
;~ Создаем окно для изображения | 151, 312 - это размер изображения...
$Pic1 = GUICtrlCreatePic(@TempDir & "\brauzer.jpg", 200, 72, 151, 312)
GUISetState(@SW_SHOW)


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			MsgBox(0, "Button", "Click BUTTON !!!")
	EndSwitch
WEnd


Как узнать размер изображения - можно посмотрев в топике: http://autoit-script.ru/index.php?topic=2748.0
 
Автор
Р

Романыч

Новичок
Сообщения
35
Репутация
1
Zak, идея хорошая, но это не то, картинка то не убирается при нажатии кнопки с места с координатами x,y Тема открыта.
 

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
Так?
Код:
$Form1 = GUICreate("Form1", 619, 440)
$oIE = ObjCreate("Shell.Explorer.2")
$oIE_ctrl = GUICtrlCreateObj($oIE, 0, 0, 618, 404)
$Button1 = GUICtrlCreateButton("Button1", 280, 408, 75, 25)
$oIE.Navigate('http://сайт.ру/brauzer.jpg')
GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case $Button1
			;Действие
	EndSwitch
WEnd
 

defens

Знающий
Сообщения
89
Репутация
5
если так:
Код:
;~ Загружаем необходимый файл из инета на ПК
InetGet("http://cs308523.userapi.com/u95937250/a_22cb87a7.jpg", @TempDir & "\brauzer.jpg")
;~ Создаем форму
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
;~ Создаем кнопку
$oIE = _IECreateEmbedded() ;выбор браузера
GUICtrlCreateObj($oIE, 623, 442, 192, 124) ;Создаёт элемент ActiveX в GUI
$Button1 = GUICtrlCreateButton("Button1", 536, 408, 75, 25)
;~ Создаем окно для изображения | 151, 312 - это размер изображения...
$Pic1 = GUICtrlCreatePic(@TempDir & "\brauzer.jpg", 200, 72, 151, 312)
GUISetState(@SW_SHOW)


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
               _IENavigate($oIE, 'http:.......')

    EndSwitch
WEnd

то ошибку пишет в консоли
C:\Program Files (x86)\AutoIt3\Include\IE.au3 (854) : ==> Variable must be of type "Object".:
Local $found = 0, $linktext, $links = $:shok:bject.document.links


Добавлено:
Сообщение автоматически объединено:

Zaramot
с Вашим ошибку пишет в консоли
D:\HOOTERS\Desktop\on\all-mail\H???? ???? ??????!.au3 (69) : ==> Expected a "=" operator in assignment statement.:
$Obj1.Navigate('http://ее.ru/Pictures/Screen.jpg')
 
Верх