Jump to content

Spaces

Members
  • Posts

    2
  • Joined

  • Last visited

Spaces's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Thanks for tips guys! Was useful for me. Also I've did some changes, and now IP address input box changes it position proportionally to window size. May be it will be useful for somebody too.. $GUIWidth = 401 $GUIHeigth = 528 $MainForm = GUICreate("Cisco Access Port Finder", $GUIWidth, $GUIHeigth, 661, 215, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_TABSTOP,$DS_MODALFRAME,$DS_SETFOREGROUND)) $IPAddress1 = _GUICtrlIpAddress_Create($MainForm, 225, 140, 165, 22) _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0") GUIRegisterMsg($WM_SIZE, "setippos") Func setippos($hWnd,$iMsg,$Wparam,$lparam) Local $clientWth = BitAND($lParam, 0xFFFF) Local $clientHt = BitShift($lparam,16) WinMove($IPAddress1, "", Int(225*$clientWth/$GUIWidth), Int(140*$clientHt/$GUIHeigth)) EndFunc ;==>setippos
  2. Hey!! Thanks for awesome job!!!! It is very useful for me I've reworked it a bit for myself: in Func _OnAutoItErrorRegister I've made this ( line 204 ) If $sErrorMsg = "" Then Exit Else Local $ErrorLogfile = @ScriptDir & "\Autoit_Error_Handlings.txt" Local $file = FileOpen ($ErrorLogfile, 1) FileWrite($File, StringFormat("%02d:%02d:%02d", @HOUR, @MIN, @SEC) & " " & $sErrorMsg & @CRLF & @CRLF) EndIf So for I am interested in this file as developer. Also we can e-mail this whole file to developer instead of only error description. Cya
×
×
  • Create New...