Sign in to follow this  
Followers 0
NewForAutoit

WEBOBO create text

1 post in this topic

#1 ·  Posted (edited)

You can create your images into text

With the following script:

#include <GUIConstants.au3>
#include <IE.au3>
Opt("TrayMenuMode", 1)
$reduireitfem = TrayCreateItem("WEBOBO CREAT")
$rffehh = TrayCreateItem("Version 0.1")
$oIE = _IECreateEmbedded ()
$Form1 = GUICreate("WEBOBO CREAT", 387, 317, 193, 125)
$Label1 = GUICtrlCreateLabel("WEBOBO CREAT TEXT", 24, 8, 313, 26)
GUICtrlSetFont(-1, 14, 400, 0, "Aerial")
$Input1 = GUICtrlCreateInput("Your Text", 40, 72, 281, 21)
$Label2 = GUICtrlCreateLabel("Your Text :", 32, 48, 53, 17)
$Button1 = GUICtrlCreateButton("Creat", 288, 104, 57, 17, 0)
$Label3 = GUICtrlCreateLabel("Resultat :", 32, 104, 49, 17)
$GUIActiveX = GUICtrlCreateObj($oIE, 32, 128, 329, 161)
GUISetState(@SW_SHOW)
_IENavigate ($oIE, "http://www.webobo.com/modeles/banniere.php?text=Your Text")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
_IENavigate ($oIE, "http://www.webobo.com/modeles/banniere.php?text="&GUICtrlRead($Input1))
EndSwitch
WEnd
Edited by NewForAutoit

Share this post


Link to post
Share on other sites



Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0