Jump to content

Recommended Posts

Posted

My current code is

; Press Esc to terminate script, Pause/Break to "pause"
;
; ----------------------------------------------------------------------------
;   AutoIt Version: 3.3.6.1
;   Author: BakedBeanss0802
; ----------------------------------------------------------------------------
#include <INet.au3>
#include <GuiButton.au3>
#include <GuiToolBar.au3>
#include <GuiConstantsEx.au3>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

GuiCreate("RandomTyper",314,299,585,333)
$button1=GuiCtrlCreateButton("About",254,6,40,18)
$button2=GuiCtrlCreateButton("Start Typing",65,232,183,50)
$input1=GuiCtrlCreateInput("hi",44,112,138,20)
$label1=GuiCtrlCreateLabel("typing",100,25,94,15)
$label2=GuiCtrlCreateLabel("How to Setup",56,52,260,15)
$label3=GuiCtrlCreateLabel("1. open notepad",7,73,180,15)
$label4=GuiCtrlCreateLabel("2. what do you want to type?",6,94,224,15)
GuiSetState()
While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
Wend

Func button1()
MsgBox(32, "-About", "Program Created by BakedBeanss0802")
EndFunc
Func button2()
if $input1 = "hello" Then
  MsgBox(32, "-About", "LOLOLOLOL")
Else
   MsgBox(32, "-About", "Program Crea12342313214dBeanss0802")
   endif
EndFunc

No matter what I put in input box, it says MsgBox(32, "-About", "Program Crea12342313214dBeanss0802")

Posted

GUICtrlRead() would help!

; Press Esc to terminate script, Pause/Break to "pause"
;
; ----------------------------------------------------------------------------
;   AutoIt Version: 3.3.6.1
;   Author: BakedBeanss0802
; ----------------------------------------------------------------------------
#include <INet.au3>
#include <GuiButton.au3>
#include <GuiToolBar.au3>
#include <GuiConstantsEx.au3>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
GuiCreate("RandomTyper",314,299,585,333)
$button1=GuiCtrlCreateButton("About",254,6,40,18)
$button2=GuiCtrlCreateButton("Start Typing",65,232,183,50)
$input1=GuiCtrlCreateInput("hi",44,112,138,20)
$label1=GuiCtrlCreateLabel("typing",100,25,94,15)
$label2=GuiCtrlCreateLabel("How to Setup",56,52,260,15)
$label3=GuiCtrlCreateLabel("1. open notepad",7,73,180,15)
$label4=GuiCtrlCreateLabel("2. what do you want to type?",6,94,224,15)
GuiSetState()
While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
Wend
Func button1()
MsgBox(32, "-About", "Program Created by BakedBeanss0802")
EndFunc
Func button2()
if GUICtrlRead($input1) = "hello" Then
  MsgBox(32, "-About", "LOLOLOLOL")
Else
   MsgBox(32, "-About", GUICtrlRead($input1))
   endif
EndFunc

UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Posted

GUICtrlRead() would help!

; Press Esc to terminate script, Pause/Break to "pause"
;
; ----------------------------------------------------------------------------
;   AutoIt Version: 3.3.6.1
;   Author: BakedBeanss0802
; ----------------------------------------------------------------------------
#include <INet.au3>
#include <GuiButton.au3>
#include <GuiToolBar.au3>
#include <GuiConstantsEx.au3>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
GuiCreate("RandomTyper",314,299,585,333)
$button1=GuiCtrlCreateButton("About",254,6,40,18)
$button2=GuiCtrlCreateButton("Start Typing",65,232,183,50)
$input1=GuiCtrlCreateInput("hi",44,112,138,20)
$label1=GuiCtrlCreateLabel("typing",100,25,94,15)
$label2=GuiCtrlCreateLabel("How to Setup",56,52,260,15)
$label3=GuiCtrlCreateLabel("1. open notepad",7,73,180,15)
$label4=GuiCtrlCreateLabel("2. what do you want to type?",6,94,224,15)
GuiSetState()
While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
Wend
Func button1()
MsgBox(32, "-About", "Program Created by BakedBeanss0802")
EndFunc
Func button2()
if GUICtrlRead($input1) = "hello" Then
  MsgBox(32, "-About", "LOLOLOLOL")
Else
   MsgBox(32, "-About", GUICtrlRead($input1))
   endif
EndFunc

Oh, Thank you darlin =P

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
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...