Jump to content

memnon

Active Members
  • Posts

    140
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

memnon's Achievements

  1. beside .. still thx you @careca for your support
  2. working NOW - _ISPressed not working with "GUI_WS_EX_PARENTDRAG" so i deleted it from source Bug ? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <misc.au3> Local $hDLL = DllOpen("user32.dll") AutoItSetOption ("MouseCoordMode",0) HotKeySet("{ESC}", "Terminate") Local $sFile = "c:\a\rund6.gif" $pic = GUICreate("News", 625, 186, -1, -1, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST)) $pic_stay = GUICtrlCreatePic($sFile, 0, 0, 625, 186,-1) ;, $GUI_WS_EX_PARENTDRAG) $Zeile1="Das ist ein Test, Zeile1" $Zeile2="Das ist ein Test, Zeile2" $Zeile3="Das ist ein Test, Zeile3" $Zeile4="Das ist ein Test, Zeile4" $Group1 = GUICtrlCreateGroup("", 195, 40, 422, 137) GUICtrlSetBkColor(-1, 0x004E98) GUICtrlCreateGroup("", -99, -99, 1, 1) $Label3 = GUICtrlCreateLabel($Zeile1 & @CRLF & $Zeile2 & @CRLF & $Zeile3 & @CRLF & $Zeile4 & @CRLF & @CRLF & "Für nähere Informationen bitte hier klicken", 200, 50, 400, 130) GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif") ;GUICtrlSetColor(-1, 0x004e98) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) GUISetState(@SW_SHOW) While 1 If _IsPressed('01') Then $apos = MouseGetPos() Consolewrite($apos[0] & " " & $apos[1] & @CRLF) if $aPos[0] > 595 and $aPos[0] < 620 and $aPos[1] > 1 and $aPos[1] < 40 then Exit 0 ;red X endif sleep (200) wend Func Terminate() Exit 0 EndFunc
  3. aehm yes for example the red x in upper right corner is like the normal "windows"-x you know from windows 7 to close a window another area from the gui should open then a pdf if i click to that coordinates ,... not sure if 4 areas are enough, have to think about it , but i guess you know what i mean ah sorry - engllish is not my main language... the label you see with that 4 rows is nothing else than a quickinfo of the pdf you open, if you click on that whole area within the group1 zone, i only made for optical, the pdf should open
  4. na its a psd file converted to gif - its just a simple solid picture but i am not @home atm, so i can post it tomorrow
  5. you could use every gif you like, but i can post it tomorrow, too
  6. the thing is, the gui looks really freaky, and i "painted" all options on the pic - so all i need is queries to get the correct mouseposition and leftmouse click on that coordinates its not only the "x" there are more spots i want to watch and apply action on clicks btw it isnt even working, if i only use _ispressed, without the mousepos.. if _IsPressed("01",$hDLL) then Exit 0 and beside - i dont understand why my methode isnt working, i used coded already postet in forum - working i am also not sure if its gui related or a general support question (where i posted that thread before)
  7. Hello, i made a little gui with "ESC" to exit and a red cross on the right upper corner of the transparent gui to terminate it... While Hotkeyset works, my try to close on the red "x" on the corner doesnt work - i changed mousecoordmode to 0 to have mousepositions relativly to my active gui - and i get the right coordinations on the console... where is my error on my little script...? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <misc.au3> Local $hDLL = DllOpen("user32.dll") AutoItSetOption ("MouseCoordMode",0) HotKeySet("{ESC}", "Terminate") Local $sFile = "c:\a\rund.gif" $pic = GUICreate("News", 625, 186, -1, -1, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST)) $pic_stay = GUICtrlCreatePic($sFile, 0, 0, 625, 186,-1, $GUI_WS_EX_PARENTDRAG) $Zeile1="Das ist ein Test, Zeile1" $Zeile2="Das ist ein Test, Zeile2" $Zeile3="Das ist ein Test, Zeile3" $Zeile4="Das ist ein Test, Zeile4" $Group1 = GUICtrlCreateGroup("", 195, 40, 422, 137) GUICtrlSetBkColor(-1, 0x004E98) GUICtrlCreateGroup("", -99, -99, 1, 1) $Label3 = GUICtrlCreateLabel($Zeile1 & @CRLF & $Zeile2 & @CRLF & $Zeile3 & @CRLF & $Zeile4 & @CRLF & @CRLF & "Für nähere Informationen bitte hier klicken", 200, 50, 400, 130) GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif") ;GUICtrlSetColor(-1, 0x004e98) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) GUISetState(@SW_SHOW) while GUIGetMsg() <> $GUI_EVENT_CLOSE $aPos = MouseGetPos() if $aPos[0] > 595 and $aPos[0] < 620 and _IsPressed("01",$hDLL) then Exit 0 wend Func Terminate() Exit 0 EndFunc
  8. sorry i dont understand what you mean - could you show me the error? (english not mainlanguage) okey done, thx
  9. if i open a cmd and enter following command - it works winscp425 /command "option bach on" "option confirm off" "open ftp://username:password@ipadress:port -hostkey=""ssh-dss 1024 bl:ah:bl:ah:bl:ah...."" -implicit -passive""" "put c:\a\test.jpg /upload/test.jpg" "exit" if i try using autoit - it dosnt work $cmd = '"c:\a\winscp425.exe /command "option batch on" "option confirm off" " ftp://username:password@ipadress:port -hostkey=""ssh-dss 1024 bl:ah:bl:ah:bl:ah.... "" -implicit -passive""" "put c:\a\leer.jpg /Diverses/W2000.txt" "exit"' ConsoleWrite($cmd) run($cmd,"c:\a") can anyone tell me where i am wrong with it ? Console Write: "c:\a\winscp425 /command "option bach on" "option confirm off" "open ftp://username:password@ipadress:port -hostkey=""ssh-dss 1024 bl:ah:bl:ah:bl:ah...."" -implicit -passive""" "put c:\a\test.jpg /upload/test.jpg" "exit"
  10. aehm, nope - still no result $sVar stays without value, if i use any other key and keyname it works edit after your edit^^ ... yes was the "64" thx alot
  11. Hello, i want to read a String out of the Registry ... Local $sVar = RegRead("HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionWindowsUpdateAuto UpdateResultsInstall", "LastSuccessTime") MsgBox(0,0, "last updated:", $sVar) it would show the last Windows Update Date - but i dont get anything displayed ... the Path and the Key is 100% correct - what i am doing wrong with it ?
  12. Hello, i use a autoitscript what is started after a userlogin to our servers - the script is working fine under windows 2003, windows 2008r2 a part of the script is _GetIP() what works without Problems on windows 2003 , windows 2008r2 on Windows 2012r2 Servers i get 95% "0" back as Information from _GetIP() i know getip has overworked to get infos only all 5min from external Source within last versions of autoit - but that is for sure not the problem any tipp for me, why i get back "0" from _GetIP() ? btw i have also tried to wait for 30seconds after user logon (cause w2012r2 handles its services and startup processes some other kind than w2008r2), but it makes no difference if $Session="Console" then if _GetIP()<>"-1" then $ExternalIP="""" & _GetIP() & """" $keinInet="gray41" Else $ExternalIP="""kein Internet ?" & """" $keinInet="red" endif endif
  13. got it now, man i´m stupid^^ thx danp2
  14. a last question to Geir1983 - i dont understand the line Local $aExtendedFileList[$aFileList[0]+1][2] i have never seen a definition for an array like that before - what does [0]+1] [2] mean ?
×
×
  • Create New...