我想用zlib解压数据块,数据块在文件中,我把文件映射到内存,调用inflate_init的时候第一个参数TZStreamRec 该怎么调用?
解决方案 »
- 请教高手指点下 *.res 文件的使用
- 在delphi怎么找不到象application.messagebox里头用的一些常数的说明
- 用NMMSG和NMMSGServ实现不在线时的信息传递
- 如何给treeview添加多个列?
- [Error] Main.pas(1042): Left side cannot be assigned to如何解决?
- Paradox表的默认初始密码是什么?
- 都进来看看这种算法!!哈哈哈
- DELPHI中如何在AutoCAD中画线
- *******************RX Library如何安装????急!急!急!急!急!急!急!急!********
- 请问怎样得到已连接到某SQL SERVER数据库的客户数?
- GradientFill 一个小问题
- 我在Image1.OnMousuUp里写了一段代码
用DecompressToUserBuf 复制到buf中,不知道为啥老报错
Function Compress(Const s: String): String;
Var
OutBuf : Pointer;
OutBytes : Integer;
Begin
CompressBuf(@s[1], length(s), OutBuf, OutBytes);
setString(result, pchar(OutBuf), OutBytes);
FreeMem(OutBuf, OutBytes);
End;Function DeCompress(Const s: String): String;
Var
OutBuf : Pointer;
OutBytes : Integer;
Begin
DeCompressBuf(@s[1], length(s), Length(s), OutBuf, OutBytes);
setString(result, pchar(OutBuf), OutBytes);
FreeMem(OutBuf, OutBytes);
End;