Make(delphi) ver(4.04 build 184) Add(MainForm,2953706,21,105) { Point(onClose) link(onCreate,10413168:doOpen,[]) link(onClose,10413168:doClose,[]) } Add(COM,10413168,238,119) { link(onRead,6960666:doAdd,[]) } Add(Button,3668700,112,147) { Left=20 Top=180 Data=Integer(60) link(onClick,10413168:doRead,[]) } Add(RichEdit,6960666,315,126) { Left=205 Top=35 Width=155 Height=180 }