szprgzy 2013-06-01 19:06 采纳率: 0%
浏览 1473

一个Delphi函数改用C++Builder6

有一个读IC卡的函数是用Delphi写的,想用C++Builder6改写
请问怎么改写,本人没有分了,请有谁能改写出来,本人将感激不尽,谢谢!!
Type

TBitCount = (Bit_8 =8,Bit_16=16,Bit_32=32);
TArr = Array of byte; 定义Tarr

bytRcvData: TArr;

bytRcvLen :integer;

setlength(bytRcvData, 512); 这个是什么意思???

function ByteArrayToHexString(bytArray:TArr;start:integer;length:integer):string; 函数声明

function ByteArrayToHexString(bytArray:TArr;start:integer;length:integer):string; 函数过程
var
i:integer;
s:string;
begin
for i := start to start+length-1 do
begin
s :=s+ Format('%.2x',[bytArray[i]]);
end;
ByteArrayToHexString := s;
end;

下面是用这个函数
txtCard.Text :=ByteArrayToHexString(bytRcvData,1,bytRcvLen - 1);

以上怎么把这个函数用C++Builder6改写了在C++Builder6中使用

ap_identify6b(m_Handle, intSerialNum, @bytRcvData[0],@bytRcvLen); 这句里面的@bytRcvData[0]及@bytRcvLen 怎么改写成c++Builder6 中使用

  • 写回答

1条回答

  • 码界一棵葱 2016-08-19 02:54
    关注

    请问你的问题解决了么,我碰到和你一样的问题!

    评论

报告相同问题?

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?