盒子论坛 v2.1

中控SDK开发包zkemkeeper_TLB.pas中的代码：
function GetUserFacePhotoByName(dwMachineNumber: Integer; const PhotoName: WideString;out PhotoData: byte; out PhotoLength: Integer): WordBool; safecall;

里面的参数：out PhotoData:byte应该如何调用，实在是不会了

Demo中的C#代码如下：
  byte[] PhotoData = new byte[1024 * 1024];
          int phtoSize = 0;

          Cursor = Cursors.WaitCursor;
          if (axCZKEM1.GetUserFacePhotoByName(iMachineNumber, phtoName, out PhotoData[0], out phtoSize))
          {
          using (MemoryStream msCamera = new MemoryStream(PhotoData, 0, phtoSize))
          {
          using (Bitmap bt = new Bitmap(msCamera))
          {
          if (bt != null)
          {

          FileStream fs = new FileStream(@"Photo\\" + phtoName + ".jpg", FileMode.OpenOrCreate);
          msCamera.WriteTo(fs);
          fs.Close();

          Bitmap Pic = new Bitmap(msCamera);
          this.pb_Photo.Image = Pic;
          }
          }
          }

[b]byte[] PhotoData = new byte[1024 * 1024];[/b]

SDK中说明为：
PhotoData   BYTE*   [out]   二进制格式的照片数据

感谢您的指点。
----------------------------------------------
Delphi forever

作者：

keymark (嬲)	▲▲▲△△	-
	普通会员

2021/2/25 21:07:06

1楼：

神马玩意？TLB 导坏了？估计没人能回答除非他在用而且还要看名猜。。你猜你猜你猜猜猜 ~
----------------------------------------------
[alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速

https://www.cctry.com/>http://qalculate.github.io/downloads.html

https://www.cctry.com/

作者：

wr960204 (武稀松)	★☆☆☆☆	-
	盒子活跃会员

2021/2/25 23:45:53

2楼：

根据参数名，函数名猜的

var
  PhotoData : array of Byte;
  phtoSize  : Integer;
begin
  SetLength(PhotoData, 1024*1024);  //分配图像数据的内存块，1MB。调用完成后里面是图像的数据
  phtoSize :=0;//调用后会返回图像数据的大小
  axCZKEM1.GetUserFacePhotoByName(dwMachineNumber, PhotoName, PhotoData[0], phtoSize);
----------------------------------------------
武稀松http://www.raysoftware.cn

作者：

sarsfree (非典型Delphi)	★☆☆☆☆	-
	普通会员

2021/2/26 0:15:37

3楼：

@wr960204 (武稀松)
非常感谢
----------------------------------------------
Delphi forever

信息

登陆以后才能回复