Add(MainForm,11935441,56,56)
{
 Caption="Пример использования Dir"
}
Add(Button,13000580,56,119)
{
 Left=135
 Top=60
 Width=95
 Caption="Create MyDir"
 link(onClick,11478614:doStrCat,[])
}
Add(Dir,3270630,168,119)
{
 link(onEnd,4129601:doMessage,[])
}
Add(StrCat,11478614,112,119)
{
 link(onStrCat,3270630:doDir,[])
 link(Str1,3270630:CurrentDir,[(118,107)(158,107)(158,165)(174,165)])
 link(Str2,10388649:Text,[])
}
Add(Message,4129601,224,119)
{
 Message="ОК!"
}
Add(Edit,10388649,119,56)
{
 Left=135
 Top=105
 Width=95
 Text="myDir"
}

Add(MainForm,2953706,224,231)
{
 Height=219
 Caption="Пример использования Dir"
 link(onCreate,13728937:doText,[])
}
Add(Dir,11527604,280,175)
{
}
Add(Edit,13728937,280,245)
{
 Left=5
 Top=20
 Width=370
 Enabled=1
 Layout="vert"
 link(onChange,14745515:doText,[])
 link(Str,11527604:CurrentDir,[])
}
Add(Edit,14745515,329,245)
{
 Left=5
 Top=60
 Width=370
 Enabled=1
 Layout="vert"
 link(onChange,9285271:doText,[])
 link(Str,11527604:DesktopDir,[(335,226)(293,226)])
}
Add(Edit,9285271,378,245)
{
 Left=5
 Top=100
 Width=370
 Enabled=1
 Layout="vert"
 link(onChange,8975032:doText,[])
 link(Str,11527604:TempDir,[(384,226)(300,226)])
}
Add(Edit,8975032,427,245)
{
 Left=5
 Top=140
 Width=370
 Enabled=1
 Layout="vert"
 link(Str,11527604:StartUpDir,[(433,226)(307,226)])
}
Add(VBoxLayout,12883698,329,175)
{
 Name="vert"
 Space=5
 Padding=10
}
Add(Label,3647994,133,126)
{
 Left=5
 Layout="vert"
 Caption="Current dir"
}
Add(Label,7138965,133,168)
{
 Left=5
 Top=45
 Layout="vert"
 Caption="Desktop dir"
}
Add(Label,3444958,133,210)
{
 Left=5
 Top=80
 Layout="vert"
 Caption="Temporary dir"
}
Add(Label,12338338,133,252)
{
 Left=5
 Top=125
 Layout="vert"
 Caption="Autorun dir"
}