code_11267.txt
И еще вопрос - как создать и как запускать плагины Хиасм?
------------ Дoбавленo:
Чето я намудрил со схемой.. Вот правильный вариант:
Add(MainForm,2953706,21,105)
{
}
Add(Dir,15156337,469,231)
{
}
Add(Button,14676284,91,140)
{
Left=105
Top=110
Width=160
Height=60
Caption="Создать директорию"
link(onClick,7207507:doEvent1,[])
}
Add(Application,6257042,259,14)
{
}
Add(StrCat,419089,413,231)
{
Str2="TI_History"
link(onStrCat,15156337:doDir,[])
}
Add(Position,13786657,210,147)
{
Target=""
link(onSearch,10623536:doEvent1,[(254,153)(254,188)(114,188)(114,223)])
link(Str,2271854:Data1,[(216,121)(265,121)])
}
Add(Copy,4255793,371,231)
{
link(onCopy,419089:doStrCat,[])
link(Str,2271854:Data2,[(377,163)(272,163)])
link(Count,10647861:Value,[(391,219)(314,219)(314,268)(237,268)])
}
Add(Memory,10647861,231,217)
{
Default=Integer(0)
}
Add(DoData,5922766,175,217)
{
link(onEventData,10647861:doValue,[])
link(Data,13786657:Position,[(181,198)(216,198)])
}
Add(Hub,7207507,154,140)
{
InCount=2
link(onEvent1,13786657:doSearch,[(195,146)(195,153)])
link(onEvent2,12894191:doTimer,[(240,153)(240,237)])
}
Add(Hub,10623536,126,217)
{
link(onEvent1,5922766:doData,[])
link(onEvent2,7207507:doEvent2,[(170,230)(170,192)(142,192)(142,153)])
}
Add(GetData,2271854,259,63)
{
link(Data,6257042:AppFileName,[])
}
Add(Label,12275894,91,28)
{
Left=90
Top=30
Width=218
Height=17
Caption="Создание директории в папке с проектом"
}
Add(Timer,12894191,294,231)
{
Interval=500
Enable=1
AutoStop=1
link(onTimer,4255793:doCopy,[])
}