Вверх ↑
Этот топик читают: Гость
Ответов: 46
Рейтинг: 6
#1: 2007-02-02 15:02:06 ЛС | профиль | цитата
Может уже было, поиском не нашёл.
Если через этот компонент свернуть приложение в трэй, то при перезагрузке Windows, при смене пользователя или выключении выскакивает ошибка с кодом 216.
С TrayIconEx таже проблема.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 3655
Рейтинг: 69
#2: 2007-02-02 15:10:42 ЛС | профиль | цитата
vyachko, Пример где
карма: 0

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#3: 2007-02-02 15:16:23 ЛС | профиль | цитата
vyachko, при смене пользователя не проверял, а вот при перезагрузке -- не правда ваша. Работает он прекрасно. У меня скрытая таким способом прога вот уже полгода работает. Может действительно какая-то лажа у тебя там еще висит, так что примерчик бы надо?
карма: 22

0
Ответов: 2125
Рейтинг: 159
#4: 2007-02-02 15:19:38 ЛС | профиль | цитата
vyachko писал(а):
выскакивает ошибка с кодом 216

Полагаю, что при закрытии программы - та же фигня. Компонент тут ни при чём, если это не из-за него при закрытии программы "выскакивает ошибка с кодом 216"
карма: 1

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#5: 2007-02-02 15:27:37 ЛС | профиль | цитата
vyachko, да, кстати, а чем компилим? FPC или Delphi?
карма: 22

0
Администрация
Ответов: 15295
Рейтинг: 1519
#6: 2007-02-02 15:35:17 ЛС | профиль | цитата
Программа ClipText из стандартного пакета у меня так же работает уже около года и разу не было такой ошибки.
карма: 27
0
Ответов: 46
Рейтинг: 6
#7: 2007-02-02 20:30:34 ЛС | профиль | цитата
Может я что-то не так делаю.
Вот пример:
Add(MainForm,16536061,280,126)
{
Left=20
Top=105
Width=206
Height=102
Caption="Пример"
BorderStyle=1
ClientSize=0
Position=1
link(onActivate,4312390:doHideMaximizeButton,[(322,132)(322,183)(270,183)(270,216)])
}
Add(SysMenu,4312390,280,196)
{
link(Handle,16536061:Handle,[])
}
Add(TrayIcon,1928070,413,189)
{
Hint="Щёлкни меня!"
link(onClick,12224407:doCase,[(464,195)(464,195)])
}
Add(Timer,4841451,343,196)
{
Interval=500
AutoStop=1
link(onTimer,1928070:doHide,[(394,202)(394,202)])
}
Add(Case,12224407,469,189)
{
Value=Integer(0)
link(onTrue,1928070:doShow,[(511,202)(511,179)(403,179)(403,195)])
}

Компилировал FPC.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26303
Рейтинг: 2146
#8: 2007-02-02 20:37:21 ЛС | профиль | цитата
vyachko, таймер уважаемый -- таймер. Терпеть он не может FPC, глючит иногда при закрытии приложения. Да и зачем его применять, в данном случае, да еще и на полсекунды.

[size=-2]------ Добавлено в 20:37
Я бы вот так сделал, если и впрямь задержка нужна. code_928
карма: 22

0
файлы: 1code_928.txt [708B] [507]
Ответов: 46
Рейтинг: 6
#9: 2007-02-02 20:58:44 ЛС | профиль | цитата
Мне всё же думается, что дело в другом.
Если сделать так:
Add(MainForm,16536061,126,91)
{
Left=20
Top=105
Width=206
Height=102
Caption="Пример"
BorderStyle=1
ClientSize=0
Position=1
link(onCreate,4312390:doHideMaximizeButton,[(168,132)(168,148)(116,148)(116,181)])
}
Add(SysMenu,4312390,126,161)
{
link(Handle,16536061:Handle,[])
}
Add(TrayIcon,1928070,280,154)
{
Hint="Щёлкни меня!"
link(onClick,12224407:doCase,[(331,160)(331,160)])
}
Add(Timer,4841451,210,161)
{
Interval=500
AutoStop=1
link(onTimer,1928070:doHide,[(261,167)(261,167)])
}
Add(Case,12224407,336,154)
{
Value=Integer(0)
link(onTrue,1928070:doShow,[(378,167)(378,144)(270,144)(270,160)])
}

То ошибка не появляется.
Т.е. если брать сигнал не с активации формы, а по созданию формы.
Хотя если из первого примера убрать Timer, TrayIco и Case то ошибки опять нет.
За Timer никогда не замечал плохого, вот только минимальное значение выдержки 10мс великовато (нужно на LPT порте формировать импульсы с периодом хотя-бы 1мс), а вот за TimerHR да, этот довольно часто глючит (потому и не применяю).
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 9906
Рейтинг: 351
#10: 2007-02-02 21:03:28 ЛС | профиль | цитата
nesco писал(а):
таймер уважаемый -- таймер. Терпеть он не может FPC

У меня терпит. Все время, причем.
Поэтому я черную кошку в темной комнате все равно не найду

nesco писал(а):
Я бы вот так сделал, если и впрямь задержка нужна

Никогда не видел необходимости в задержках
code_929
карма: 9

0
файлы: 1code_929.txt [654B] [357]
Ответов: 46
Рейтинг: 6
#11: 2007-02-02 21:05:56 ЛС | профиль | цитата
Задержка в примере не сама цель.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 9906
Рейтинг: 351
#12: 2007-02-02 21:14:59 ЛС | профиль | цитата
nesco, вообще-то это больше на такое смахивает
http://dev.hiasm.com/xf/topic.php?p=40969#P40969
карма: 9

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#13: 2007-02-02 21:34:59 ЛС | профиль | цитата
Galkov, я чего таймер-то вспомнил. Был на форуме разговор, про глючность таймера по выходу из приложения при компиляции под FPC. Все это смахивает на то, что мы уже обсуждали. У меня-то форма исправлена по твоим рекомендациям, хотя и не с SVN.

[size=-2]------ Добавлено в 21:34
ЗЫ:А схему я бы так и построил, как ты написал
карма: 22

0
Ответов: 9906
Рейтинг: 351
#14: 2007-02-02 21:36:38 ЛС | профиль | цитата
Про SVN
У меня твердое намерение вывалить туда свой вариант кодов.
((эдакая маленькая революция получается, в ответ на предложение Dilma присвоить мне звание "генерального" по проекту Delphi))
Заканиваю "шелест" по элементам - изменений многовато получается.
Еще пару дней...
карма: 9

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#15: 2007-02-02 21:43:07 ЛС | профиль | цитата
Galkov, эх SVN -- это хорошо, но вот держать две копии HiAsm'a совсем не хочется.
карма: 22

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)