Недавние сообщения

Страницы: [1] 2 3 ... 10
1
Общие вопросы по AutoIt / Re: [Реестр] Путь к реестру
« Последний ответ от ANDYANDREY Отправлен Сегодня в 06:52:37 »
Все решил проблему, пример такой
Код: AutoIt [Выделить]
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "WileWin32","REG_SZ", @AppDataDir & "\Software\autoinst.exe")
 

2
Общие вопросы по AutoIt / [Реестр] Путь к реестру
« Последний ответ от ANDYANDREY Отправлен Сегодня в 06:43:51 »
Здравствуйте, подскажите пожалуйста как можно прописать путь в реестре к UserData или AppData через Autoit?
3
Код: AutoIt [Выделить]
#include <StaticConstants.au3>
#include <GUIConstantsEx.au3>

Local $iWidth, $iHeight, $hGui_1, $iLabel_1, $hGui_2, $iLabel_2, $iKeyLeft, $iKeyRight

$iWidth = Floor(@DesktopWidth / 2)
$iHeight = @DesktopHeight

$hGui_1 = GUICreate('Рисунок 1', $iWidth, $iHeight, 0, 0)
$iLabel_1 = GUICtrlCreateLabel('Кнопки мыши', 0, 300, $iWidth, 60, $SS_CENTER)

$hGui_2 = GUICreate('Рисунок 1', $iWidth, $iHeight, $iWidth, 0)
$iLabel_2 = GUICtrlCreateLabel('Кнопки "Стрелки"', 0, 300, $iWidth, 60, $SS_CENTER)

$iKeyLeft = GUICtrlCreateDummy()
$iKeyRight = GUICtrlCreateDummy()

Local $aAccelKeys[2][2] = [['{LEFT}', $iKeyLeft], ['{RIGHT}', $iKeyRight]]
GUISetAccelerators($aAccelKeys)

GUISetState(@SW_SHOW, $hGui_1)
GUISetState(@SW_SHOW, $hGui_2)
WinSetOnTop($hGui_1, '', 1)
WinSetOnTop($hGui_2, '', 1)

While ($hGui_1 - $hGui_2)
    $aMsg = GUIGetMsg(1)
    Switch $aMsg[1]
        Case $hGui_1
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    GUIDelete($hGui_1)
                    $hGui_1 = 0
                Case $GUI_EVENT_PRIMARYDOWN
                    GUICtrlSetData($iLabel_1, '$GUI_EVENT_PRIMARYDOWN')
                Case $GUI_EVENT_SECONDARYDOWN
                    GUICtrlSetData($iLabel_1, '$GUI_EVENT_SECONDARYDOWN')
            EndSwitch
        Case $hGui_2
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    GUIDelete($hGui_2)
                    $hGui_2 = 0
                Case $iKeyLeft
                    GUICtrlSetData($iLabel_2, '<<< Стрелка   ')
                Case $iKeyRight
                    GUICtrlSetData($iLabel_2, ' Стрелка >>>')
            EndSwitch
    EndSwitch
WEnd


Возникла ошибка. моя версия Autoit последняя. Scite та что шла в комплекте
Код: AutoIt [Выделить]
  $aMsg = GUIGetMsg(1)
^ ERROR
>Exit code: 1    Time: 0.1386
 

4
Стол заказов / Кодирование B58
« Последний ответ от shveicar Отправлен Сегодня в 01:09:51 »
Версия AutoIt: 3.

Всем привет.
Существует такая штука как кодирование и декодирование текста в формат B58 ru.wikipedia.org/wiki/Base58
В нете, нашел такой кодер/декодер browserling.com/tools/base58-encode написанный на Javascript.
Искал подобный кодировщик на Autoit, но так и не нашел.
Если у кого то есть готовое решение, буду признателен.
Спасибо.
5
Дни рождения / С днём рождения Dere, beliy, SHERILL!
« Последний ответ от Представитель Сообщества Отправлен Сегодня в 01:00:08 »
От имени всего Русского сообщества AutoIt поздравляем Вас Dere, beliy, SHERILL с днём рождения!



Цитировать
Пусть все мечты исполнятся,
Пусть все желанья сбудутся,
Пусть радости запомнятся,
А горести забудутся.

Здоровье будет крепкое,
В делах всегда согласие,
Любовь навеки верная —
Без ссор и разногласия.

Зарплата только вовремя,
Стабильная, высокая.
Работа будет лёгкая
И не совсем далёкая.

