将字符串存入byte数组 var str: AnsiString; buf: array[0..3] of byte; i: Integer;begin str := '3B430E81'; for i := Low(buf) to High(buf) do begin buf[i] := StrToInt('$' + Copy(str, 1, (i + 1) * 2)); ShowMessage(IntToHex(buf[i], 2)); end;end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在 Delphi 中如何实现Excel转换Pdf ? 怎么能做出查看网页控件的name属性 子窗体如何设置障碍 我在ole显示word文档时怎么去掉工具栏 调用华为SMEIDLL.dll中的SubmitAExEx函数发送返回总是4,还请高手指教!(解决后另赠100分) TClientSocket 和TServerSocket 组件 在DELPHI7中怎么没有,请各位帮忙 请问各位谁有 进销存 系统说明书,小弟正再开发。谢谢! 数据库的查找功能的实现(急!!!!! 在线等待!!!) MainMenu组件在Menuitem后面自己加上了(f) 怎样在树的指定位置加入一个新的结点?? 将VC++语句转成delphi语句 38岁了,还可以学习JAVA
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货