16进制计算

edit1.Text   :=   inttohex(($14+$A2)*$0F,1)  ;
posted @ 2008-10-05 14:37  delphi中间件  阅读(260)  评论(0编辑  收藏  举报