#sha
Add(EnumProcess,7385981,203,168)
{
DebugPrivilege=0
Point(doFindName)
Point(Name)
Point(onNotFind)
Point(onFind)
link(Name,3589740:Value,[])
link(onNotFind,9979238:doMessage,[])
link(onFind,5226021:doMessage,[])
}
Add(Button,15479384,161,189)
{
Left=10
Top=15
Width=150
Caption="Искать процесс HiAsm.exe"
link(onClick,7385981:doFindName,[])
}
Add(Memory,3589740,210,126)
{
Default=String(HiAsm.exe)
}
Add(Message,5226021,245,182)
{
Message="Процесс существует!"
}
Add(Message,9979238,280,175)
{
Message="Процесс несуществует!"
}
Add(InfoTip,631583,196,98)
{
Info=#17:Название процесса|
Height=67
}
Ответов: 315
Рейтинг: 1
|
|||
Пример на основе компонента EnumProcess (Список процессов)
|
|||
карма: 0 |
|