Вверх ↑
Ответов: 8888
Рейтинг: 823
#1: 2017-04-24 15:08:04 ЛС | профиль | цитата
Dimka, если не рисовать, то вот это спасёт:
Окно под мышкой


Add(MainForm,5648784,154,105)
{
Visible=1
Point(onClose)
link(onCreate,14340948:doStartHotKey,[])
}
Add(WinInfo,7049642,273,189)
{
Point(Left)
Point(Top)
Point(Width)
Point(Height)
Point(LanguageName)
Point(ThreadID)
Point(ProcessID)
link(onWinInfo,10535782:doEvent1,[])
link(Handle,9785432:Var2,[])
}
Add(BaloonToolTips,10234504,413,238)
{
Title="WinInfo"
Icon=1
Mode=1
link(Handle,9184448:Value,[(419,219)(398,219)])
link(Point,10162127:Point,[])
}
Add(PointXY,10162127,427,182)
{
link(X,1002856:MouseX,[])
link(Y,1002856:MouseY,[])
}
Add(GHotKey,14340948,196,119)
{
@Hint=#22:Exit - <Ctrl><Alt><F4>|
Alt=1
Ctrl=1
Key=115
link(onEventHotKey,5648784:doClose,[(239,125)(239,155)(142,155)(142,132)])
AddHint(-8,-21,116,13,@Hint)
}
Add(Hub,10535782,350,189)
{
link(onEvent1,15903031:doString,[(378,195)(378,227)(261,227)(261,244)])
link(onEvent2,10234504:doShow,[(372,202)(372,258)])
}
Add(FormatStr,15903031,273,238)
{
DataCount=12
Mask="ClassName: %1\r\nCaption: %2\r\nLeft: %3\r\nTop: %4\r\nWidth: %5\r\nHeight: %6\r\n\r\nLanguageName: %7\r\nThreadID: %8\r\nProcessID: %9\r\nHandle: %10\r\nParentHandle: %11"
link(onFString,10234504:doCreate,[])
link(Str1,7049642:ClassName,[])
link(Str2,7049642:Caption,[])
link(Str3,7049642:Left,[])
link(Str4,7049642:Top,[])
link(Str5,7049642:Width,[])
link(Str6,7049642:Height,[])
link(Str7,7049642:LanguageName,[])
link(Str8,7049642:ThreadID,[])
link(Str9,7049642:ProcessID,[])
link(Str10,11743032:Var2,[])
}
Add(Memory,9184448,392,182)
{
Default=Integer(0)
}
Add(Hub,15708578,238,182)
{
link(onEvent1,10234504:doDestroy,[(384,188)(384,251)])
link(onEvent2,7049642:doWinInfo,[])
}
Add(MouseEvent,1002856,427,126)
{
Point(Handle)
}
Add(Timer,9968603,154,182)
{
Interval=100
link(onTimer,14016477:doData,[])
}
Add(ChangeMon,14016477,196,182)
{
link(onData,15708578:doEvent1,[])
link(Data,9785432:Var1,[(202,170)])
}
Add(GetDataEx,11743032,336,165)
{
Angle=1
link(Data,1002856:Handle,[(447,170)])
}
Add(GetDataEx,9785432,273,165)
{
Angle=1
link(Data,11743032:Var1,[])
}

карма: 19

0