您的位置：程序门 -> delphi -> windows sdk/api

api函数怎么定义

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

api函数怎么定义[已结贴,结贴人:everest]

发表于：2007-01-09 17:11:08 楼主

各位大虾,下面的函数怎么用delphi定义
int writecard（int portnumber,int timeout,unsigned char* track1,int track1len,unsigned char* track2,int track2len,unsigned char* track3,int track3len)
以上是一个动态链接库的函数,在delphi中怎样定义此函数,怎么使用此函数?
最好能够写一个例子?谢谢!

发表于：2007-01-09 17:34:111楼得分:15

function writecard（portnumber, timeout: integer; track1: pchar;
track1len: integer; track2: pchar; track2len: integer;
track3: pchar; track3len: integer): integer; far; external 'test.dll ';

---------------------------------------------------------------------------------

var
s: string;
track1len: integer;
track1: array[0..999] of char;//假设最大长度1000
begin
s := '0123456789 ';
track1len := length（s);
move（s[1], track1[0], track1len);
writecard（1, 1, @track1[0], track1len, ...)
end;

发表于：2007-01-10 08:30:172楼得分:0

老大，我试了一下怎么不行啊？

发表于：2007-01-10 08:42:083楼得分:1

什么问题？？代码贴出来

发表于：2007-01-10 08:52:224楼得分:2

-_#!

发表于：2007-01-10 08:54:255楼得分:0

现在行了，谢谢！

发表于：2007-01-10 08:54:516楼得分:2

下一篇：请教窗口重绘的问题？
上一篇：怎样才能让delphi开发的浏览器支持ipv6？

其他资讯