Jump to content

TLM

Members
  • Posts

    13
  • Joined

  • Last visited

Everything posted by TLM

  1. Hai, I want to convert TEXT to IMAGES so please tell me how i do this. if you know
  2. Ok use this it is better than all #include <APISysConstants.au3> #include <GUIConstantsEx.au3> #include <WinAPISys.au3> #include <WindowsConstants.au3> #include <Misc.au3> ; Create GUI Global $GUI = GUICreate('Test', 1, 1) Local $tRID = DllStructCreate($tagRAWINPUTDEVICE) DllStructSetData($tRID, 'UsagePage', 0x01) ; Generic Desktop Controls DllStructSetData($tRID, 'Usage', 0x02) ; Mouse DllStructSetData($tRID, 'Flags', $RIDEV_INPUTSINK) DllStructSetData($tRID, 'hTarget', $GUI) _WinAPI_RegisterRawInputDevices($tRID) GUIRegisterMsg($WM_INPUT, 'WM_INPUT') GUISetState(@SW_HIDE) Do Until GUIGetMsg() = $GUI_EVENT_CLOSE Func WM_INPUT($hWnd, $iMsg, $wParam, $lParam) #forceref $iMsg, $wParam Switch $hWnd Case $GUI Local $tRIM = DllStructCreate($tagRAWINPUTMOUSE) If _WinAPI_GetRawInputData($lParam, $tRIM, DllStructGetSize($tRIM), $RID_INPUT) Then Local $iFlags = DllStructGetData($tRIM, 'Flags') Select Case BitAND($iFlags, $MOUSE_ATTRIBUTES_CHANGED) ; You need to query the mouse attributes and update bitmap... Case Else EndSelect $iFlags = DllStructGetData($tRIM, 'ButtonFlags') If BitAND($iFlags, BitOR($RI_MOUSE_MIDDLE_BUTTON_DOWN, $RI_MOUSE_MIDDLE_BUTTON_UP, $RI_MOUSE_LEFT_BUTTON_DOWN, $RI_MOUSE_LEFT_BUTTON_UP, $RI_MOUSE_RIGHT_BUTTON_DOWN, $RI_MOUSE_RIGHT_BUTTON_UP)) Then Select Case BitAND($iFlags, $RI_MOUSE_LEFT_BUTTON_DOWN) If Not _CheckOtheBtnPress(1) Then ToolTip("Mouse Left btn down") EndIf Case BitAND($iFlags, $RI_MOUSE_LEFT_BUTTON_UP) If Not _CheckOtheBtnPress(1) Then ToolTip("Mouse Left btn up") EndIf Case BitAND($iFlags, $RI_MOUSE_RIGHT_BUTTON_DOWN) If Not _CheckOtheBtnPress(2) Then ToolTip("Mouse Right btn down") EndIf Case BitAND($iFlags, $RI_MOUSE_RIGHT_BUTTON_UP) If Not _CheckOtheBtnPress(2) Then ToolTip("Mouse Right btn up") EndIf EndSelect EndIf EndIf EndSwitch Return $GUI_RUNDEFMSG EndFunc ;==>WM_INPUT Func _CheckOtheBtnPress($keytoIGNORE) For $C = 1 To 222 Step 1 If $C = $keytoIGNORE Then ContinueLoop If _IsPressed(Hex($C, 2)) Then Return 1 Next Return 0 EndFunc
  3. I havn't problems at now. I add a script. it can capture keyboard typing letters, numbers and marks KeyCap.au3 <snip> THE SCRIPT file and RawInput.au3 UDF file are attached i think you will need its. <snip>
  4. <snip> Thank you ! i am new for this.
  5. how about this #Include <Array.au3> $s = 'Hello World "Helloo Woorld" This Is "an example" ok? ' $split = StringSplit($s, '"') Local $Rarray = $split For $C = 1 To $split[0] Step 1 $split2 = StringSplit($split[$C], " ") For $CC = 1 To $split2[0] Step 1 If $split2[$CC] <> "" Then _ArrayAdd($Rarray, $split2[$CC]) $Rarray[0] += 1 EndIf Next Next _ArrayDisplay($Rarray)
  6. My System is windows xp so i try with xp calc it worked $a = ControlGetText("[CLASS:SciCalc]", "","Button14") MsgBox(0, "", $a)
  7. How this: #include <Misc.au3> While 1 If _IsPressed(1) Then ;Check press of left mouse While _IsPressed(1); while is working when hold leftmouse ToolTip("LeftMouse Down") WEnd ToolTip("LeftMouse UP") EndIf sleep(10) WEnd
  8. You can change transparent value to zero then the window will hide WinSetTrans("Configuration Utility v1.1.38.0", "", 0)
  9. You can download TLM_MiscConstant.au3 here & include it to your autoit scripts. It helps you to get key board input with _IsPressed() function. This file has KeyCodes collection : 01. ALL Key Codes in Hex decimal numbers 02. Writing Key Values ( Letters & Marks ) in decimal numbers (Array) 03. Writing Key Values When Press with Shift (Letters Not Included) in decimal numbers (Array)
×
×
  • Create New...