Add(Image,12954003,301,175) { Width=392 Height=273 Align=5 } Add(DropFile,10470899,105,175) { link(onDropFile,8473856:doLoad,[]) } Add(InlineCode,10289009,240,175) { WorkPoints=#1:y| EventPoints=#1:i| Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses windows,kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|16: i:THI_Event;|0:|42: procedure y(var dt:TData; index:word);|0:|5: end;|0:|14:implementation|0:|24:procedure THiAsmClass.y;|14:var b:PBitmap;|5:begin|21: b := NewBitmap(0,0);|24: b.Assign(ToBitmap(dt));|18: _hi_OnEvent(i,b);|8: b.Free;|4:end;|0:|4:end.| link(i,12954003:doLoad,[]) } Add(PictureStream,8473856,168,175) { link(onLoad,10289009:y,[]) }