zhorik5 писал(а):
откуда ты это берешь?Всё намного банальнее. Из реестра.
Для каждого типа файлов есть свой перечень действий.
Для EXE файлов он один
Add(MainForm,2953706,70,175)
{
link(onCreate,8837513:doEnumKeys,[])
}
Add(Memo,5298743,182,182)
{
Left=75
Top=45
Width=280
Height=200
Align=5
Font=[Lucida Console,12,0,0,204]
Antialiased=1
ScrollBars=3
}
Add(Registry,8837513,126,175)
{
Key="exefile\shell\"
Point(doEnumKeys)
Point(onEnumKey)
link(onEnumKey,5298743:doAdd,[])
}
Add(MainForm,2953706,70,112)
{
link(onCreate,15228003:doEnumKeys,[])
}
Add(Registry,15228003,126,112)
{
Key="cplfile\shell\"
Point(doEnumKeys)
Point(onEnumKey)
link(onEnumKey,5298743:doAdd,[])
}
Add(Memo,5298743,182,119)
{
Left=75
Top=45
Width=280
Height=200
Align=5
Font=[Lucida Console,12,0,0,204]
Antialiased=1
ScrollBars=3
}