C++函数改写成Delphi函数(记录类型调用)(100分)

  • 主题发起人 主题发起人 dasa
  • 开始时间 开始时间
D

dasa

Unregistered / Unconfirmed
GUEST, unregistred user!
int Timetable(int id,char * instr);
其中instr是一个记录类型(当然在C++中叫结构类型):
struct_TimeTable
{unsigned char team;
unsigned char week;
unsegned int sn}
我知道可以改写成这个模样:
function Timetable(id:integer;?????):integer;stdcall;externa'jbc088.dll';
可是,在"?????"处如何改写呢?

 
function Timetable(id:integer;Pinstr:Pointer):integer;stdcall;externa'jbc088.dll';

 
在你的程序中定义一个记录和C中的结构体的结构一模一样,也方便你以后访问
TTimeTable = record
char team;
char week;
longword sn;
end;

function Timetable(id:integer;pTimeTable:^TTimeTable):integer;stdcall;externa'jbc088.dll';
使用的时候这样 pTimeTable->team来访问team这个元素
 
如果定义成char型,那么如何给他赋值呢?例如Timrtable.team:=edit1.text?
 
结构里的变量定义成字符数组(如果内容长度固定)或字符指针(分配空间,注意释放)。
调用就用pointer指向结构就行了。
function Timetable(id:integer;Pinstr:Pointer):integer;stdcall;externa'jbc088.dll';
 
接受答案了.
 
后退
顶部