[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Ответить
 • Просмотры: 18
Аватара пользователя
katok888

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение katok888 »

Цитата Creat0R:



Он закрывается, просто там ведь пауза стоит в 5 секунд
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Да я как бы и предполагал, что он должен закрыться, но увы, он остаётся по прежнему в трее :|




Цитата Creat0R:



Кликнуть можно по координатам кнопки сворачивания (в «AutoIt Info Tool» можно их посмотреть наведя курсор мышки на кнопку) с помощью MouseClick. Но это не надёжно
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Почему? Тогда, думаю, решить проблему не удастся Изображение
Аватара пользователя
Frag-o-Matik

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение Frag-o-Matik »

Цитата SAOPP:



увы, он остаётся по прежнему в трее
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




А если так:





Код:

Код: Выделить всё

Sleep(5000)
WinSetState("SoulSeek", "", @SW_MINIMIZE)

Изображение




Цитата SAOPP:



Почему?
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Хотябы потому что координаты меняются, например при перемещении окна Изображение Можно ещё попробовать просто спрятать окно (заменить @SW_MINIMIZE на @SW_HIDE), но сомневаюсь что оно спрячется таким образом в трей Изображение
Аватара пользователя
SAOPP

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение SAOPP »

Цитата Creat0R:



Хотябы потому что координаты меняются, например при перемещении окна Можно ещё попробовать просто спрятать окно (заменить @SW_MINIMIZE на @SW_HIDE), но сомневаюсь что оно спрячется таким образом в трей
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Ну а если окно всегда на одном месте? - Т.е. я хочу сказать, что для того, что бы правильно отработал скрипт, SS всегда запускается развёрнутым на весь экран, т.е. таким образом ведь можно сохранить "статику" кнопки минимизировать?




Цитата Creat0R:



А если так:



Код:

Код: Выделить всё

Sleep(5000)
WinSetState("SoulSeek", "", @SW_MINIMIZE) [post=997885]»[/post]





Это куда посдтавить, перед WinSetState("SoulSeek", "", @SW_MINIMIZE)?





Код:

Код: Выделить всё

$iTimer = TimerInit()
While 1
    If $iTimer  0 And TimerDiff($iTimer) >= 5000 Then
        $iTimer = 0
        Sleep(5000)
        WinSetState("SoulSeek", "", @SW_MINIMIZE)
    EndIf
    Sleep(10)
WEnd
Аватара пользователя
Creat0R

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение Creat0R »

Можно ещё так попробовать:





Код:

Код: Выделить всё

Sleep(5000)
WinActivate("SoulSeek")
WinWaitActive("SoulSeek", "", 5)
If WinActive("SoulSeek") Then
    $iLeft_Min_Button = 70 ;Указывает отступ кнопки сворачивания с правой стороны у окна
    $aWin_Pos = WinGetPos("SoulSeek")
    Opt("MouseCoordMode", 0)
    $aMouse_Pos = MouseGetPos()
    MouseClick("Main", $aWin_Pos[0]+$aWin_Pos[2]-$iLeft_Min_Button, 10, 1, 0)
    MouseMove($aMouse_Pos[0], $aMouse_Pos[1], 0)
EndIf

Переменную $iLeft_Min_Button возможно нужно изменить, в зависимости от того где будет кликать мышка, чтобы это проверить, нужно закомментировать строку с возвратом мышки на исходную позицию (MouseMove(...)).




Цитата SAOPP:



Это куда посдтавить
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Это не нужно, я в первом скрипте просто привёл два разных примера, первый с циклом, второй с паузой.
Аватара пользователя
shyra1976

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение shyra1976 »

Код:

Код: Выделить всё

_Test()
If @error Then MsgBox(0, "", "::: ERROR :::")
Func _Test()
    $AnswTest = MsgBox(4, "TEST", "Test Passed?")
    If $AnswTest = 7 Then ; NO (Test Failed)
        $Answ = MsgBox(21, "Error", "Communication ERROR")
        Select
            Case $Answ = 4 ;Retry
                _Test()
            Case $Answ = 2 ;Cancel
;~              ConsoleWrite($Answ & @LF)
                Return SetError(1)
        EndSelect
    EndIf
    ConsoleWrite(@error & @LF)
    ConsoleWrite("Test Passed" & @LF)
    Return
EndFunc   ;==>_Test





мужики,помогите

Есть рекурсия , она вызывает сому себя .А когда выходит закрывает себя столко раз сколко открыла себя

Вопрос : как сделат так ,что бы Return SetError(1) деиствително возврощал "1" после закритии рекурсии

Да же если она откривалась несколко раз
Аватара пользователя
Creat0R

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение Creat0R »

Цитата SAOPP:



Причём работает он на любом окне, не зависимо от заголовка
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.




Ну почему, только на окне которое содержит в заголовке "SoulSeek" Изображение
Аватара пользователя
SAOPP

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение SAOPP »

Creat0R, а можно что бы после завершения своих действий, скрипт закрывался?



И ещё, можно ли сделать так, что бы скрипт кликал мышкой на кнопочку свернуть, поскольку текущие параметры не сворачивают SS в трей, он по прежнему ложится на панель задач, т.е. собственно, что я и пытаюсь решить Изображение Спасибо и ещё раз заранее благодарен.
Аватара пользователя
shyra1976

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение shyra1976 »

Creat0R,

спасибо тебе ,и здоровья бычьего ,что бы мог дальше отвечат на наши вопроси
Аватара пользователя
Creat0R

Re: [Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Сообщение Creat0R »

Такой вопрос, помогите: мучаюсь, не могу реализовать свои замыслы. Вот в этом примере:proba.au3 :
читать дальше »




Код:

Код: Выделить всё

#include 
#include 
#include 
#Region ### START Koda GUI section ### Form=
$Form = GUICreate("Dialog", 316, 273, 360, 243)
GUISetIcon("D:\003.ico")
$Button1 = GUICtrlCreateButton("OK", 1, 235, 75, 25, 0)
$Button2 = GUICtrlCreateButton("Очистить", 119, 235, 75, 25, 0)
$Button3 = GUICtrlCreateButton("Выход", 234, 235, 75, 25, 0)
$Edit = GUICtrlCreateEdit("" & @CRLF, 0, 88, 169, 81, $ES_AUTOVSCROLL + $WS_VSCROLL)
GUICtrlSetLimit($Edit, 100)
$Combo = GUICtrlCreateCombo("Ваш Выбор:", 8, 8, 297, 25)
GUICtrlSetData(-1, '1|2|', '') 
$Label1 = GUICtrlCreateLabel("Осталось символов:", 8, 48, 109, 17)
$neizvesno = GUICtrlCreateLabel("???", 120, 48, 36, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE,$Button3
            Exit
        Case $Button1
                  _Getpicture()
    EndSwitch
WEnd
Func _Getpicture()
    $i=GUICtrlRead($Combo) 
        Switch $i
        Case 1
GUICtrlCreatePic(@WindowsDir & "\Штукатурка.bmp", 208, 96, 81, 65)        
        Case 2
GUICtrlCreatePic(@WindowsDir & "\Пузыри.bmp", 208, 96, 81, 65)          
        Case Else
MsgBox(0, Default, 'Сделайте выбор в элементе Combo')
        EndSwitch
  EndFunc    





Хочу чтоб появлялся рисунок при выборе из Combo (примерно так как появляется, когда я нажимаю на кнопку ОК), но только при выборе из элемента Combo и без нажатия на кнопку ОК. Тоесть выбрал 1 - рисунок поменялся, 2-тоже. И еще, как подключить кнопку Очистить на очистку поля Edit. И еще не могу придумать, чтоб там где у меня $neizvesno велся отсчет от ограничения на ввод символов(у меня100) и до 0 при вводе символов в поле Edit(тоесть сначала там 100, а ввел 1символ - стало 99. Вот такая сложная задача, Сегодня окончил читать тему, все 143 страницы, паралельно изучаю справку, и на Ru.Board сижу, - решения не нашел. Хоть совет прошу.


P.S.




Рисунки взял первые на выбор, можно любыми заменить небольшого формата!(но если нету никаких ?!, то в прикрепленном файле они).

Я на Полезное сообщение нажимал уже не раз, а у меня написано - благодарности 0. Не подумайте что мне сказать спасибо трудно, не знаю еще как...
Ответить

Вернуться в «AutoIt»