ashkalov писал(а):
Компонент Keyboard------------ Дoбавленo в 21.29:
Сейчас перепробовал кучу вариантов: эмулировал клик, выставлял Visible, Enabled, BorderStyle -- всё без толку, мигает с бараньим упорством. Может, попробовать перехватить клик и переместить мышь до клика?
------------ Дoбавленo в 21.45:
Глобальный перехват мыши происходит после того, как форма начинает мигать, и это уже не смешно.
Add(MainForm,2953706,259,133)
{
Enabled=1
Point(Left)
Point(Width)
Point(Top)
Point(Height)
Point(doEnabled)
}
Add(ChildForm,4032070,567,315)
{
}
BEGIN_SDK
Add(EditMulti,13211326,21,21)
{
WorkCount=2
link(doWork1,8875374:doSetFocus,[(42,27)(42,97)])
link(doWork2,8875374:doFlashWindow,[(37,34)(37,104)])
}
Add(MainForm,8875374,63,63)
{
Left=35
Top=105
Caption="First"
Point(doSetFocus)
Point(doFlashWindow)
}
Add(ChildForm,14476924,63,28)
{
}
BEGIN_SDK
Add(EditMulti,5238020,21,21)
{
}
Add(MainForm,15243352,56,28)
{
Left=35
Top=105
Caption="Second"
Position=1
}
END_SDK
END_SDK
Add(Math,13677636,259,231)
{
link(onResult,11389785:doOperation,[])
link(Op1,2953706:Left,[])
link(Op2,2953706:Width,[])
}
Add(Math,11389785,308,231)
{
link(onResult,12222297:doCompare,[])
link(Op1,2953706:Top,[(314,205)(279,205)])
link(Op2,2953706:Height,[(321,198)(286,198)])
}
Add(If_else,12222297,357,231)
{
Type=2
link(onTrue,9344571:doCompare,[])
link(Op1,13677636:Result,[(363,219)(299,219)(299,275)(265,275)])
link(Op2,7829273:MouseX,[(370,209)(412,209)])
}
Add(If_else,9344571,406,231)
{
Type=2
link(onTrue,13842657:doEvent1,[])
link(Op1,11389785:Result,[(412,219)(396,219)(396,274)(314,274)])
link(Op2,7829273:MouseY,[])
}
Add(MouseEvent,7829273,406,154)
{
}
Add(Keyboard,7197619,154,231)
{
Key=1
link(onReadKey,7506951:doCompare,[])
}
Add(If_else,7506951,210,231)
{
Op2=Integer(1)
link(onTrue,13677636:doOperation,[])
}
Add(Hub,13842657,462,231)
{
OutCount=4
link(onEvent1,10221623:doData,[])
link(onEvent2,6716584:doData,[(522,244)(522,279)])
link(onEvent3,4032070:doWork1,[(509,251)(509,321)])
link(onEvent4,4032070:doWork2,[(496,258)(496,328)])
}
Add(DoData,10221623,567,231)
{
Data=Integer(1)
link(onEventData,14027185:doWork2,[])
}
Add(DoData,6716584,567,273)
{
Data=Integer(0)
link(onEventData,14027185:doWork3,[(613,279)])
}
Add(HubEx,14027185,609,231)
{
Angle=3
link(onEvent,2953706:doEnabled,[(613,107)(247,107)(247,167)])
}
Add(Timer,12307992,105,231)
{
Interval=10
link(onTimer,7197619:doReadKey,[])
}



Поиск
Друзья
Администрация