Что нового

Помогите свернуть готовую программу в трей

wh1ga

Новичок
Сообщения
3
Репутация
0
Извиняюсь если пишу не в том разделе, но я новичёк :-[
Вобщем проблема в том, что скачал исходник одной программки, но она не сворачивается в трей. Посмотрел пару примеров, но добавить сворачивание к программе так и не получилось :'(
Помогите пожалуйста, добрые люди...
Исходник брать там -> http://multi-up.com/246404 <-
Заранее спасибо :whistle:
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
Re: Сворачивание в трей

1. {TopicNameWarn}
2.
wh1ga [?]
скачал исходник одной программки
у программки есть название и офф. сайт? и почему ссылка на скачивание ведет на файлообменник?
 
Автор
W

wh1ga

Новичок
Сообщения
3
Репутация
0
Переименуйте тему иначе она будет закрыта.
Такое пойдёт? :whistle:

у программки есть название и офф. сайт? и почему ссылка на скачивание ведет на файлообменник?
Программа называется Ftool Extended 0.9, офф.сайта не имеет, создатель не известен. Программу видел выложенной на свободное скачивание вместе с исходником не на одном форуме.
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
wh1ga
Файл - FTool Extended.au3
После строки
Код:
GUISetOnEvent(-3,"_Exit")

добавь вот эту строку
Код:
GUISetOnEvent($GUI_EVENT_MINIMIZE, "_ToTray")

Строки
Код:
$tray = TrayCreateItem("Выход")
TrayItemSetOnEvent($tray,"_Exit")

Измени на
Код:
$tray1 = TrayCreateItem("Выход")
TrayItemSetOnEvent($tray1,"_Exit")

и добавь после них следующие
Код:
$tray2 = TrayCreateItem("Восстановить из трея")
TrayItemSetOnEvent($tray2,"_Restore")

В самом конце добавь следующие функции
Код:
Func _Restore()
	WinSetState("FTool Extended 0.9 RU", '', @SW_SHOW)
EndFunc

Func _ToTray()
	WinSetState("FTool Extended 0.9 RU", '', @SW_HIDE)
EndFunc

остальные файлы можно не трогать
 
Автор
W

wh1ga

Новичок
Сообщения
3
Репутация
0
Чуть изменил функцию, чтоб окно сразу разворачивалось.
Код:
Func _Restore()
    WinSetState("FTool Extended 0.9 RU", '', @SW_SHOW)
    WinSetState("FTool Extended 0.9 RU", '', @SW_RESTORE)
EndFunc

Спасибо огромное, работает отлично :IL_AutoIt_1:
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
wh1ga
если вопрос исчерпан, то можно отметить тему решенной!
 
Верх