Jump to content

hessebou

Active Members
  • Posts

    41
  • Joined

  • Last visited

Everything posted by hessebou

  1. Hello, in Windows is an option, that let you move your cursor with the numeric keypad. i set it up and it works, when i press the numeric keys on my physical keyboard then my cursor moves. but if i try to do it via autoit for example send (" {NUMPAD8} ") instead the cursor is moving, a 8 was typed. so whats wrong here? shouldnt it be the same as the physical keystroke?
  2. maybe this example is usefull for you: #include <StaticConstants.au3> #include <EditConstants.au3> #include <ComboConstants.au3> #include <GuiConstants.au3> #include <WindowsConstants.au3> #include <ButtonConstants.au3> #Include <Misc.au3> #include <Constants.au3> #Include <GuiButton.au3> #include <GDIPlus.au3> _GDIPlus_Startup() $kPen = _GDIPlus_BrushCreateSolid() $hFamily = _GDIPlus_FontFamilyCreate ("Arial") $hFont = _GDIPlus_FontCreate ($hFamily, 12, 2) $hFormat = _GDIPlus_StringFormatCreate () _GDIPlus_StringFormatSetAlign($hFormat, 1) Opt("GuiOnEventMode", 1) GUICreate("temptext", 100, 25, @DesktopWidth/2, @DesktopHeight/2, BitOR($WS_POPUP,$WS_CLIPCHILDREN), $WS_EX_LAYERED+$WS_EX_TOPMOST) GUISetBkColor(0x010101) GUISetState() $xys = WinGetHandle ("[ACTIVE]") _WinAPI_SetLayeredWindowAttributes($xys, 0x010101) $tGraphic = _GDIPlus_GraphicsCreateFromHWND($xys) $ttLayout = _GDIPlus_RectFCreate (0, 0, 100, 25) _GDIPlus_GraphicsDrawStringEx ($tGraphic, "Version 1.0", $hFont, $ttLayout, $hFormat, $kPen) GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "SystemEvents") GUISetOnEvent($GUI_EVENT_SECONDARYDOWN, "SystemEvents") While 1 Sleep(10) WEnd Func SystemEvents() Switch @GUI_CtrlId Case $GUI_EVENT_PRIMARYDOWN DllCall("user32.dll","int","SendMessage","hWnd", $xys,"int",$WM_NCLBUTTONDOWN,"int", $HTCAPTION,"int", 0) Case $GUI_EVENT_SECONDARYDOWN exit EndSwitch EndFunc
  3. ok now i understand. try this one: #include <GUIConstants.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #Include <Misc.au3> #include <INet.au3> Opt("GuiOnEventMode", 1) #Region ### START Koda GUI section ### Form=C:\Users\Admin\Desktop\browser.kxf $gui_main = GUICreate("Slim-Browser", @DesktopWidth, @DesktopHeight, 0, 0,$WS_MAXIMIZEBOX+$WS_MAXIMIZE) GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit") $IE = _IECreateEmbedded () $browser = GUICtrlCreateObj($IE,0, 40, @DesktopWidth, 800) $gui_url = GUICtrlCreateInput("http://", 48, 8, 289, 21) $Label1 = GUICtrlCreateLabel("URL:", 8, 8, 29, 17) GUICtrlSetFont(-1, 12, 400, 0, "ARIAL") $gui_send = GUICtrlCreateButton("Go!", 344, 8, 65, 25, 0, $WS_GROUP) GUICtrlSetOnEvent(-1, "_go") $gui_home = GUICtrlCreateButton("Home", 416, 8, 65, 25, 0, $WS_GROUP) GUICtrlSetOnEvent(-1, "_home") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### _IENavigate($IE,"http://www.google.de") $ht = 0 While 1 sleep(20) if stringlen(GUICtrlRead($gui_url)) > 9 and $ht = 0 Then HotKeySet ( "{ENTER}" ,"_go") $ht = 1 endif WEnd func _quit() exit endfunc func _home() _IENavigate($IE,"http://www.google.de") endfunc func _go() $ht = 0 HotKeySet ( "{ENTER}") if InetGetSize ( GUICtrlRead($gui_url) ,1) > 0 or StringLen(_INetGetSource ( GUICtrlRead($gui_url) )) > 0 then _IENavigate($IE,GUICtrlRead($gui_url), 0) GUICtrlSetData($gui_url, "http://") endif endfunc
  4. hello, i made some changes: #include <GUIConstants.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #Include <Misc.au3> #include <INet.au3> Opt("GuiOnEventMode", 1) #Region ### START Koda GUI section ### Form=C:\Users\Admin\Desktop\browser.kxf $gui_main = GUICreate("Slim-Browser", @DesktopWidth, @DesktopHeight, 0, 0,$WS_MAXIMIZEBOX+$WS_MAXIMIZE) GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit") $IE = _IECreateEmbedded () $browser = GUICtrlCreateObj($IE,0, 40, @DesktopWidth, 800) $gui_url = GUICtrlCreateInput("http://", 48, 8, 289, 21) $Label1 = GUICtrlCreateLabel("URL:", 8, 8, 29, 17) GUICtrlSetFont(-1, 12, 400, 0, "ARIAL") $gui_send = GUICtrlCreateButton("Go!", 344, 8, 65, 25, 0, $WS_GROUP) GUICtrlSetOnEvent(-1, "_go") $gui_home = GUICtrlCreateButton("Home", 416, 8, 65, 25, 0, $WS_GROUP) GUICtrlSetOnEvent(-1, "_home") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### _IENavigate($IE,"http://www.google.de") While 1 sleep(20) WEnd func _quit() exit endfunc func _home() _IENavigate($IE,"http://www.google.de") endfunc func _go() if stringlen (_INetGetSource ( GUICtrlRead($gui_url))) > 0 then _IENavigate($IE,GUICtrlRead($gui_url)) GUICtrlSetData($gui_url, "http://") endif endfunc works now like it should. p.s.: hier im forum am besten immer englisch schreiben, sollen alle verstehen und es ist ja auch n englisches forum. im deutschsprachigen empfehle ich folgende autoitseite: p.s.: here in the forum always write in english, because it is an english forum. but there is also an german autoit site: http://www.autoit.de/index.php?page=Index
  5. moin moin, dein hotkeyset nimmt die enter-taste für sich in anspruch, das mal auskommentieren. dann klappt schon mal die google-suche auf enter. rest muss ich nochmal schauen. in english: your hotkeyset grabs the enter-key. do this as a comment-line. then google-search works hitting the enterkey.
  6. maybe its something with the userrights. try to start your script with #requireadmin and see if now the sw_hide works correctly.
  7. maybe you can try winmove to some coordinates "outside" the real screen.
  8. really nice one
  9. hello, take a look at the line427. if $typ4 = "gif" AND int(GUICtrlRead($c23)) = 0 then and replace with this one: if $typ4 <> "abc" then now your original highres-pictures should be uploaded without change / compress.
  10. then leave the upload.php for the tool and use ubr_file_upload.php on your homepage.
  11. why did you change anything? here it works like i postet the script. if you want using your ubr_file_upload.php site, you cant. because its not compatible. it uses sessions and always change the name of uploadfield: id="upfile_1288074988576" ....
  12. n.p., i understood that
  13. here is the modified script with your server. LiveSnap-Compact1.1.au3
  14. i guess there's just a sleep missing in a loop...
  15. funnily dialog
  16. ok, the filesize limitation could be something like if round(FileGetSize ( $datei2 )/1024, 1) > 900 then msgbox (16, "Warning", "Filesize > 900 Kb!") maybe combinable with a question "upload anyway yes/no"...
  17. @wakillon: ok your method without the _curlrc file works fine. you just made one mistake in the curl-function for the pic-upload.de server. change it to this, then it works: Case "pic-upload.de" $newcurl = '-F file=@"' & $curl & '" -F Submit=" Bild Hochladen" -H Expect: -o curl.txt --url "http://www.pic-upload.de/index.php?to=upload"'
  18. you can change the script so that always the english gui is present. every upload walks intern through irfanview.exe, so output jpg or gif are not too large filesize. i will se how i can implement a option like "messagebox when outputfile larger than xx Kb".
  19. hello, i did some tests and it works. but: your php dont rename the files. that means (for example) if already a file called test.jpg is on your server and you upload another file with the same name, the existing one would be overwritten. maybe take a look at this mod:
  20. Hello, thanks for the hint, i will think about it in the next update. is it much more faster than the existing method?
  21. not every site is compatible. if you tell me which sites you want to add, i will test them and posting the code for the script.
  22. Additional to say is that the Script can detect english or german OS-Language and creates the gui respective:
  23. change the server by choose one from the dropdown: but i have a newer version of the tool, check this out: http://www.autoitscript.com/forum/index.php?showtopic=121028
  24. instead of winactivate and send use this: ControlSend ( "title", "text", controlID, "string" [, flag] )
  25. ok i tryed a little bit around. the 100% normal view means 96DPI. so you can use this to check DPI and if its not 96 do a msgbox or exit the script. #include <WinAPI.au3> $ScreenDC = _WinAPI_GetDC(0) $DPI = _WinAPI_GetDeviceCaps($ScreenDC,88) _WinAPI_ReleaseDC(0,$ScreenDC) msgbox(0,"",$DPI)
×
×
  • Create New...