Вверх ↑
Ответов: 1263
Рейтинг: 47
#1: 2019-02-17 23:43:30 ЛС | профиль | цитата
3042, спасибо, можно, но похоже именно в том компоненте двойной клик считался слишком быстро. И не хотелось бы менять общие настройки системы.

Привязка файла с своим расширением к своей программе:

Add(MainForm,181527,98,167)
{
Width=600
Height=342
link(onCreate,309512:doEvent1,[(208,187)(208,188)])
}
Add(MultiElementEx,309512,287,182)
{
@Hint=#42:Привязка и отвязка к расширениям программы|7:17.2.19|54:http://hi-asm.blogspot.com/2009/09/blog-post_8652.html|
link(onItem,15234555:doAdd,[(415,188)(415,187)])
}
BEGIN_SDK
Add(EditMultiEx,8502272,21,21)
{
WorkCount=#8:doEvent1|8:doDelete|
EventCount=#6:onItem|
Width=454
Height=473
link(doEvent1,11140096:doEvent1,[(56,27)(56,118)])
link(doDelete,9272869:doEvent1,[(137,34)(137,410)])
}
Add(Application,16504106,147,49)
{
}
Add(ArrayEnum,3764126,154,112)
{
link(onItem,8502272:onItem,[(254,118)(254,27)])
link(Array,16504106:Params,[])
}
Add(Registry,15145600,147,210)
{
Key=".afg"
Data="startenergy"
}
Add(Hub,11140096,91,112)
{
OutCount=4
link(onEvent1,3764126:doEnum,[])
link(onEvent2,15145600:doWrite,[(126,125)(126,223)])
link(onEvent3,10897908:doWrite,[(123,132)(123,272)])
link(onEvent4,775217:doStrCat,[(117,139)(117,233)(37,233)(37,328)])
}
Add(Registry,10897908,140,259)
{
Key="startenergy\shell\open"
Data="Start Energy Group File"
}
Add(StrCat,775217,49,322)
{
Str1="""
link(onStrCat,12754818:doStrCat,[])
link(Str2,16504106:AppFileName,[(62,202)(153,202)])
}
Add(StrCat,12754818,98,322)
{
Str2="" "%1""
link(onStrCat,1755851:doWrite,[])
link(Str1,775217:Result,[(104,310)(80,310)(80,366)(55,366)])
}
Add(Registry,1755851,154,315)
{
Key="startenergy\shell\open\command"
link(Data,12754818:Result,[(160,303)(132,303)(132,366)(104,366)])
link(Value,7827645:Value,[(174,303)(202,303)])
}
Add(Memory,7827645,196,259)
{
}
Add(Registry,9552397,301,390)
{
Key=".afg"
Point(doDeleteKey)
}
Add(Hub,9272869,252,404)
{
link(onEvent1,9552397:doDeleteKey,[])
link(onEvent2,6274992:doDeleteKey,[(284,417)(284,466)])
}
Add(Registry,6274992,301,446)
{
Key="startenergy"
Point(doDeleteKey)
}
END_SDK
Add(ListBox,15234555,427,181)
{
Width=584
Height=303
Align=5
}
Add(BitBtn,10243310,182,196)
{
Left=215
Top=270
Align=4
Caption="Удалить привязку"
link(onClick,309512:doDelete,[(258,202)(258,195)])
}

карма: 3
Hiasm + Flowstone + CopperCube + GoDot + JS
0
Редактировалось 2 раз(а), последний 2019-02-17 23:49:02