ref String 先要知道是什么类型，再按delphi的规则去声明这个函数
站在用户的角度思考问题，与客户深入沟通，找到都匀网站设计与都匀网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都网站设计、成都做网站、企业官网、英文网站、手机端网站、网站推广、主机域名、雅安服务器托管、企业邮箱。业务覆盖都匀地区。
int EHRSyncTransport ( String eventid, String body, ref String message, ref String result)//
EHRSyncTransport(eventid: String ; body:String;message:ref String ;result:ref String ):integer;
int inthestr(char *s,char ch)
{
while(*s!='\0'){
if(*s==ch)
return 1;
s++;
}
return 0;
}
用易语言来说，这个是delphi的子程序。在易语言里和 取十六进制文本() 这个的意思是一样的。最后得到的结果也是一样。。不用转换，你直接在易语言里用 取十六进制文本() 这个就可以了。
在delphi里调用你要转换的那个子程序：
EDIT1.Text:=Dword2Hex(9999,true);
得到的结果是 270F
在易语言里用
编辑框1.内容 ＝ 取十六进制文本(9999)
得到的结果也是 270F
======================================
晕，楼主看来你是对delphi是一点也不了解。你提出这个问题，给出的这些代码，最后调用的就是一个函数：
Dword2Hex(integer,Boolean):string;
而这个调用的函数和易语言的：
取十六进制文本() 是一个意思。
