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

[Ded Vova]

amel27,
Цитата amel27:



Насколько я понял речь о символических ссылках,

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

да совершенно верное понимание проблемы. Просто я этих стандартных API не знаю.



М..маленький прбмерчик бы!

[Creat0R]

Ded Vova,
Цитата:

Класс «TWizardForm», button «TRadioButton 1», ID:983410.

Вот так должно сработать:

Код:

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

ControlClick("[CLASS:TWizardForm]", "", "TRadioButton1")

Цитата:

Вот такая ерунда!

ControlCommand() требует как минимум 4 параметра, я только не понял зачем там нужна эта команда?

[amel27]

amel27, Огроменное спасибо! Все замечательно работает!!!

[Creat0R]

Цитата NikLok:



Огроменное спасибо

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

Спасибо сайту

FlexHEX

за исходники и описание недокументированных структур,

кстати, там есть и бинарники на случай CMD

[Ded Vova]

amel27, А в GUI можно мигающую строку (элемент ListView) сделать. Или обязательно программно самому мигать!?

[homesad]

NikLok

это не ко мне - в визуальных эффектах я не силен, имхо тут достаточно спецов по ГУИ



Creat0R


Цитата:



можно как то поправить и твои функции, чтобы поддерживали Unicode?

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

легко :



- заменить во всех структурах "char" на "wchar";

- в DllCall() жестко задать вызов WideChar-редакции API функции;

- заменить в SendMessage() коды сообщений с ANSI на WideChar.

[DENoszone]

Цитата NikLok:



А в GUI можно мигающую строку (элемент ListView) сделать. Или обязательно программно самому мигать!?

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

По моему только программно и можно:



Код:

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

#include 
Global $color = 0xFF0000
$hGUI = GUICreate("Test GUI", 300, 200)
$hListView = GUICtrlCreateListView("Item|SubItem", 10, 10, 280, 180)
$LV_Item = GUICtrlCreateListViewItem("Item1|SubItem1", $hListView)
GUICtrlSetColor(-1, $color)
GUISetState()
AdlibEnable("_FlashItem", 500)
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
AdlibDisable()
Func _FlashItem()
    $color = BitNOT($color)
    GUICtrlSetColor($LV_Item, $color)
EndFunc

Можно конечно и с помощью CallBack сделать, но много возни с рисованием текста и его раскрашиванием.

[amel27]

amel27,
Цитата amel27:



легко :

- заменить во всех структурах "char" на "wchar";

- в DllCall() жестко задать вызов WideChar-редакции API функции;

- заменить в SendMessage() коды сообщений с ANSI на WideChar.

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

Спасибо! Теперь я буду знать как добавлять поддержку Unicode!

[Maza Faka]

amel27

Если найдётся время посмотри пожалуйста где ошибка.

Пытаюсь реализовать вот такой хинт:



Код:

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

#include 
Global Const $HH_DISPLAY_TEXT_POPUP = 0xE
Global Const $HH_CLOSE_ALL = 0x12
Global $DllRet
$hGUI = GUICreate("Test GUI", 300, 200, -1, -1, BitOR($WS_CAPTION, $WS_POPUP, $WS_SYSMENU), $WS_EX_CONTEXTHELP)
$hInput1 = GUICtrlCreateInput("", 50, 50, 200, 20)
$hInput2 = GUICtrlCreateInput("Input text here", 50, 100, 200, 20)
$HelpButton = GUICtrlCreateButton("Help", 20, 160, 60, 25)
$HH_POPUP = DllStructCreate("int Size;hwnd Dll;int String;char Text[256];ptr Top;int Foreground;int Background;int Margins;str Font")
DllStructSetData($HH_POPUP, "Size", DllStructGetSize($HH_POPUP))
DllStructSetData($HH_POPUP, "String", 0)
DllStructSetData($HH_POPUP, "Text", "Help Popup")
DllStructSetData($HH_POPUP, "Top", 200)
DllStructSetData($HH_POPUP, "Foreground", -1)
DllStructSetData($HH_POPUP, "Background", -1)
DllStructSetData($HH_POPUP, "Margins", -1)
GUISetState()
While 1
    Switch GUIGetMsg()
        Case -3
            ExitLoop
        Case $HelpButton
            $DllRet = DllCall("HHCtrl.ocx", "hwnd", "HtmlHelp", "hwnd", $hGUI, "str", 0, _
            "int", $HH_DISPLAY_TEXT_POPUP, "ptr", DllStructGetPtr($HH_POPUP))
            $DllRet = $DllRet[0]
            ConsoleWrite($DllRet & @LF)
    EndSwitch
WEnd
DllCall("HHctrl.ocx", "hwnd", "HtmlHelp", "hwnd", $DllRet, "str", "", "int", $HH_CLOSE_ALL, "int", 0)

Источники:

1

;

2

;

3

[DENoszone]

Цитата HORRIBLE:



А как переводить числа из 10-ой в двоичную систему??

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

Наверное Binary()