mig33 aceh
Login

Lupa password?

December 2016
SunMonTueWedThuFriSat
    123
45678910
11121314151617
18192021222324
25262728293031

Calendar Calendar

mig33aceh chatbox

ShoutMix chat widget
Histats

silahkan d coba bossssssss

Topik sebelumnya Topik selanjutnya Go down

silahkan d coba bossssssss

Post by off_stupid on Sun Jan 17, 2010 8:57 am

Code:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$XSkinGui = GUICreate("forum lon", 780, 580)
Example()
Func Example()
Local $oIE, $GUIActiveX, $GUI_Button_Back, $GUI_Button_Forward
Local $GUI_Button_Home, $GUI_Button_Stop, $msg
$oIE = ObjCreate("Shell.Explorer.2")
$GUIActiveX = GUICtrlCreateObj ($oIE, 21, 26, 735, 503)
$GUI_Button_Back = GUICtrlCreateButton("Back", 22, 553, 90, 22)
  GUICtrlSetCursor (-1, 0)
  GUICtrlSetColor(-1, 0xFF0000)
  GUICtrlSetFont(-1, 10, 800, 0, "Arial")
$GUI_Button_Forward = GUICtrlCreateButton("Forward", 112, 553, 90, 22)
  GUICtrlSetCursor (-1, 0)
  GUICtrlSetColor(-1, 0xFF0000)
  GUICtrlSetFont(-1, 10, 800, 0, "Arial")
$GUI_Button_Home = GUICtrlCreateButton("Home", 202, 553, 90, 22)
  GUICtrlSetCursor (-1, 0)
  GUICtrlSetColor(-1, 0xFF0000)
  GUICtrlSetFont(-1, 10, 800, 0, "Arial")
$GUI_Button_Stop = GUICtrlCreateButton("Stop", 292, 553, 90, 22)
  GUICtrlSetCursor (-1, 0)
  GUICtrlSetColor(-1, 0xFF0000)
  GUICtrlSetFont(-1, 10, 800, 0, "Arial")
GUISetState(@SW_SHOW)
$oIE.navigate("[url=http://www.mig33aceh.co.cc]http://www.mig33aceh.co.cc[/url]")
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $GUI_Button_Home
$oIE.navigate("[url=http://www.mig33aceh.co.cc]http://www.mig33aceh.co.cc[/url]")
Case $msg = $GUI_Button_Back
$oIE.GoBack
Case $msg = $GUI_Button_Forward
$oIE.GoForward
Case $msg = $GUI_Button_Stop
$oIE.Stop
EndSelect
WEnd
GUIDelete()
EndFunc

off_stupid
TheLovers

Male
Jumlah posting : 97
Age : 29
Nick mig33 : off_stupid
Registration date : 08.12.08

Lihat profil user

Kembali Ke Atas Go down

Re: silahkan d coba bossssssss

Post by zip on Sat Feb 20, 2010 7:26 pm

apaan tuh :s qu nag baru jadi kurang ngerti ne

zip
TheLovers

Male
Jumlah posting : 80
Age : 26
Lokasi : Lhokseumawe
Job/hobbies : Chat with mig33
Registration date : 15.11.09

Lihat profil user http://teamphan.wen.ru

Kembali Ke Atas Go down

Topik sebelumnya Topik selanjutnya Kembali Ke Atas


 
Permissions in this forum:
Anda tidak dapat menjawab topik