Пусть жизнь Вам дарит самые
Прекрасные мгновения.
Желаем только радости
И счастья, с днем рождения!
6
Общение / Каракули в autoit
« Последний ответ от deny Отправлен Сегодня в 00:48:11 »
извените,не нашел на форуме,есть старые скрипты и когда их открываю в них каракули и вообще где описание ,как исправить?
спасибо,нашел модифицированный scite ,теперь нету каракулей)
7
Код: AutoIt [Выделить]
#include <StaticConstants.au3>
#include <GUIConstantsEx.au3>

Local $iWidth, $iHeight, $hGui_1, $iLabel_1, $hGui_2, $iLabel_2, $iKeyLeft, $iKeyRight

$iWidth = Floor(@DesktopWidth / 2)
$iHeight = @DesktopHeight

$hGui_1 = GUICreate('Рисунок 1', $iWidth, $iHeight, 0, 0)
$iLabel_1 = GUICtrlCreateLabel('Кнопки мыши', 0, 300, $iWidth, 60, $SS_CENTER)

$hGui_2 = GUICreate('Рисунок 1', $iWidth, $iHeight, $iWidth, 0)
$iLabel_2 = GUICtrlCreateLabel('Кнопки "Стрелки"', 0, 300, $iWidth, 60, $SS_CENTER)

$iKeyLeft = GUICtrlCreateDummy()
$iKeyRight = GUICtrlCreateDummy()

Local $aAccelKeys[2][2] = [['{LEFT}', $iKeyLeft], ['{RIGHT}', $iKeyRight]]
GUISetAccelerators($aAccelKeys)

GUISetState(@SW_SHOW, $hGui_1)
GUISetState(@SW_SHOW, $hGui_2)
WinSetOnTop($hGui_1, '', 1)
WinSetOnTop($hGui_2, '', 1)

While ($hGui_1 - $hGui_2)
    $aMsg = GUIGetMsg(1)
    Switch $aMsg[1]
        Case $hGui_1
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    GUIDelete($hGui_1)
                    $hGui_1 = 0
                Case $GUI_EVENT_PRIMARYDOWN
                    GUICtrlSetData($iLabel_1, '$GUI_EVENT_PRIMARYDOWN')
                Case $GUI_EVENT_SECONDARYDOWN
                    GUICtrlSetData($iLabel_1, '$GUI_EVENT_SECONDARYDOWN')
            EndSwitch
        Case $hGui_2
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    GUIDelete($hGui_2)
                    $hGui_2 = 0
                Case $iKeyLeft
                    GUICtrlSetData($iLabel_2, '<<< Стрелка   ')
                Case $iKeyRight
                    GUICtrlSetData($iLabel_2, ' Стрелка >>>')
            EndSwitch
    EndSwitch
WEnd

8
Дни рождения / Re: С днём рождения vibor, EnekinSky, akmal18, CreatiK!
« Последний ответ от akmal18 Отправлен Сегодня в 00:24:06 »
Спасибо большое!
9
Стол заказов / Re: Помогите свернуть окно программы Realtek USB Wireless LAN Utility
« Последний ответ от Alofa Отправлен Вчера в 23:28:13 »
Попробуйте:
Код: AutoIt [Выделить]
#RequireAdmin ; Попробуйте с этой строкой и без нее

While Sleep(50) ; Выход через меню иконки в трее
    $hWnd_Child = WinActive('[CLASS:#32770;TITLE:Настройка общего доступа к Интернету]')
    If $hWnd_Child And BitAND(WinGetState($hWnd_Child), 2) Then
        WinSetState($hWnd_Child, '', @SW_HIDE)
        Sleep(50)
    EndIf
WEnd

10
Доброго времени суток!

Возник такой вот интересный вопрос. По сути есть кнопка, при нажатии на которую открывается окно о определенной функцией и управляется оно с помощью мыши через $GUI_EVENT_PRIMARYDOWN и $GUI_EVENT_SECONDARYDOWN ( вперед назад меняет картинку). Как сделать так, чтобы открывалось не одно окно (которое кстати на весь экран), а два ( одно на одной половине экрана, другое на другой) при этом выполняя одну и туже функцию, но в одном окне было управление мышью(вперед назад), а в другом стрелками (вперед назад).

вот это используется для мыши
Код: AutoIt [Выделить]
While 1
    $iMsg = GUIGetMsg()
    Switch $iMsg
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $GUI_EVENT_PRIMARYDOWN
            $i += 1
            If $i > $aFiles[0] Then $i = 1
            GUICtrlSetImage($iPic, $aFiles[$i])
        Case $GUI_EVENT_SECONDARYDOWN
            $i -= 1
            If $i < 1 Then $i = $aFiles[0]
            GUICtrlSetImage($iPic, $aFiles[$i])
    EndSwitch
WEnd
 

Страницы: [1] 2 3 ... 10