Что нового

Как переместить в центр формы флеш игру?

scanfail

Знающий
Сообщения
244
Репутация
17
Как переместить в центр формы флеш игру?

Хочется чтобы было вот так(Скрин):
53ea3fa7ac43.jpg

А у меня вот так(Скрин):
9bb8069c62fa.jpg

Исходник:
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$oIE = ObjCreate("Shell.Explorer.2")
GUICreate("Zombie Dolls", 638, 419, 348, 124)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 700, 500)
GUISetState()
$oIE.navigate("http://www.flash-game.net/game/5275/zombie-dolls.html")
While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd


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

Решил проблему другим способом.
 

Whited

Знающий
Сообщения
79
Репутация
10
Ну напиши как решил проблему, ведь другим тоже будет интересно. :ok:
 
Автор
S

scanfail

Знающий
Сообщения
244
Репутация
17
Whited [?]
Ну напиши как решил проблему, ведь другим тоже будет интересно.
good.gif

Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <_XMLDomWrapper.au3>
#include <Array.au3>
#include <WinAPI.au3>

Opt("CaretCoordMode", 0)
Opt("GUIOnEventMode", 1)
Global $busy = True

HotKeySet("{Esc}", "terminate")

$oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash")
$gui = GUICreate ("Test", 820, 538, -1, -1)

$GUIActiveX = GUICtrlCreateObj( $oRP, 0, 0, 820 , 600)

;prefix

$SinkObject=ObjEvent($oRP, "Flash_")

With $oRP; Object tag pool
    ;.bgcolor = "#000000"; change background color to white FFFFFF
    .Movie = "http://www.tinybrute.com/files/games/zombie-dolls.swf";
    ;.ScaleMode = 3
    .Loop = False
    .wmode = "transparent"; Opaque / transparent
	.allowScriptAccess = "Always"
EndWith

GUISetOnEvent($GUI_EVENT_CLOSE, "closeTest");Set close handler for AI GUI

sleep(500)

GUISetState ();Show GUI
GUISetBkColor(0xffffff)

While $busy

Sleep(10)
WEnd

Func closeTest();Close GUI Event Handler
    $busy = False
    GUIDelete()
 EndFunc ;==>closeTest
 

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Этот обрывок кода не работает даже после исправления ошибок.
 
Автор
S

scanfail

Знающий
Сообщения
244
Репутация
17
C2H5OH [?]
Этот обрывок кода не работает даже после исправления ошибок.
:shok: У меня все отлично работает...


Был бы благодарен, если бы ты выложил исправленную версию ;)
 

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Та чё там выкладывать.
Ты скопируй да запусти, - AutoIt сразу отругается
Код:
ERROR: ...(): undefined function.
 
Автор
S

scanfail

Знающий
Сообщения
244
Репутация
17
C2H5OH [?]
Та чё там выкладывать.Ты скопируй да запусти, - AutoIt сразу отругается
Код: [Выделить]
ERROR: ...(): undefined function.
Странно... У меня все нормально запускается.

Попробуй скачать _XMLDomWrapper.au3 и закинуть в Include.
 

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Та скачал, скачал, как же без неё. :laugh:

AutoIt ругается на
Код:
C:\test.au3(11,28) : ERROR: bot(): undefined function.
HotKeySet("{Insert}", "bot")
~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\test.au3(12,31) : ERROR: terminate(): undefined function.
HotKeySet("{Esc}", "terminate")
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

А когда я их убираю, то у меня получается

:(


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

Хм. А с картинкой вместо swf получилось.
swf сейчас вообще не запускается!!! :shok:
Видать кто-то из админов у меня по компу прошелся...
:(
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
scanfail
Можно весь код посмотреть? Интересно просто, до какого уровня ваш бот доходит :smile:
 
Автор
S

scanfail

Знающий
Сообщения
244
Репутация
17
Я его начал с самого начала переписывать, надеюсь скоро выложить (если время найду) ;D
 
Верх