На всякий случай: в виде формы
Add(MainForm,2953706,147,70)
{
Width=112
Height=85
}
Add(EnumProcess,13385609,189,154)
{
link(onProcess,13397494:doCompare,[])
}
Add(Timer,8482451,119,147)
{
link(onTimer,6684126:doEvent1,[])
}
Add(StrMask,13397494,238,154)
{
Mask="*rundll32.exe*"
link(onTrue,14429084:doOn,[(275,167)(275,160)])
}
Add(Hub,6684126,161,147)
{
link(onEvent1,14429084:doOff,[])
link(onEvent2,13385609:doEnum,[])
}
Add(LED,14429084,280,140)
{
Left=10
Top=5
}
И в виде фонового приложения
Add(Service,2953706,147,63)
{
Wait=0
}
Add(EnumProcess,13385609,245,63)
{
link(onProcess,13397494:doCompare,[])
}
Add(Timer,8482451,196,63)
{
link(onTimer,13385609:doEnum,[])
}
Add(StrMask,13397494,287,63)
{
Mask="*rundll32.exe*"
link(onTrue,3279007:doMessage,[])
}
Add(Message,3279007,336,70)
{
Message="Есть Просмотр факсов!"
Caption="Внимание!"
}