5,388
社区成员
发帖
与我相关
我的任务
分享写一个dll给pb用，怎么样写二进制文件[流]的参数，好像要传一个缓冲大小，和地址，
但具体怎么写？不太懂，
请高手给点简单代码，就是怎么写这个函数声明，和怎么取到这部分内容就可以了。
function getData (bufSize:integer; ??????这里怎么写地址参数):integer;
var tf:Tfilestream;
begin
...
tf.load...怎么把这个地址后的数据读到tf对象里呢？
//请指教，，，有点着急！！！
//谢谢
end;
请高手给点简单代码，就是怎么写这个函数声明，和怎么取到这部分内容就可以了。
function getData (bufSize:integer; ??????这里怎么写地址参数):integer;
var tf:Tfilestream;
begin
...
tf.load...怎么把这个地址后的数据读到tf对象里呢？
//请指教，，，有点着急！！！
//谢谢
end;
...全文
请发表友善的回复…
发表回复
zhp97 2003-09-17
- 打赏
- 举报
去看看api函数申明可能会给你些启发
lance 2003-09-16
- 打赏
- 举报
老兄，您难道没有调用过windwos 的aip吗？
zjqyb 2003-09-15
- 打赏
- 举报
function getData (bufSize:integer; var buffer):integer;
var tf:Tfilestream;
begin
...
tf.Writebuffer(buffer[0],bufsize);
end;
var tf:Tfilestream;
begin
...
tf.Writebuffer(buffer[0],bufsize);
end;
蓝色光芒 2003-09-15
- 打赏
- 举报
ShareMemory!
ChinaOk 2003-09-14
- 打赏
- 举报
tf.ReadBuffer(buffer; count);
好象不行，，，这是把tf的东西读放到buffer李，不是把这个读出来。
writebuffer可以，但还是没调通。
好象不行，，，这是把tf的东西读放到buffer李，不是把这个读出来。
writebuffer可以，但还是没调通。
同桌老王 2003-09-13
- 打赏
- 举报
function getData (bufSize:integer; buffer):integer;
var tf:Tfilestream;
begin
...
tf.ReadBuffer(buffer; count);
end;
var tf:Tfilestream;
begin
...
tf.ReadBuffer(buffer; count);
end;
