[Creat0R]

amel27,

эта комбинация неотключаемая aka "in design"

Я как бы знал это, но мне не нужно их отключать, а просто убедиться что всё остальное действительно отключено... у тебя случайно на клаве нет лишних кнопочек? например Power/Sleep которая обычно делает то, что на ней написано

подправил штатную _GUICtrlStatusBar_SetText() для случая юникода...

Эх, не дано мне пока этим воспользоваться, я не ставил ещё последнюю версию, боюсь - у меня много скриптов, всё мгновенно поламется, желание сразу пропадёт что либо там менять .

Но всё ровно конечно спасибо, когда обновлюсь (не скоро видимо) оно мне пригодится.

[amel27]

Creat0R

у тебя случайно на клаве нет лишних кнопочек? например Power/Sleep »

угу, кнопки питания не блокируются... на MSDN по этому поводу написано, что эти события не доходят до API, т.е. их нужно перехватывать раньше - в драйвере клавиатурного фильтра: How to disable the keyboard Sleep button with a filter driver... хотя можно попытаться порулить политикой питания, на ентот счет есть свои API и, к примеру, менять эти настройки на время блокировки

я не ставил ещё последнюю версию »

не вопрос - вот вариант для версии 3.2.8.1, там в общем все довольно просто... объединил заодно две функции в одну - теперь кодировку текста можно задавать прямо в параметрах (для текста в UTF8 - 65001)... Кстати, обнаружил что, в 10-ке алгоритм более продуманный в плане производительности.

Код:

Func _GUICtrlStatusBarSetTextEx($h_StatusBar, $s_Data = "", $i_Part = 0, $iCode = 0)
    If Not IsHWnd($h_StatusBar) Then $h_StatusBar = HWnd($h_StatusBar)
    If Not _IsClassName ($h_StatusBar, "msctls_statusbar32") Then Return SetError(-1, -1, False)
    Local $ret = DllCall("Kernel32.dll", "int", "MultiByteToWideChar", _
        "int", $iCode, "int", 0, _
        "str", $s_Data, "int", -1, _
        "ptr", 0, "int", 0)
    If $ret[0]=0 Then Return SetError(-1, -1, 0)
    Local $struct_String = DllStructCreate("byte[" & $ret[0]*2+2 & "]")
    Local $sBuffer_pointer = DllStructGetPtr($struct_String)
    Local $struct_MemMap
    Local $Memory_pointer = _MemInit ($h_StatusBar, DllStructGetSize($struct_String), $struct_MemMap)
    If @error Then
        _MemFree ($struct_MemMap)
        Return SetError(-1, -1, 0)
    EndIf
    $ret = DllCall("Kernel32.dll", "int", "MultiByteToWideChar", _
        "int", $iCode, "int", 0, _
        "str", $s_Data, "int", -1, _
        "ptr", DllStructGetPtr($struct_String), "int", $ret[0])
    If $ret[0]=0 Then
        _MemFree ($struct_MemMap)
        Return SetError(-1, -1, 0)
    EndIf
    _MemWrite ($struct_MemMap, $sBuffer_pointer)
    If @error Then
        _MemFree ($struct_MemMap)
        Return SetError(-1, -1, 0)
    EndIf
    $ret = _SendMessage($h_StatusBar, $SB_SETTEXT+10, $i_Part, $Memory_pointer)
    If @error Then
        _MemFree ($struct_MemMap)
        Return SetError(-1, -1, 0)
    EndIf
    _MemFree ($struct_MemMap)
    Return $ret
EndFunc   ;==>_GUICtrlStatusBarSetTextEx

[SvetlanaK]

Здравствуйте!
вклиниваюсь в переписку по очень важному для меня вопросу....
не знает ли кто-то как решить такую проблему. Речь идет об открытии файла эксель.
$sFilePath="C:\фйлик.xls"
$oExcel_Pr_M = _ExcelBookOpen($sFilePath)
открываю файл Exel. Но он имеет сязи с другими книгами, и при открытии всплывает предупреждение Microsoft Excel - "Эта книга содержит связи с другими источниками данных..." и три кнопки - обновить, не обновлять и справка.
В этот момент скрипт останавливается!!!! пока я руками не сделаю выбор...это же неправильно( пробовала послать Send - бесполезно! причем как-то странно реагирует на посыл, раз сделает как надо, раз - нет( я не понимаю в чем дело. Мне надо ответить - "не обновлять" и дальше двигаться...но на этом все встало((

[Angelus]

Прошу прощения..но ктонить может обьяснить мне тупому почему данная каманда не работаает???

Код:

Run ( @SystemDir )

[SvetlanaK]

а вы какую программу там хотите запустить? вот например это запускается без проблем
Run(@SystemDir & "\cmd.exe")

[Drsmog]

Как выслать в EXEL 2003 клавиши Ctrl+a
я делаю так send('{Ctrl}+{a}')
и несрабатывает :-((, а должно было все выделится

[amel27]

SvetlanaK,

Мне надо ответить - "не обновлять" »

хм, а почему "не обновлять"?.. Вот нажатие "обновлять" можно "автоматизировать" в Excel: параметры\правка\запрашивать об обновлении... Проблема в том, что скрипт простаивает ожидая завершения открытия файа, поэтому чтобы нажать на кнопку нужен уже второй скрипт... Можно конечно замутить аналог AdLib на CallBack, но для этого нужно знать версию AutoIT... а может все-таки "обновить"?

Drsmog

Код:

send("^a")

[Angelus]

Я хочу просто открыть провадник в какойто папке...без запуска програм...неуж нада кокуюто прогу оязательно??

[Drsmog]

это send("^a") несрабатывает он мне просто вставляет эти символы

[Drsmog]

а усе разобрался вобщем так

ControlFocus ( $EXEL, "", 'MsoCommandBar')

SEND("^ф") ; это нажимает как Ctrl+a