Вверх ↑
Этот топик читают: Гость
Ответов: 91
Рейтинг: 6
#46: 2015-05-24 10:18:02 ЛС | профиль | цитата
andrestudio Спасибо!!!
Пример не работает так как у меня компонент "Использование ActiveX" не активен... По форуму искал - ничего подобного нет...
Что надо сделать чтобы эту иконку можно было на рабочий лист поставить?
карма: 0

0
Ответов: 2059
Рейтинг: 131
#47: 2015-05-24 14:21:48 ЛС | профиль | цитата
ibegen
Файлы устанавливаются только на Win7-32.

Очень странно, у меня стоит Win7-64 (максимальная), - всё работает.
Только что пробовал, правда без антивируса, потому что снёс его месяца 2 назад.
Что надо сделать чтобы эту иконку можно было на рабочий лист поставить?

О какой иконке идёт речь, или я чего-то не догоняю?
Примерно так делается:

Add(MainForm,2953706,140,133)
{
Width=378
}
Add(UseActiveX,11624200,308,182)
{
Left=10
Top=10
Width=235
Height=200
CLSID="isAnalogLibrary.iKnobX"
}
Add(UpDown,1145591,175,196)
{
Left=335
Top=5
Max=5
link(onPosition,11449393:doAdd,[])
}
Add(MT_AddData,11449393,231,196)
{
link(onAdd,11624200:doSetProp,[])
link(Data1,16355398:Value,[])
link(Data2,1145591:Position,[(244,184)(212,184)(212,240)(181,240)])
}
Add(Memory,16355398,231,140)
{
Default=String(IndicatorStyle)
}




Add(MainForm,2953706,21,105)
{
}
Add(UseActiveX,7012104,189,56)
{
Left=5
Top=5
Width=20
Height=50
CLSID="isDigitalLibrary.iSwitchToggleX"
link(onEvent,8217277:doCase,[])
link(onGetProp,13355806:doCheck,[(247,69)(247,111)])
}
Add(Case,8217277,280,56)
{
Value=String(OnChangeUser)
DataOnTrue=String(Active)
link(onTrue,7012104:doGetProp,[(324,69)(324,57)(177,57)(177,69)])
}
Add(CheckBox,13355806,273,105)
{
Left=5
Top=60
}
Add(UseActiveX,10501589,308,315)
{
Left=165
Top=10
Width=210
Height=160
CLSID="iProfessionalLibrary.iSpectrumDisplayX"
}
Add(Edit,9581282,161,308)
{
Left=165
Top=175
Width=210
Text=""
link(onEnter,9145625:doValue,[])
}
Add(MT_AddData,5482690,259,315)
{
Count=3
link(onAdd,10501589:doExecute,[])
link(Data1,12911744:Value,[])
link(Data2,8980469:Value,[])
link(Data3,9145625:Value,[(279,303)(247,303)(247,359)(216,359)])
}
Add(Memory,8980469,266,259)
{
Default=Integer(1)
}
Add(Memory,9145625,210,315)
{
link(onData,5482690:doAdd,[])
}
Add(Memory,12911744,259,217)
{
Default=String(SetBarValue)
}



Вот попробуй https://yadi.sk/d/YRs4c9aHgqJ7J
По моему то, что ты искал.
карма: 6

0
файлы: 1code_35718.txt [884B] [643]
Ответов: 91
Рейтинг: 6
#48: 2015-05-24 17:00:16 ЛС | профиль | цитата
Спасибо flint2!
Не имею прав для прикрепления картинок. Попытаюсь объяснить словами.
В исходном видео можно увидеть что компонент ActiveX просто перетаскивается на рабочий лист.
То есть иду в панель "Контроль", нажимаю любую иконку и тащу её на рабочий лист.
Это можно сделать со всеми иконками в этом меню.
Но вот если я нажимаю иконку "использовать ActiveX" и тащу её на рабочий лист - ничего не происходит....
То есть иконки не остается на рабочем листе.

Добавил чуть позже.
Попробовал ваш пример flint2. Все работает но только на W7 - 32.
И ваша программа и ваш пример в HiAsm. Так вот на рабочем листе вашего пример есть иконка Use ActiveX, а вот добавить свою я не могу.
Попробовал так:
Создать новый проект - скопировать в буфер обмена с ВАШЕГО листа компонент Use ActiveX и вставить из буфера на мой проект - так можно....

В чем же засада?

карма: 0

0
Ответов: 2059
Рейтинг: 131
#49: 2015-05-24 20:17:48 ЛС | профиль | цитата
ibegen
Все работает но только на W7 - 32.

Охотно верю, хотя странно. Ведь есть папки Program Files (x86) и Program Files - которая(64), а из папки Program Files (x86) много чего с ActiveX.
и тащу её на рабочий лист - ничего не происходит....

Скорее всего компонент в базе криво прописан, или прописан, а в ...ElementsDelphiconf, или ...ElementsDelphicode он с ошибкой.
Попробуй удалить и поставить заново из отсюда http://svn.hiasm.com/packs/delphi/
карма: 6

1
Голосовали:ibegen
Ответов: 91
Рейтинг: 6
#50: 2015-05-24 22:37:49 ЛС | профиль | цитата
Спасибо за помощь Flint!!!
Все устаканилось после того как поставил альтернативную сборку... Я заморочился компилятором и нашел топик по теме альтернативной сборки.
Теперь в Вин7-32 все работает. А вот Вин8-64 программа даже не запускается. Ну эт ничего - прорвемся.
Для меня просто ещё очень трудно ориентироваться в HiAsm - второй день все таки. И очень уж форум раскидан в пространстве и времени.....
Трудно что то искать.

карма: 0

0
Ответов: 4621
Рейтинг: 746
#51: 2015-05-25 13:41:53 ЛС | профиль | цитата
Проблема была в том, что для стандартного компилятора FPC компонент UseActiveX специально отключен, так как не работает с ним.
карма: 26

0
Ответов: 1925
Рейтинг: 172
#52: 2015-05-29 21:12:38 ЛС | профиль | цитата
ibegen, насчёт компонентов - http://rutracker.org/forum/viewtopic.php?t=1871180. Вроде полная версия, но я не проверял, смотри сам там.
карма: 9
0
Ответов: 91
Рейтинг: 6
#53: 2015-05-29 22:02:40 ЛС | профиль | цитата
Спасибо!
Вот что там пишут -
К сожалению, это Evaluation версия, как и все версии 4.х которые я встречал работает примерно 10 минут, а потом перестает опращивать опс сервер. Уважаемый Tzar у вас нет уже пролеченной версии 4.х этик компонент?


Но я скачал. Как освою HiAsm - одназначно попробую, а пока понимаю что ничего не понимаю...
Оказывается сложно то как... запомнить где какой компонент и как с ним работать....
Вы не поверите, вчера вечером только нашел где лежит компонент convertor... 3 дня искал.....
карма: 0

0
Ответов: 16
Рейтинг: 0
#54: 2017-01-05 14:03:38 ЛС | профиль | цитата
Здравствуйте, товарищи! Хотел у Вас спросить! Почему компонент ActiveX не ставится на рабочий лист и все битые ссылки. Что делать? Хотел скачать, все ссылки битые. Пожалуйста залейте на файлобменик.

Редактировалось 2 раз(а), последний 2017-01-05 14:04:14
карма: 0

0
Ответов: 16
Рейтинг: 0
#55: 2017-01-05 19:02:00 ЛС | профиль | цитата
Скачал из ночного сборка и работает ActiveX. Не нужна помощь.

Редактировалось 1 раз(а), последний 2017-01-05 19:02:22
карма: 0

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