Официальный сайт студ.городка НГТУ
Программирование и БД » Помогите в составлениии алгоритма. 

#1  11.09.07 17:59

Помогите в составлениии алгоритма.

В трее "сидит" программка (не важно какая).
Необходимо, чтобы при нажатии левой кнопкой мышки запускался графический интерфейс проги (при повторном нажатии он прятался), при нажатии правой кнопкой мышки вылазило меню с настройками.
Алгоритм мне необходим на AutoIt, но, если вы поделитесь алгоритмами на других языках, то это тоже будет очень хорошо (просто я думаю, что везде один и тот же принцип построения, и, если будет пример я без особого труда сделаю, как мне надо на AutoIt, поправьте, если не прав).

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

Offline

#2  11.09.07 18:13

Re: Помогите в составлениии алгоритма.

While 1
    TraySetToolTip($dd[1] & $dd[2] & $dd[3] &$dd[4] & $dd[5])
    $tgm=TrayGetMsg()
    $ggm=GUIGetMsg()
    $dd=IniReadSection("GoodMorning.ini", "Ding-Dong")
    Select
        Case $tgm=$budset11
            GUICreate("Áóäèëüíèê #1", 200, 90)
            $dd_=GUICtrlCreateDate($dd[1][0] & ":00", 60, 15, 80, 20, $DTS_TIMEFORMAT)
            $dd[1][0]=$dd_
            $ok=GUICtrlCreateButton("Àêåé", 60, 50, 80)
            GUISetState ()
            $dd[1][1]=IniWrite("GoodMorning.ini", "Ding-Dong", "Áóäèëüíèê #1", "on")
            TraySetToolTip(@HOUR & ":" & @MIN & ", " & $wday & @CRLF & @MDAY & " " & $mon & " " & @YEAR & @CRLF & "Áóäèëüíèê #1 = " & $dd_)
        Case $tgm=$budoff12
            $dd[1][1]=IniWrite("GoodMorning.ini", "Ding-Dong", "Áóäèëüíèê #1", "off")
        Case $tgm=$snd1
            SoundPlay(@WindowsDir & "\media\tada.wav")
        Case $tgm=$snd2
            SoundPlay(@WindowsDir & "\media\tada.wav")
        Case $tgm=$message
            $msg=InputBox("GoodMorning", "Ââåäèòå ñîîáùåíèå.", "Âñòàâàé êîçåë!")
        Case $tgm=$calendar
            GUICreate("Êàëåíäàðü", 220, 195)
            GUICtrlCreateDate("", 10, 10)
            GUISetState()
        Case $tgm=$volume
            Run("sndvol32.exe")
        Case $tgm=$exititem
            ExitLoop
        Case $ggm=$GUI_EVENT_CLOSE
            GUIDelete()
            Exit
        Case $ggm=$ok
            GUIDelete()
    EndSelect
WEnd

То, что корявками, это просто раскраска не понимает русский.

Исправлено kefir (25.09.07 23:12)

Offline

Программирование и БД » Помогите в составлениии алгоритма. 

ФутЕр:)

© Hostel Web Group, 2002-2025.   Сообщить об ошибке

Сгенерировано за 0.059 сек.
Выполнено 14 запросов.