Вверх ↑
Ответов: 497
Рейтинг: 16
#1: 2017-08-09 01:52:47 ЛС | профиль | цитата
sashaoli, ну немного подправить и будет самое оно
оно


Add(MainForm,16595783,840,273)
{
Width=413
Height=125
Caption="Привязка окна"
Point(doLeft)
Point(doTop)
Point(Handle)
link(onCreate,2252219:doPopup,[])
}
Add(Button,9831433,245,175)
{
Left=15
Top=10
Width=80
Caption="Привязать"
Point(doEnabled)
link(onClick,11523607:doMessage,[])
}
Add(Button,1053009,133,301)
{
Left=105
Top=10
Width=80
Enabled=1
Caption="Отвязать"
Data=String(Привязано к окну: Непривязано!)
Point(doEnabled)
link(onClick,7994391:doEvent1,[])
}
Add(LED,12120273,840,196)
{
Left=205
Top=5
}
Add(WinInfo,13885701,588,301)
{
Point(Left)
Point(Top)
link(onWinInfo,10919155:doEvent1,[])
link(Handle,15600096:Var2,[])
}
Add(MouseEvent,8125040,441,126)
{
Point(Handle)
}
Add(Keyboard,4072279,406,182)
{
Key=1
link(onReadKey,13694263:doEvent,[])
}
Add(Timer,11522873,357,182)
{
Interval=25
Enable=1
link(onTimer,4072279:doReadKey,[])
}
Add(IndexToChanel,13694263,455,182)
{
Point(Data)
link(onEvent2,11955218:doEvent1,[])
link(Data,8125040:Handle,[])
}
Add(Hub,11955218,504,189)
{
OutCount=4
link(onEvent1,3559114:doValue,[])
link(onEvent2,11522873:doStop,[(571,202)(571,230)(347,230)(347,195)])
link(onEvent3,6387108:In,[])
link(onEvent4,15099386:In,[])
}
Add(Memory,3559114,588,189)
{
link(onData,1106389:doWork2,[])
}
Add(LineBreak,8148742,329,294)
{
Caption="run"
link(Out,14033660:doStart,[])
Primary=[15099386,203,-84]
}
Add(ChanelToIndex,1914937,196,175)
{
link(onIndex,9831433:doEnabled,[])
}
Add(ChanelToIndex,15926829,84,301)
{
link(onIndex,1053009:doEnabled,[])
}
Add(Hub,4183155,252,308)
{
OutCount=4
link(onEvent1,12036244:In,[])
link(onEvent2,8365406:In,[])
link(onEvent3,1914937:doWork2,[(278,328)(278,261)(184,261)(184,188)])
link(onEvent4,15926829:doWork1,[(278,335)(278,321)(72,321)(72,307)])
}
Add(LineBreak,4404419,98,175)
{
Caption="dis"
link(Out,13361741:doEvent1,[])
Primary=[6387108,434,28]
}
Add(Hub,13361741,140,175)
{
link(onEvent1,1914937:doWork1,[])
link(onEvent2,15926829:doWork2,[(172,188)(172,314)])
}
Add(Hub,10919155,644,301)
{
link(onEvent1,10135828:doCalc,[])
link(onEvent2,440256:doCalc,[])
}
Add(WinInfo,4379711,665,189)
{
Point(Left)
Point(Top)
link(onWinInfo,12667640:doEvent1,[])
link(Handle,15600096:Var3,[(671,177)(634,177)(634,236)])
}
Add(WinInfo,12704085,749,196)
{
Point(Left)
Point(Top)
link(onWinInfo,12120273:doOn,[(811,202)(811,216)])
link(Handle,6271307:getVar,[])
}
Add(LineBreak,9189513,791,203)
{
Caption="off"
link(Out,12120273:doOff,[])
Primary=[12036244,-497,105]
}
Add(FastMathParse,10135828,672,301)
{
DataCount=3
MathStr="%3 - (%2 - %1)"
link(onResult,16595783:doLeft,[])
link(X1,13885701:Left,[(678,292)(636,292)(636,348)(608,348)])
link(X2,4379711:Left,[])
link(X3,12704085:Left,[(692,271)(769,271)])
}
Add(FastMathParse,440256,749,308)
{
DataCount=3
MathStr="%3 - (%2 - %1)"
link(onResult,16595783:doTop,[])
link(X1,13885701:Top,[(755,278)(629,278)(629,341)(615,341)])
link(X2,4379711:Top,[(762,264)(692,264)])
link(X3,12704085:Top,[(769,286)(776,286)])
}
Add(Thread,14033660,385,294)
{
Delay=10
link(onExec,13858008:doCompare,[])
}
Add(Hub,7994391,224,301)
{
link(onEvent1,14033660:doStop,[])
link(onEvent2,4183155:doEvent1,[])
}
Add(WinTools,2252219,903,280)
{
link(Handle,2573575:getVar,[])
}
Add(LineBreakEx,3097492,840,336)
{
Caption="MyHDL"
Type=3
link(_Data,16595783:Handle,[])
}
Add(LineBreakEx,2573575,903,245)
{
Caption="MyHDL"
Type=2
}
Add(LineBreakEx,6271307,749,161)
{
Caption="MyHDL"
Type=2
}
Add(Label,9557937,973,189)
{
Left=15
Top=45
Width=365
Height=35
Caption="Привязано к окну: Непривязано!"
AutoSize=1
}
Add(FormatStr,5444884,889,189)
{
DataCount=1
Mask="Привязано к окну:\r\n%1\r\n"
link(onFString,14312587:doWork2,[])
link(Str1,4379711:Caption,[(895,152)(657,152)(657,229)(678,229)])
}
Add(Hub,12667640,707,189)
{
link(onEvent1,5444884:doString,[])
link(onEvent2,12704085:doWinInfo,[])
}
Add(LineBreak,14747337,910,161)
{
link(Out,14312587:doWork1,[(956,167)])
Primary=[8365406,-616,154]
}
Add(HubEx,14312587,952,189)
{
link(onEvent,9557937:doText,[])
}
Add(Message,11523607,301,175)
{
Message="Для привязки этого окна к любому\r\nдругому - нажмите "Ок" и кликните\r\nпо целевому окну.\r\n\r\nПродолжить?"
Caption="Внимание!"
Type=1
Point(onOK)
link(onOK,11522873:doTimer,[])
}
Add(WinEnum,13584128,455,238)
{
Point(GetActiveWindow)
}
Add(If_else,13858008,462,294)
{
link(onTrue,14201392:doEvent1,[])
link(onFalse,1656688:doWork1,[(510,307)(510,370)])
link(Op1,13584128:GetActiveWindow,[])
link(Op2,15600096:Var1,[(475,279)(535,279)(535,236)])
}
Add(GetDataEx,15600096,588,231)
{
link(Data,3559114:Value,[])
}
Add(Hub,14201392,525,294)
{
link(onEvent1,4852313:In,[])
link(onEvent2,13885701:doWinInfo,[])
}
Add(ChanelToIndex,1656688,518,364)
{
link(onIndex,10726870:doData,[])
}
Add(LineBreak,4524203,588,168)
{
link(Out,1106389:doWork1,[(634,174)])
Primary=[6126647,77,203]
}
Add(ChangeMon,10726870,567,364)
{
link(onData,15137313:doEvent,[])
}
Add(IndexToChanel,15137313,616,364)
{
link(onEvent2,6126647:In,[])
}
Add(HubEx,1106389,630,189)
{
link(onEvent,4379711:doWinInfo,[])
}
Add(LineBreak,13705759,469,371)
{
link(Out,1656688:doWork2,[])
Primary=[4852313,84,-77]
}

карма: 1
        ]  
0