Evgen818 писал(а):
На форме есть текстовое поле, если после запуска программы, в течении 10 секунд, текстовое поле остается пустым то происходит перезапуск программы (с этим я справился), а если пользователь сам закрыл программу то перезапуска быть не должноА тогда откуда берется перезапуск при закрытии, когда уничтожается таймер
------------ Дoбавленo в 19.15:
Кажется, я понял, что тебе надо
Add(MainForm,10901993,161,280)
{
Point(onClose)
Point(Close)
link(onClose,2628687:doEvent,[])
link(Close,14058168:GetData,[])
}
Add(Edit,5856426,161,91)
{
Left=75
Top=20
Text=""
}
Add(Timer,7858149,105,147)
{
Interval=5000
link(onTimer,3627726:doCompare,[])
}
Add(If_else,3627726,161,147)
{
Op2=String()
link(onTrue,15576681:doEvent1,[])
link(Op1,5856426:Text,[])
}
Add(WinExec,10889947,406,308)
{
FileName="Project3.exe"
}
Add(EventFromData,14058168,161,224)
{
link(onEvent,2236608:doOn,[])
}
Add(Switch,2236608,280,210)
{
DataOn=Integer(0)
DataOff=Integer(1)
Point(doOn)
Point(State)
Point(onOn)
Point(onOff)
link(onOn,14058168:doData,[(324,223)(324,189)(146,189)(146,230)])
}
Add(IndexToChanel,2628687,280,301)
{
Point(Index)
link(onEvent2,13026404:doMessage,[])
link(Index,2236608:State,[])
}
Add(Message,13026404,343,308)
{
}
Add(Hub,15576681,217,147)
{
link(onEvent1,2236608:doReset,[(259,153)(259,223)])
link(onEvent2,10901993:doClose,[(244,160)(244,80)(83,80)(83,307)])
}