RinniX писал(а):
у тебя-же 7-ка, попробуйРаботает
Add(MainForm,7145009,385,98)
{
}
Add(ChildPanel,6224963,385,140)
{
}
BEGIN_SDK
Add(EditMulti,10264605,112,126)
{
}
Add(Panel,13297013,175,168)
{
Top=5
Point(onPaint)
}
Add(Button,14652606,175,217)
{
link(onClick,44272:doWrite,[])
}
Add(VisualStrings,3406496,238,189)
{
Lines=#1: |
Width=11
Height=6
}
Add(MailSlot_Client,44272,238,217)
{
Name="test"
link(Text,3406496:Text,[])
}
END_SDK
Add(ChildPanel,8164497,434,140)
{
}
BEGIN_SDK
Add(EditMulti,4025005,21,21)
{
}
Add(Panel,12259506,119,70)
{
Left=60
Top=5
}
Add(LED,9766338,231,112)
{
Blick=1
ColorOff=32768
}
Add(MailSlot_Server,10001,175,112)
{
Name="test"
link(onRead,9766338:doChangeValue,[])
}
Add(Timer,15009380,119,112)
{
Interval=10
AutoStop=1
link(onTimer,10001:doCreate,[])
}
END_SDK
А вот на DDE, тоже работает
Add(MainForm,7145009,245,105)
{
}
Add(ChildPanel,6224963,245,147)
{
}
BEGIN_SDK
Add(EditMulti,10264605,112,126)
{
}
Add(Panel,13297013,175,168)
{
Top=5
Point(onPaint)
}
Add(Button,14652606,175,217)
{
link(onClick,12997585:doEvent1,[])
}
Add(DDEClient,15859379,315,217)
{
ServiceName="test"
TopicName="WRITE"
Items=#7:panel_1|
Point(doExecute)
}
Add(Hub,12997585,238,217)
{
link(onEvent1,15859379:doOpenLink,[])
link(onEvent2,3406496:doText,[(277,230)(277,251)])
}
Add(VisualStrings,3406496,287,245)
{
Lines=#1: |
Width=11
Height=6
Point(doText)
Point(onText)
link(onText,15859379:doExecute,[])
}
END_SDK
Add(ChildPanel,8164497,294,147)
{
}
BEGIN_SDK
Add(EditMulti,4025005,21,21)
{
}
Add(Panel,12259506,119,70)
{
Left=60
Top=5
}
Add(LED,9766338,224,112)
{
Blick=1
ColorOff=32768
}
Add(Timer,15009380,119,112)
{
Interval=10
AutoStop=1
link(onTimer,6112586:doStart,[])
}
Add(DDEServer,6112586,168,112)
{
ServiceName="test"
TopicList=#5:WRITE|
Point(onExecute)
link(onExecute,9766338:doChangeValue,[(207,132)(207,118)])
}
END_SDK