Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#16: 2005-10-15 17:25:36 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:11
карма: 0

0
Ответов: 1305
Рейтинг: 29
#17: 2005-10-15 17:31:05 ЛС | профиль | цитата

хоть народ и г***, но что делать

Не ругайся так, у меня там у самого сайт есть
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#18: 2005-10-15 18:07:50 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:11
карма: 0

0
Ответов: 1305
Рейтинг: 29
#19: 2005-10-15 20:02:25 ЛС | профиль | цитата
А ты не на компиллятор пеняй, дело скорее всего в схеме - что-то ты не так делаешь. Попробуй вот такой пример[code:1]Add(MainForm,1444221,42,21) {
Left=20
Top=105
}
Add(TrayIcon,7261773,105,77)
{
Hint="Щелкни правой крысой"
link(onClick,11462334:doCase,[])
}
Add(Button,15505985,42,84)
{
Left=80
Top=45
Width=135
Caption="Свернуть в трей"
link(onClick,7261773:doHide,[])
}
Add(PopupMenu,846197,217,77)
{
Menu=#10:Развернуть|1:-|5:Выход|
link(onClick,5628450:doEvent,[(268,83)(268,83)])
}
Add(Case,11462334,154,77)
{
Value=Integer(1)
link(onTrue,846197:doPopupHere,[(201,90)(201,90)])
}
Add(IndexToChanel,5628450,273,77)
{
Count=3
link(onEvent1,7261773:doShow,[(319,83)(319,58)(95,58)(95,83)])
link(onEvent3,1444221:doClose,[(319,97)(319,129)(25,129)(25,48)])
}
Add(StyleXP,10841153,98,21)
{
}
[/code:1]
У меня работает :D
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#20: 2005-10-15 21:43:18 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:11
карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#21: 2005-10-15 22:14:27 ЛС | профиль | цитата
CASPER_Y, дилма по этому поводу ничего не может сказать, т.к. не понял на каком компиляторе омпилировалась программа
карма: 27
0
Гость
Ответов: 17029
Рейтинг: 0
#22: 2005-10-15 22:35:28 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:11
карма: 0

0
Ответов: 9906
Рейтинг: 351
#23: 2005-10-15 23:08:06 ЛС | профиль | цитата
"v258" писал(а):
Модемы бывают разные, DSL например, там до 8 Mb/sec, кажется

Все равно далеко до написанного:
"Tad" писал(а):
Да у меня выделенка 750 Мбит. ........ На работе выделенка 1500 Мбит,

карма: 9

0
Ответов: 16884
Рейтинг: 1239
#24: 2005-10-15 23:47:55 ЛС | профиль | цитата
У меня модем ADSL. Найду паспорт и переводчика (паспорт на иврите)- сообщу данные. Провайдер ставит свой модем и карту в соответствии со скоростью оплаченного канала.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Администрация
Ответов: 15295
Рейтинг: 1519
#25: 2005-10-16 00:38:40 ЛС | профиль | цитата
CASPER_Y, попробуем еще раз по шагам:
вставляем этот пример в HiAsm
[code:1]Add(MainForm,1444221,161,119) {
Left=20
Top=105
}
Add(TrayIcon,7261773,224,175)
{
Hint="Щелкни правой крысой"
link(onClick,11462334:doCase,[])
}
Add(Button,15505985,161,182)
{
Left=80
Top=45
Width=135
Caption="Свернуть в трей"
link(onClick,7261773:doHide,[])
}
Add(PopupMenu,846197,336,175)
{
Menu=#10:Развернуть|1:-|5:Выход|
link(onClick,5628450:doEvent,[(387,181)(387,181)])
}
Add(Case,11462334,273,175)
{
Value=Integer(1)
link(onTrue,846197:doPopupHere,[(320,188)(320,188)])
}
Add(IndexToChanel,5628450,392,175)
{
Count=3
link(onEvent1,7261773:doShow,[(438,181)(438,156)(214,156)(214,181)])
link(onEvent3,1444221:doClose,[(438,195)(438,227)(144,227)(144,146)])
}
[/code:1]
и описываем тут все, что делаем и видим.
Я проверил на Delphi и FPC(а так же FPC2) работает все как надо без указанных выше глюков.
карма: 27
0
Гость
Ответов: 17029
Рейтинг: 0
#26: 2005-10-16 13:17:53 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:11
карма: 0

0
Ответов: 1305
Рейтинг: 29
#27: 2005-10-16 17:21:19 ЛС | профиль | цитата
CASPER_Y, так какой компиллятор выбран для компилляции? То, что Дельфи установлен, еще не значит, что именно он используется. Его еще надо выбрать в качестве основного
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#28: 2005-10-16 20:03:09 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:12
карма: 0

0
Ответов: 1305
Рейтинг: 29
#29: 2005-10-16 20:39:08 ЛС | профиль | цитата
Сходи в папку HiAsmInt u (или en, если ты пользуешь английский интерфейс) и в файле project.txt посмотри строку [code:1]Make=delphi4,FPC[/code:1] Первый компиллятор используется по умолчанию

Как вариант - в меню Сервис -- Пакеты скинь галочку FPC, убедись, что стоит галочка на Дельфи4 и нажми ОК. Тогда у тебя останется только компиллятор Дельфи

Попробуй. Твои симптомы говорят о том, что ты все-таки FPC используешь
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#30: 2005-10-17 15:37:19 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:03:12
карма: 0

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