Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,203,336)
{
 Width=447
 Height=377
 link(onCreate,2833991:doEvent1,[])
}
Add(ComboBox,5742465,679,385)
{
 Left=35
 Top=60
 Width=135
 Height=21
 Text="Выберите диск"
}
Add(HardDisk,9972373,350,364)
{
 Size=2
 Point(doEnum)
 Point(onEnum)
 link(onEnum,13979485:doEvent1,[])
}
Add(FormatStr,9789099,525,378)
{
 Mask="%2"
 link(onFString,8989407:doCase,[])
 link(Str2,2304549:DriveType,[(538,366)(503,366)(503,419)(482,419)])
}
Add(DiskInfo,2304549,441,378)
{
 Point(FreeSpace)
 Point(DriveType)
 link(onInfo,9789099:doString,[])
}
Add(Hub,2833991,252,350)
{
 link(onEvent1,9972373:doEnum,[(308,356)(308,377)])
}
Add(Hub,13979485,406,364)
{
 OutCount=3
 link(onEvent1,16133647:doClear,[(455,370)(455,307)])
 link(onEvent2,16133647:doValue,[(455,377)(455,300)])
 link(onEvent3,2304549:doInfo,[])
}
Add(Memory,16133647,490,294)
{
}
Add(Case,8989407,574,378)
{
 Value=Integer(3)
 link(onTrue,13600932:doData,[])
}
Add(DoData,13600932,623,385)
{
 link(onEventData,5742465:doAdd,[])
 link(Data,16133647:Value,[(629,350)(496,350)])
}