Вверх ↑
Ответов: 2125
Рейтинг: 159
#1: 2009-01-18 21:45:57 ЛС | профиль | цитата
Тогда уж так:

Add(MainForm,1743109,84,98)
{
Left=20
Top=105
link(onCreate,4117843:##open,[])
}
Add(TCP_ServerEx,4117843,140,112)
{
ServerPort=23
}
BEGIN_SDK
Add(EditMultiEx,14599425,21,21)
{
WorkCount=#6:##open|
Width=223
Height=123
}
Add(TCP_Connection,6580478,70,70)
{
link(onRead,15572207:doConsoleInput,[])
link(onConnect,15572207:doConsoleExec,[(121,83)(121,69)])
link(onDisconnect,15572207:doConsoleTerminate,[(129,90)(129,83)])
}
Add(WinExec,15572207,147,49)
{
FileName="cmd.exe"
Point(doConsoleExec)
Point(doConsoleInput)
Point(onConsoleResult)
Point(doConsoleTerminate)
Point(onConsoleTerminate)
link(onConsoleResult,6580478:doSend,[(202,62)(202,107)(57,107)(57,83)])
link(onConsoleTerminate,6580478:doClose,[(192,69)(192,39)(56,39)(56,76)])
}
END_SDK

карма: 1

1
Голосовали:flud