Kovarnui писал(а):
капец, не реал чтоли?тебе же iarspider ответил
Посмотри пример SendPicture.
для перехвата и эмуляции клавиатуры и мыши можно использовать >>
Add(KeyHook,16627857,357,196)
{
}
Add(MouseEvent,14952245,406,196)
{
}
code_15046.txt
Add(MainForm,10230383,490,315)
{
Width=688
Height=545
link(onCreate,65723:doEvent1,[])
}
Add(ScreenShort,11628527,294,210)
{
link(onCapture,15708785:doResize,[])
}
Add(Button,8045911,119,210)
{
Left=240
Top=475
link(onClick,10648325:doTimer,[])
}
Add(Hub,8122056,217,210)
{
OutCount=3
link(onEvent1,11628527:doCapture,[])
link(onEvent2,250013:doData,[(344,223)(344,251)])
link(onEvent3,9275353:doProcessMessages,[(238,230)(238,167)])
}
Add(MemoryStream,3864290,476,147)
{
}
Add(Hub,15239341,420,210)
{
OutCount=3
link(onEvent1,3864290:doClear,[(455,216)(455,160)])
link(onEvent2,9755812:doLoadFromBitmap,[])
link(onEvent3,9755812:doSaveToStream,[])
}
Add(TCP_Client,7190052,609,231)
{
Port=8888
IP="127.0.0.1"
DataType=3
Point(onProgress)
}
Add(TCP_Server,3595514,609,329)
{
Port=8888
DataType=3
Point(onProgress)
link(onRead,5971435:doLoadFromStream,[])
link(onProgress,5971435:doBitmap,[(660,356)(660,342)])
}
Add(Hub,65723,539,329)
{
link(onEvent1,3595514:doOpen,[])
link(onEvent2,7190052:doOpen,[(581,342)(581,237)])
}
Add(Image,4002693,749,315)
{
Left=25
Top=25
Width=625
Height=440
ViewStyle=4
Point(Width)
Point(Height)
}
Add(Jpeg,9755812,476,203)
{
Quality=70
Point(doLoadFromBitmap)
Point(doSaveToStream)
Point(Stream)
Point(doBitmap)
link(Stream,14213241:Var2,[])
}
Add(DoData,250013,525,245)
{
link(onEventData,7190052:doSend,[])
link(Data,14213241:Var3,[(531,187)])
}
Add(GetDataEx,14213241,476,182)
{
link(Data,3864290:Stream,[])
}
Add(Jpeg,5971435,679,315)
{
Point(Stream)
Point(doLoadFromStream)
Point(doBitmap)
link(onBitmap,4002693:doLoad,[])
}
Add(Application,9275353,245,161)
{
}
Add(Timer,10648325,168,210)
{
Interval=200
Enable=1
link(onTimer,8122056:doEvent1,[])
}
Add(Resize,15708785,357,210)
{
link(onResult,15239341:doEvent1,[])
link(Width,3173747:Var,[])
link(Height,9763747:Var,[])
}
Add(LineBreak,14082543,756,357)
{
Caption="w"
Type=1
link(Data,4002693:Width,[])
Primary=[3173747,-392,-189]
}
Add(LineBreak,13610104,763,378)
{
Caption="h"
Type=1
link(Data,4002693:Height,[])
Primary=[9763747,-392,-196]
}



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