Add(Registry,6677049,378,168)
{
 HKey=2
 Point(doHKey)
 link(Data,12922469:Text,[(384,149)(349,149)])
 link(Key,9329675:Text,[])
 link(Value,12478733:Text,[(398,146)(433,146)])
}
Add(Edit,943681,280,126)
{
 Left=5
 Width=180
 Text="HKEY_LOCAL_MACHINE"
}
Add(Edit,12922469,343,91)
{
 Left=40
 Top=50
 Width=210
 Text=".PICP"
}
Add(Edit,9329675,385,91)
{
 Left=25
 Top=25
 Width=180
 Text="SOFTWAREClasses"
}
Add(Edit,12478733,427,91)
{
 Left=425
 Top=55
 Text=""
}
Add(Button,2601327,189,182)
{
 Left=35
 Top=90
 Width=65
 Caption="Записать"
 link(onClick,1908592:doEvent1,[])
}
Add(DoData,4137647,280,182)
{
 link(onEventData,6677049:doHKey,[])
 link(Data,943681:Text,[])
}
Add(Hub,1908592,245,182)
{
 link(onEvent1,4137647:doData,[])
 link(onEvent2,6677049:doWrite,[(319,195)(319,181)])
}
Add(Registry,16449484,378,245)
{
 HKey=2
 Key="SOFTWAREClassesPICfileshellopencommand"
 Data=".PICP"
 Point(doHKey)
}