Схема-то не доделана и и точка у всплывающего меню висит в воздухе, а главную форму надо сделать видимой.
Это что должны все колупатся, чтобы посмотреть, что не работает?
при фактически неравных числах в них.
Они равны!И равны они - nil.
Add(MainForm,10623783,154,112)
{
link(onCreate,14060359:doEvent1,[(208,132)(208,118)])
}
Add(PopupMenuEx,14068898,392,238)
{
IconByIndex=0
Menu=#5:Выход|4:Вход|0:|
Bitmaps=[]
}
Add(WinExec,14874742,371,119)
{
FileName="ProxHTTPSProxy.exe"
Mode=0
Point(ProcessID)
link(onExec,8258297:doData,[(411,125)(411,174)])
}
Add(EnumProcess,6545238,532,154)
{
Point(onFind)
Point(onNotFind)
link(ID,3806134:Var2,[(538,146)(482,146)])
link(onFind,3421579:doBeep,[])
link(onNotFind,5000367:doEvent2,[(571,174)(571,206)(335,206)(335,132)])
}
Add(GlobalVar,15375690,476,98)
{
Name="var_Proc_ID"
Data=Integer(0)
link(onValue,3684219:doEvent1,[(572,104)(572,125)])
}
Add(DoData,8258297,420,168)
{
Data=Integer(0)
link(onEventData,15375690:doValue,[(464,174)(464,104)])
}
Add(Hub,14060359,231,112)
{
link(onEvent1,4893606:doStart,[])
}
Add(Hub,5000367,343,119)
{
InCount=2
OutCount=1
link(onEvent1,14874742:doExec,[])
}
Add(Hub,13933911,497,161)
{
InCount=2
OutCount=1
link(onEvent1,6545238:doFindID,[])
}
Add(Beep,3421579,581,161)
{
Freq=0
Duration=10000
link(onBeep,13933911:doEvent2,[(621,167)(621,200)(488,200)(488,174)])
}
Add(WinTools,293167,343,371)
{
Point(FileName)
Point(doNormal)
Point(isVisible)
link(Handle,264553:Var,[(349,354)(999,354)(999,259)(874,259)])
}
Add(GlobalVar,1216680,868,266)
{
Name="var____Win_Caption"
Data=String()
}
Add(Thread,4893606,294,112)
{
link(onExec,5000367:doEvent1,[(335,118)(335,125)])
}
Add(Between,3305856,315,238)
{
Left=Integer(1)
Right=Integer(1)
link(onTrue,14068898:doPopupHere,[(369,251)(369,244)])
}
Add(WinInfo,6953584,651,210)
{
Point(ProcessID)
link(onWinInfo,4977417:doCompare,[(699,216)(699,272)])
link(Handle,5159531:Var2,[])
}
Add(WinEnum,704221,651,119)
{
VisibleOnly=1
Point(ClassName)
link(onFindWindow,6953584:doWinInfo,[(730,125)(730,171)(639,171)(639,216)])
}
Add(GlobalVar,7513859,868,315)
{
Name="var_Win_ClassName"
Data=String()
}
Add(DoData,14488710,812,266)
{
Data=String()
link(onEventData,1216680:doValue,[])
link(Data,6953584:Caption,[(818,254)(664,254)])
}
Add(DoData,2647657,812,315)
{
Data=String()
link(onEventData,7513859:doValue,[])
link(Data,6953584:ClassName,[(818,304)(657,304)])
}
Add(Hub,3684219,588,119)
{
link(onEvent1,704221:doEnum,[])
link(onEvent2,13933911:doEvent1,[(617,132)(617,149)(485,149)(485,167)])
}
Add(If_else,4977417,714,266)
{
link(onTrue,8424737:doEvent1,[])
link(Op1,583769:Var,[(720,254)(654,254)(654,290)(587,290)])
link(Op2,7141204:Var,[(727,248)(734,248)])
}
Add(Hub,8424737,777,266)
{
OutCount=4
link(onEvent1,704221:doStop,[(798,272)(798,204)(632,204)(632,139)])
link(onEvent2,14488710:doData,[(803,279)(803,272)])
link(onEvent3,2647657:doData,[(808,286)(808,321)])
link(onEvent4,8667035:doData,[(801,293)(801,233)(779,233)(779,174)])
}
Add(GlobalVar,264553,868,231)
{
Name="var____Win_Handle"
Data=Integer(0)
}
Add(GetDataEx,5159531,651,154)
{
link(Data,704221:Handle,[])
}
Add(DoData,8667035,791,168)
{
Data=Integer(0)
link(onEventData,264553:doValue,[(845,174)(845,237)])
link(Data,5159531:Var3,[(797,159)])
}
Add(GetDataEx,3806134,476,133)
{
link(Data,15375690:Var,[])
}
Add(Debug,583769,581,266)
{
link(Data,3806134:Var3,[(587,138)])
}
Add(Debug,7141204,728,217)
{
link(Data,6953584:ProcessID,[(734,205)(702,205)(702,254)(671,254)])
}