[Maza Faka]

Жмем на ссылку в программе »

Что за программа?

Вместо браузера кладем свою программу »

Какую программу? Куда?

Поконкретней пожалуйста

[RAMzor]

Хмм... похоже на баг, если не использовать функцию GUICtrlSetStyle, то ToolTip срабатывает. »

Да, и я это заметил... Может есть способ обойти это безобтазие?

[Maza Faka]

Может есть способ обойти это безобтазие? »

WinAPI спешит на помощь!

Код:

#include <GUIConstants.au3>
#include <StaticConstants.au3>
#include <WinAPI.au3>
#include <Constants.au3>

GUICreate("My GUI", 250, 150)

$Btn1 = GUICtrlCreateButton("ON", 10, 10, 50)

$Btn2 = GUICtrlCreateButton("OFF", 10, 40, 50)

$Label = GUICtrlCreateLabel("Test", 70, 45, 53, 15)
$hLabel = GUICtrlGetHandle($Label)

GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Btn1
            $iStyle = _WinAPI_GetWindowLong($hLabel, $GWL_STYLE)
            _WinAPI_SetWindowLong($hLabel, $GWL_STYLE, BitOR($iStyle, $SS_GRAYFRAME))

            GUICtrlSetBkColor($Label, 0xFFFF00)
            GUICtrlSetTip($Label, "My TIP")
        Case $Btn2
            GUICtrlSetStyle(-1, $SS_GRAYFRAME)
    EndSwitch
WEnd

[266903582]

Что за программа? »

Абсолютно любая: почтовый менеджер (ссылка в письме) файлменеджер (открываем файл *.url)

Какую программу? Куда? »

Моя программа на автоите. Читает параметры командной строки и распоряжается ими.

Код:

MsgBox(0,"",$CmdLineRaw)

Если такую программу познакомить с системой, как новый браузер по умолчанию, то и произойдет описываемая ошибка.
Чтобы не курочить реестр понапрасну, замени ехе-шник своего браузера и запусти сторонний линк. Вместе с нужными параметрами будет бонус.

[Creat0R]

Почему? »

Я вроде написал причину... вообщем чтобы не было проблем вроде той что была у SAOPP.
Пусть WinSetState(Title, Text, 8) и активирует, даже скрытое окно, ведь эта функция и предназначена для установки состояния окна, а WinActivate пусть работает с видимыми окнами, у нас уже есть вроде функции которые только с видимыми умеют работать.

Может быть в @extended сохраняется состояние окна перед активизацией? »

Ну да, но об этом в справке не пишут.

[Creat0R]

WinAPI спешит на помощь! »

Хе-хе, оказывается это не бага, ну по крайней мере оно решается и нативными средствами:

Код:

#include <GUIConstants.au3>
#include <StaticConstants.au3>

GUICreate("My GUI", 250, 150)

$Btn1 = GUICtrlCreateButton("ON", 10, 10, 50)
$Btn2 = GUICtrlCreateButton("OFF", 10, 40, 50)

$Label = GUICtrlCreateLabel("Test", 70, 45, 53, 15)

GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Btn1
            GUICtrlSetStyle($Label, BitOr($GUI_SS_DEFAULT_LABEL, $SS_NOTIFY))

            GUICtrlSetBkColor($Label, 0xFFFF00)
            GUICtrlSetTip($Label, "My TIP")
        Case $Btn2
            GUICtrlSetStyle($Label, BitOr($GUI_SS_DEFAULT_LABEL, $SS_NOTIFY, $SS_GRAYFRAME))
    EndSwitch
WEnd

Видимо просто при использовании GUICtrlSetStyle стиль $SS_NOTIFY сбрасывается, а он нужен для обработки событии (внутренней обработки аутоитом, например для того же Tip'са ).

P.S
А я уже баг репорт отправил

[TERMINAL]

Возможно ли узнать тип процессора (Intel или AMD) ?

[Maza Faka]

Пусть WinSetState(Title, Text, 8) и активирует, даже скрытое окно, ведь эта функция и предназначена для установки состояния окна, а WinActivate пусть работает с видимыми окнами »

Ну это разработчикам виднее.

Хе-хе, оказывается это не бага, ну по крайней мере оно решается и нативными средствами »

А я уже баг репорт отправил »

Мдаа... поторопились с баг репортом

Возможно ли узнать тип процессора (Intel или AMD) ? »

Можно используя WMI:

Код:

$strComputer = "."

$objWMIService = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\" & $strComputer & "\root\cimv2")
$colItems = $objWMIService.ExecQuery("Select * from Win32_Processor")

For $objItem In $colItems
    ConsoleWrite("Manufacturer: " & $objItem.Manufacturer & @LF & _
                 "Name: " & $objItem.Name & @LF)
Next

[litus]

Добрый демь после дебат по поводу сворачивания окна от которого мой почтовый ящик слегка вструхнуло.Мой вопрос будет выглядить на уровне детского сада. Вопрос в следующем помогите написать первый мой масив
Пример кода:
#include <GUIConstants.au3>
GUICreate("Моё окно", 200, 115)

$List_001 = GUICtrlCreateCombo ("", 5, 5, 100, 20)
GUICtrlSetData(-1, "Роза|Тюльпан|Гвоздика", "Роза")

$Button_001 = GUICtrlCreateButton ("Ok", 20, 80, 75, 20)


GUISetState ()

While 1
$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Select
Case $msg = $Button_001
IniWrite("List.ini", "List", "List", GUICtrlRead($List_001))
Exit
EndSelect
Wend
Может я не правельно выразилсяна щёт масива но суть в следующем:если выбераю "Роза" то в ини фаел передаёться "1" если "Тюльпан"то "2" а если "Гвоздика то "3" чтение справки недало результата хотелось бы живой премер.

[266903582]

Может я не правельно выразилсяна щёт масива но суть в следующем:если выбераю "Роза" то в ини фаел передаёться "1" если "Тюльпан"то "2" а если "Гвоздика то "3" чтение справки недало результата хотелось бы живой премер. »

Код:

#include <GUIConstants.au3>
GUICreate("Моё окно", 200, 115)

$List_001 = GUICtrlCreateCombo ("", 5, 5, 100, 20)
GUICtrlSetData(-1, "Роза|Тюльпан|Гвоздика", "Роза")
$Button_001 = GUICtrlCreateButton ("Ok", 20, 80, 75, 20)
GUISetState ()

While 1
       $msg = GUIGetMsg()
       If $msg = $GUI_EVENT_CLOSE Then ExitLoop
       Select
              Case $msg = $Button_001
              if GUICtrlRead($List_001)="Роза"     Then iniWrite("List.ini", "List", "List","1")
              if GUICtrlRead($List_001)="Тюльпан"  Then iniWrite("List.ini", "List", "List","2")
              if GUICtrlRead($List_001)="Гвоздика" Then iniWrite("List.ini", "List", "List","3")
              exitloop
       EndSelect
Wend

И если необходимо убить GUI, то не обязательно закрывать всю программу...