Jump to content

DMEE

Active Members
  • Posts

    81
  • Joined

  • Last visited

Everything posted by DMEE

  1. I have some experience with delphi toolbars and generally I use a x,y location within the toolbar. Sometime ago I noticed that the autoit info window however did show the text of the button, save for example. This would imply that "[TEXT:Save]" should work. I didn't have time to test it. If you'll try, please let me know if it works
  2. There is no simple way to get the text from a webpage, other than copy pasting it. If this was not about a webpage, most probably a control should have been used and the function guictrlread could have been of benefit. Now the simple method is: 1. empty the clipboard with clipput("") 2. double click at right coordinates with mouseclick("left", x, y, 2) 3. send to clipboard with Send(^c) (put a sleep(100) after this command to ensure that the text is on the clipboard) 4. use $number = clipget() to get the number from the clipboard. There you have your number extracted
  3. The concepts of a gui and a control are explained in the help file -> GUI Reference. If you have any specific questions after reading that, please ask. You toke the screenshot (to the clipboard), congratulations. To upload: first save the image (open any picture editor and type ctrl-v and then ctrl-s), click insert image in the forum and choose the right location.
  4. What's a gui ? -> graphical user interface; the interface of the program to the user How to make a screenshot ? -> activate the screen, alt+Print Scrn
  5. If you post a screenshot of the gui, I can show you
  6. please post a screenshot of the gui in which the number is and the information of the autoit info tool. This makes it easier to help you edit: typo
  7. Do you know the control in which the number is located? Otherwise the copy to clipboard can be used. The inputbox is not needed, just use ClipGet()
  8. $b = 10 For $j = 1 to 12 If Mod($j,2)= 0 Then $a = 150 Else $a = 50 EndIf $Slot[$j][0] = $a $Slot[$j][1] = $b $b += 15 Next
  9. maybe you'd like to have a look at the filelisttoarray UDF
  10. I agree that the code is terrible, but it is the posted snippet that I used, the solution is just a usual way how to code if you don't use the "goto" statement that was asked for. In general the need for a goto means need for a better program design. That is something we cannot answer to when no intentions nor a complete function is given. Actually I didn't look through the rest of the code, just to the statements that I offered as a solution. But I agree that just a few additional tips would be very helpful. @Vakis: If you tell what you want to do with a program, you can get more help than you will ask for. You can gain knowledge for "free".
  11. The way I know that other applications delete open files is by adding them to a list that should be deleted on next startup. You can write an autoit script to run on startup that will delete the file when it is not open anymore or at the next startup (save the filename(s) in a temp file). Unlock is also sometimes possible by removing the read-only attribute see the help on FileSetAttrib
  12. to answer your questions: - the 1 means an infinite loop, which you should always exit with an exitloop or return or.. - the wend is indeed needed, but I did provide that. - you have a next in your own code at line 7. This should not interfere with the loop that I wrapped around the if statement.
  13. while 1 if $checkstring = 0 Then ExitLoop Else EndIf Next $aIE = _IENavigate($aIE, $link.href) _IELoadWait($aIE) $bIE = _IECreate("http://xxx") _IELoadWait($bIE) WinClose($aIE) WinSetState ( "xxx", "", @sw_maximize) For $itab = 9 to 20 step 1 $frame2 = _IEFrameGetCollection($bIE, "main") $tableget2 = _IETableGetCollection($frame2, $itab) $array = _IETableWriteToArray($tableget2) $arrsearch = _ArraySearch($array, "xxx") IF @error Then Else ExitLoop EndIf Next MsgBox(0, "", $itab) ExitLoop Wend _FileCreate(@TempDir & "\a.cmd") $Fileopen = FileOpen(@TempDir & "\a.cmd", 1) FileWrite($Fileopen, "at " & $finishtime & " /interactive " & @ScriptFullPath) FileClose($Fileopen) run(@TempDir & "\a.cmd") sleep(444) FileDelete(@TempDir & "\a.cmd") Be careful with the exitloop as I guess that you have additional loops, so maybe you have to give the level of the loop you want to exit edit: layout
  14. When I install (non-)autoit at a third party, I use NSIS to create an install script. An uninstall is also generated to clean up the mess (as well as itself.) The question was how we people do this, so I hope you don't mind that my solution is not autoit related
  15. you could place a nested if ... endif statement or, which is probably not possible, move the endif to line 7(which should be the solution for this oversimplified example)
  16. my wrong, I should have read better as well.
  17. welcome to the forum feverlak! just a snippet, not tested whatsoever: While 1 if Winactive("audition") = 0 Then ;use the au3info tool to check the actual name of the window Winactivate("audition") Endif ControlClick("audition","","[TEXT:Arm for Record]") sleep(2000) ControlClick("audition","","[TEXT:Arm for Record]") Sleep(2*3600*1000) Wend check the windows and please let me know if this is what you need
  18. I use a common accessible netwerk drive for the compiled scripts, and only use svn for the source code. A compiled version can be made very easy. Old versions can be compiled again using the tags in svn
  19. Actually you should return 0, which would result in a vertical line, without any error. The slope is not undefined, it is defined as zero by the definition of the slope.
  20. I've used 3 types of version control - increase filenames by one number *.001.au3 e.g - source control - subversion The last one is by far the best I've used this far. The source control got corrupted, therefore I will advise not too use that. The first option is quite laborious, so I'd go for subversion. No troubles this far
  21. Just curious on how to obtain "true" random numbers. Does anyone have an idea: if one substracts two reals of kind=4 from each other to be placed in a kind=8 variable. How random is the number that is obtained?
  22. maybe try this, I have no experience with it, so please let me know if it works While 1 $oButton = _IEGetObjByName($oForm, "submit") If @error = 0 Then Exitloop sleep(1000) Wend
  23. With the windows scheduler, you can schedule an executable at system startup or system logon, maybe that can help you as well
  24. For $fileInf in $FileList If IsString($fileInf) Then MsgBox(64, "", $fileInf) Endif Next
×
×
  • Create New...