Add(MainForm,2953706,56,105)
{
 Width=467
}
Add(VBJScript,10331549,245,105)
{
 WorkPoints=#6:doWork|
 EventPoints=#5:Width|6:Height|10:PixelDepth|10:Resolution|
 Script=#7:Dim img|18:Sub doWork(dt,idx)|41:  Set img = CreateObject("WIA.ImageFile")|17:  img.LoadFile dt|21:  sys.Width img.Width|23:  sys.Height img.Height|31:  sys.PixelDepth img.PixelDepth|72:  sys.Resolution img.VerticalResolution & "x" & img.HorizontalResolution|19:  Set img = Nothing|8:End Sub |
 link(Width,12661613:doWork2,[])
 link(Height,13523628:doWork2,[])
 link(PixelDepth,2385052:doWork2,[])
 link(Resolution,2385052:doWork3,[(298,132)])
}
Add(Memo,3960772,357,105)
{
 Left=210
 Top=25
 Width=170
 Height=165
}
Add(Button,6462800,119,105)
{
 Left=25
 Top=40
 link(onClick,2039386:doExecute,[])
}
Add(HubEx,12661613,322,105)
{
 link(onEvent,3960772:doAdd,[])
}
Add(ODialog,2039386,182,105)
{
 link(onExecute,10331549:doWork,[])
}
Add(HubEx,13523628,308,112)
{
 link(onEvent,12661613:doWork3,[(326,118)])
}
Add(HubEx,2385052,294,119)
{
 link(onEvent,13523628:doWork3,[(312,125)])
}