帮忙翻译下~ 在线等。。 ( 积分: 50 )

  • 主题发起人 yexingdongwu110
  • 开始时间
Y

yexingdongwu110

Unregistered / Unconfirmed
GUEST, unregistred user!
struct _SMS_T
{
unsigned char ID;
char num[20];
char content[140];
};
typedef struct _SMSCONTENT
{
struct _SMS_T sms[5];
}SMSCONTENT;
int SendCommonSM_5(SMSCONTENT *sms_buf);
翻译成 delphi
 
type
_SMS_T = packed record
ID: Char;
num: array[0..19] of Char;
content: array[0..139] of Char;
end;

type
SMSCONTENT = ^_SMSCONTENT;
_SMSCONTENT = pakced record
sms: array[0..4] of _SMS_T:
end;

function SendCommonSM_5(sms_buf: SMSCONTENT): Integer;
 
@ 白兄
SMSCONTENT sms_buf;
int i;
memset(&sms_buf,0,sizeof(sms_buf));/*清0必须*/
sms_buf.sms[0].ID=i;
strcpy(sms_buf.sms[0].num,"13959293835");
strcpy(sms_buf.sms[0].content,"1395929383513959293835139592938351395929383513959293835139592938351395929383513959293835139592938351395929383513959293835");
SendCommonSM_5(&sms_buf);
这个又是怎么翻译呢
因为我调用别人的动态连接库的方法
我的定义事和你一样的
但是实际上 所要得到的效果确不一样
我想确定下我使用的时候有问题
 
_SMS_T=record
ID:char;
num:array[0..19] of char;
content: array [0..129] of char;
end;

_SMSCONTENT=record
_SMS_T sms:array[0..4] of _SMS_T;
end;
SMSCONTENT = ^_SMSCONTENT;
function SendCommonSM_5(sms_buf:SMSCONTENT):integer;
 
var
sms_buf:_SMSCONTENT;
i:integer;
begin
fillchar(sms_buf,sizeof(sms_buf),0);
sms_buf.sms[0].ID:=i;
sms_buf.sms[0].num:='13959293835';
sms_buf.sms[0].content:='1395929383513959293835139592938351395929383513959293835139592938351395929383513959293835139592938351395929383513959293835';
SendCommonSM_5(@sms_buf);
 
多人接受答案了。
 
好象 我用 DELPHI 定义的参数传给动态库
结果就是不一样
 

Similar threads

I
回复
0
查看
721
import
I
I
回复
0
查看
723
import
I
I
回复
0
查看
705
import
I
I
回复
0
查看
807
import
I
顶部