那位大哥帮帮小弟!
解决方案 »
- fastreport4.9怎样预览时跟设计时有的位置差远了
- 打开一个Excel并显示在指定显示器上
- 失业了,散分以解忧愁
- 怎样验证在DBGrideh的方格中输入的数据是否有效?
- ▲三年前的一个问题,我也遇到了,TCanvas,Graphic 单元
- 在MSSQLSERVER中怎么进行用户操作?
- 请教quickReport制报表怎么在每页加一个合计?
- 拣条裤衩,散分
- 如何使得在edit中输入的字符全部显示成为*号?
- 北京招聘会
- 在image 上有一个Bitmap控件,上面有一条线,如何很bitmap透明,但线不透明呢?透明的区域可以看到imgae上的图片,请问如何编写呢?
- [求助]第一次编DLL文件,编译通过,但不能运行
begin
Result:=(bcdByte div 16)*10 + (bcdByte mod 16);
end;多字节一样的道理。
假如:
bcdBytes:array[1..cnt]of byte; //cnt是个正整数;
idx:integer;
rslt:integer;计算:
rslt:=0;
for idx:=1 to cnt do
begin
rslt:=(rslt)*100+BCDToInt(bcdBytes[idx]);
end;
自己试试吧~~