delphi 调用 vc dll 问题
我调用vc的dll，传送结构体参数。vc接受后从内存中拷贝出我传送的值。转换之后是乱码
来错地方了.
去DELPHI
ddd
知道错了
有没具体代码啊
//向终端发送门禁报警信息
function alarmSentDoor(var pDoorPara :Alley_ALARM_PARA):boolean;stdcall;external 'warnerdll.dll';
结构体定义
Door_ALARM_PARA = record
cAlarmTime : array[0..MAX_ALARM_TIME_LEN] of char; //报警时间
cDoorID : array[0..MAX_ALLEY_ID_LEN] of char; //报警门号
cCause : array[0..MAX_ALARM_CAUSE_LEN] of char; //报警原因
end;
看来只能帮顶
看不出你使用的是显示调用还是隐示调用，你那个dll文件在编译时是否有错，问题可能出在那个dll文件中。
没有错误，应该是参数传递问题。跟delphi与vc对内存的操作什么的可能有关，我是这�
相关问答：
新来此论坛感觉研究气氛和感觉都不错 ，不错刚来就发求助帖子确实不好意思，可确实不懂ASP
Function IsCHI(clChar)
Dim z
z = Hex(Asc(clChar))
IsCHI = (Len(z) ......
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
......
[size=18px]var s,n:integer;
begin
write('输入变长的条数n');
readln(n);
[color=#FF0000]s:=n*(n-1)*(n-2)div 6; //本行替换为s:=n*(n-1)*(n-2)/ ......
delphi 函数：
function RB(A: longint): longint;
begin
Result := (A shr 24) or ((A shr 8) and $FF00) or ((A shl 8) and $FF0000) or (A shl 24);
end;
我转成C#：
& ......
