C++写的函数库DLL,用delphi调用问题,大家都进来看看,解决立马给分,在线等!!!!!!!

Question

dll里的函 数： int __stdcall GetJpegImage(HANDLE hChannelHandle,UCHAR *ImageBuf,
ULONG *Size,UINT nQuality)如题,在delphi如何声名它,和调用他呢,请给出实际调用例子,解决后马上给分  

Answer 1

申明成:function GetJpegImage(hChannelHandle: THandle;  ImageBuf: PChar;  var Size: DWORD;  nQuality: DWORD): Longint;  stdcall;  external '???.dll';

Answer 2

function GetJpegImage(hChannelHandle: THandle;  ImageBuf: PChar;  Size: pDWORD;  nQuality: DWORD): Longint;  stdcall;  external '???.dll';

Answer 3

我想知道,怎么样调用呢,,,,,imageBuf返回的是一个图片,我怎么能放到Image图片框里呢,

Answer 4

var
  pImageBuffer: PChar;
  size:DWORD;
begin
    size := 704 * 576 * 2;
    i := GetJpegImage(0,pImageBuffer, size, 100);
end;批这个出错

Answer 5

i := GetJpegImage(0,pImageBuffer, @size, 100); 

Answer 6

这样也是出错
给你看看说明
3.5.1.2抓取JPEG格式图像GetJpegImage
函 数： int __stdcall GetJpegImage(HANDLE hChannelHandle,UCHAR *ImageBuf,
ULONG *Size,UINT nQuality)
参 数： HANDLE hChannelHandle；通道句柄
UCHAR *ImageBuf；JPEG图像指针
ULONG *Size；JPEG图像尺寸，函数调用前是ImageBuf的大小，调用后是实际
图像所占用的字节数
UINT nQuality；JPEG图像质量，取值范围1-100，取值100时质量最好
返回值： 成功返回0，失败返回错误值
说 明： 抓取JPEG格式图像

Answer 7

function GetJpegImage(hChannelHandle: THandle;  ImageBuf: ^byte;  Size: pDWORD;  nQuality: DWORD): Longint;  stdcall;  external '???.dll'; 
i := GetJpegImage(0,pImageBuffer, @size, 100);

Answer 8

好使了,,我刚才没有初始化pbyte现在,还有一个问题,我的这个pbyte怎么样转化成jpg图片呢

Answer 9

试下：function GetJpegImage(hChannelHandle: THandle;  ImageBuf: PByte;  var Size: DWORD;  nQuality: DWORD): Integer;  stdcall;  external '???.dll';var
  ms : TMemoryStream;
  Size: DWORD;
  Ptr: PByte;
begin
  if  GetJpegImage(hChannelHandle, Ptr, Size, 100) = 0 then
  begin
    ms := TMemoryStream.Create;
    ms.WriteBuffer(Ptr^, Size);
    ms.SaveToFile('xxx.jpg');
    ms.Free;
  end;
end;

Answer 10

pImageBuffer不初始化，能读？liangqingzhi
的代码就可以啊

Answer 11

申明：function GetJpegImage(hChannelHandle: THandle;  ImageBuf: PByte;  var Size: DWORD;  nQuality: DWORD): Integer;  stdcall;  external '???.dll';調用：用TMemoryStream、DWORD、PByte去處理