code_28002.txt
Может, что-нибудь поможет? Не хочется сменять компилятор из-за такой мелочи.
Завершение процесса программы - не решение, конечно, но всё же:
Add(MainForm,132659,35,105)
{
Point(onClose)
link(onCreate,13792580:doStartWatch,[(156,125)(156,111)])
link(onClose,15164235:doEvent1,[(79,132)(79,139)])
}
Add(DirectoryChanges,13792580,245,105)
{
DirName="C:"
Flags=1
link(onChange,16385553:doMessage,[])
}
Add(Hub,15164235,91,133)
{
link(onEvent1,6585955:doFindName,[(133,139)(133,160)])
link(onEvent2,6585955:doKill,[(133,146)(133,153)])
}
Add(EnumProcess,6585955,161,133)
{
Name="project2.exe"
Point(doFindName)
}
Add(Message,16385553,301,105)
{
}
nesco писал(а):
Заблокировал остановку поиска в деструкторе под FPC (ту же хрень я уже делал в таймере). Обновление на SVN.Нужно запускать DC перед закрытием программы, иначе RE.