Laymanball Posted October 15, 2011 Share Posted October 15, 2011 (edited) MyScript. NotepadArrayDisplay Library Function ;================Script sample=============== MsgBox(64, "", "Vert Array") Dim $Array[4] $Array[0]=1 $Array[1]=2 $Array[2]=3 $Array[3]=4 _NotepadArrayDisPlay($Array, "Array Display") MsgBox(64, "", "Hori Array") Dim $Array[4]=["A","B","C","D"] _NotepadArrayDisPlay($Array, "Array Display") ;===============Notepad Array Display Library================ Global $Array, $Title Func _NotepadArrayDisPlay($Array, $Title) Dim $Output="", $Element For $Element In $Array $Output=$Output&$Array&$Element&@CRLF Next Run("Notepad.exe") WinWaitActive("[Class:Notepad]") WinSetTitle("[Class:Notepad]", "", $Title) ControlSetText("[Class:Notepad]", "", "Edit1", $Output) EndFunc ;NotepadArrayDisplay Auto Sending : HighLight text (Select All)on the Edit (Notepad) Local $TextMessage = "Hello World!"&@CRLF&"I Love AutoIt"&@CRLF&"Laymanball" Local $TextEdit = "Notepad.exe" Local $FileInfo = "readme.txt" If FileExists($FileInfo)Then FileDelete($FileInfo) If Not ProcessExists($TextEdit)Then Run($TextEdit) WinWait("[Class:Notepad]") ControlSetText("[Class:Notepad]", "", "Edit1", $TextMessage) Sleep(1000) WinMenuSelectItem("[Class:Notepad]", "", "&Edit", "Select &All") Sleep(1000) WinMenuSelectItem("[Class:Notepad]", "", "&File", "&Save") WinWait("Save As") ControlFocus("Save As", "", "[CLASS:Edit; INSTANCE:1]"&Send("readme.txt")) Sleep(1000) ControlFocus("Save As", "", "[CLASS:Edit; INSTANCE:2]"&Send("{Enter}")) Sleep(1000) WinClose("[Class:Notepad]") Sleep(1000) ShellExecute($FileInfo) WinWait("[Class:Notepad]") WinSetTitle("[Class:Notepad]", "", "readme.txt - ready") Edited October 16, 2011 by Laymanball My Sample Script Download: VistaDesktopIconsChangerForXp.au3 (Com,Doc and Bin only) http://www.4shared.com/rar/NMHYL5Igba/VistaDesktopIconsChangerForXp_.html VistaDesktopIconsChangerForXp.exe (Resources) http://www.4shared.com/rar/nzs7Mb1gba/VistaDesktopIconsChangerForXp_.html Link to comment Share on other sites More sharing options...
JohnOne Posted October 15, 2011 Share Posted October 15, 2011 What about it? AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Laymanball Posted October 15, 2011 Author Share Posted October 15, 2011 Use for sending text to the Notepad by Array command. My Sample Script Download: VistaDesktopIconsChangerForXp.au3 (Com,Doc and Bin only) http://www.4shared.com/rar/NMHYL5Igba/VistaDesktopIconsChangerForXp_.html VistaDesktopIconsChangerForXp.exe (Resources) http://www.4shared.com/rar/nzs7Mb1gba/VistaDesktopIconsChangerForXp_.html Link to comment Share on other sites More sharing options...
JohnOne Posted October 15, 2011 Share Posted October 15, 2011 Okay, are you having a problem with it? AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Ramzes Posted October 15, 2011 Share Posted October 15, 2011 Where is a question? It's General Help and Support forum.If you want to show your code write here. But please don't post this script there. Your code is useless. Sorry for my bad English but nobody is perfect. [font=arial, helvetica, sans-serif]Ramzes[/font] Link to comment Share on other sites More sharing options...
Mikeman27294 Posted October 15, 2011 Share Posted October 15, 2011 Also, if you mean for this to be an example script, you should explain what it does so that people can use it, rather than just look straight past the script, because most people wont read the script, but the explaination. Link to comment Share on other sites More sharing options...
JohnOne Posted October 15, 2011 Share Posted October 15, 2011 Where is a question? It's General Help and Support forum.<br> If you want to show your code write <a data-cke-saved-href="forum/9-example-scripts/" href="forum/9-example-scripts/" class="bbc_url" title="">here</a>. But please don't post this script there. Your code is useless. Turns out the OP is barred from posting rubbish scripts in example forums. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Laymanball Posted October 16, 2011 Author Share Posted October 16, 2011 (edited) Okay, are you having a problem with it?Yes, I'm having a problem with it.I can't writting array2d sending to the notepad.Please help me. Edited October 16, 2011 by Laymanball My Sample Script Download: VistaDesktopIconsChangerForXp.au3 (Com,Doc and Bin only) http://www.4shared.com/rar/NMHYL5Igba/VistaDesktopIconsChangerForXp_.html VistaDesktopIconsChangerForXp.exe (Resources) http://www.4shared.com/rar/nzs7Mb1gba/VistaDesktopIconsChangerForXp_.html Link to comment Share on other sites More sharing options...
Laymanball Posted October 16, 2011 Author Share Posted October 16, 2011 (edited) My script is rubbish scripts in the forums?!?. yes or no? Please open wide. For beginners. Edited October 16, 2011 by Laymanball My Sample Script Download: VistaDesktopIconsChangerForXp.au3 (Com,Doc and Bin only) http://www.4shared.com/rar/NMHYL5Igba/VistaDesktopIconsChangerForXp_.html VistaDesktopIconsChangerForXp.exe (Resources) http://www.4shared.com/rar/nzs7Mb1gba/VistaDesktopIconsChangerForXp_.html Link to comment Share on other sites More sharing options...
JohnOne Posted October 16, 2011 Share Posted October 16, 2011 #include <Array.au3> ;================Script sample=============== ;MsgBox(64, "", "Vert Array") ;Dim $Array[4] ;$Array[0]=1 ;$Array[1]=2 ;$Array[2]=3 ;$Array[3]=4 ;_NotepadArrayDisPlay($Array, "Array Display") MsgBox(64, "", "Hori Array") Dim $Array[4][2] = [["A", 1],["B", 2],["C", 3],["D", 4]] ; you can make your 2D array like this _NotepadArrayDisPlay($Array, "Array Display") ;===============Notepad Array Display Library================ Global $Array, $Title Func _NotepadArrayDisPlay($Array, $Title) Dim $Output = "", $Element For $Element = 0 To 3 ;loop through it $Output &= $Array[$Element][0] & $Array[$Element][1] & @CRLF Next Run("Notepad.exe") WinWaitActive("[Class:Notepad]") WinSetTitle("[Class:Notepad]", "", $Title) ControlSetText("[Class:Notepad]", "", "Edit1", $Output) EndFunc ;==>_NotepadArrayDisPlay AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Laymanball Posted October 16, 2011 Author Share Posted October 16, 2011 JohnOne Thanks. For your new script. I will study and learn to write. My Sample Script Download: VistaDesktopIconsChangerForXp.au3 (Com,Doc and Bin only) http://www.4shared.com/rar/NMHYL5Igba/VistaDesktopIconsChangerForXp_.html VistaDesktopIconsChangerForXp.exe (Resources) http://www.4shared.com/rar/nzs7Mb1gba/VistaDesktopIconsChangerForXp_.html Link to comment Share on other sites More sharing options...
JohnOne Posted October 16, 2011 Share Posted October 16, 2011 OK, but there is not much change there, all I changed is the declaration of one array instead of two, its commented, and the For...In...Next = For...To...Next Good luck, and remember, the clearer you pose any question you might have, the better and more precise any answer will be. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now