Add(MainForm,15551238,84,140)
{
 Caption="Пример использования ShortCut"
}
Add(Edit,9852993,182,84)
{
 Left=10
 Top=60
 Width=360
 Text="C:\\Program Files\\hiasm\\hiasm.exe"
}
Add(ShortCut,12491809,182,140)
{
 link(onCreate,2452701:doMessage,[])
 link(FileName,9852993:Text,[])
 link(ShortcutName,410322:Text,[(195,128)(237,128)])
}
Add(Button,9435790,133,140)
{
 Left=170
 Top=175
 link(onClick,12491809:doCreate,[])
}
Add(Edit,410322,231,84)
{
 Left=10
 Top=100
 Width=360
 Text="hiasm.lnk"
}
Add(Message,2452701,231,140)
{
 Message="ok"
}