Jump to content

bestsmr

Active Members
  • Posts

    26
  • Joined

  • Last visited

bestsmr's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Hello every body; I use "Autoit info tool" to get information aboat specific control , the text that I get is different from I see on screen ; as shown in image : My quation is : Why? How I can pass this problem? thanks
  2. No yupepa , it`s not strange the result is : pause 5000 as you want + the time for do 3 lines you can try adding more lines and the result will be bigger as this : $begin = TimerInit() Sleep(5000) for $i=1 to 100 $i=$i next MsgBox(0, "Timer", "Duration = "& TimerDiff($begin))
  3. hello "Tuurngait" try using this code : HotKeySet("{PAUSE}", "TogglePause") HotKeySet("{ESC}", "Terminate") HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d Global $Paused Dim $coord[3] While 1 For $i = 0 To 1024 Step 1 $coord = PixelSearch( 0, 0, $i, 768, 0xFF0000, 10 ) If Not @error Then MouseMove($coord[0],$coord[1]) EndIf Next WEnd Func TogglePause() $Paused = Not $Paused While $Paused Sleep(100) ToolTip('Script is "Paused"', 0, 0) WEnd ToolTip("") EndFunc ;==>TogglePause func Terminate () msgbox(0,"Hotkey problem", "script Terminate") exit EndFunc func ShowMessage() msgbox(0,"Hotkey problem","my program message") EndFunc enjoy !!
  4. I thing if we need multiline string to use as path , we can use as instead of "quoted strings" this "@CRLF" for example $path = $filepath & $param1 & @CRLF & $param2 and I thing this way we can pass the problem .
  5. hello czardas; I understood that you want to return same value of parameter try to use this: MsgBox(0,"","the return value is " & somefunc(5)) Func somefunc($var) ;some code Return SetError(@error,0,$var) ; it returns same passed parameter EndFunc
  6. loading new image is use the current dimension of control . to use icon dimension resize your control : #include <GDIPlus.au3> GUICtrlSetPos($control_ID,$x,$y,_GDIPlus_ImageGetWidth($image_handle),_GDIPlus_ImageGetHeight($image_handle))
  7. try to add your suggetion in this web : http://www.scintilla.org that link to Koda website
  8. try to you this section in your code ;read ini data dim $Cakes = IniReadSection("Database.ini", "Cakes") if @error then exit ;convert to array that have path of every image dim $i,$cake_img[$Cakes[0][0]+1] dim $folder =""; = your image folder for $i=1 to $Cakes[0][0] $cake_img[$i]=$folder & $Cakes[$i][1] & ".jpg" MsgBox(0,"preview",$cake_img[$i]) Next
  9. ok ; tooooooooooooooooooooooooooooooooooo thanks
  10. it is easy try this code #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 296, 349, 192, 124) $Button1 = GUICtrlCreateButton("Button1", 48, 24, 177, 57) $Button2 = GUICtrlCreateButton("Button2", 48, 112, 193, 49) $Button3 = GUICtrlCreateButton("Button3", 40, 192, 201, 49) $Button4 = GUICtrlCreateButton("Button4", 48, 264, 193, 41) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Local $pressed_1=False While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $pressed_1=True Case $Button2 if $pressed_1 then MsgBox(0,"result","2 pressed after 1") $pressed_1=False EndIf Case $Button3 $pressed_1=False Case $Button4 $pressed_1=False EndSwitch WEnd
  11. ok , martin thanks for code ; really it solve the problem . :D but the truth " i could not undersand the code" can you answer me some question ???? 1) why "_KeyboardProc" function was defined with three parametr ; I did not read in help file about that 2) how did you know that the first will be $ncode and second ...... I prefer to refer me to book or information source that can I read to teach .... only to aviod you the tired of keyboard strokes when you write the answers . always thanks.
  12. can some one explain why this codw do not work ********* #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> GUICreate("test") GUICtrlCreateLabel("press character", 10, 10) GUIRegisterMsg($WM_KEYDOWN, "keydown") GUISetState() While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then Exit WEnd Func keydown($hw, $msg, $wp, $lp) MsgBox(0, "chr", "pressed") EndFunc ;==>keydown ******************** but when i delet line **GUICtrlCreateLabel("press character", 10, 10)** it works correctly
  13. ok , keep clear and let make friend???????????????
×
×
  • Create New...