<DIV>
<P>经本人研究内嵌汇编不能取自定义类型(成员非4字节,取来的是对齐结构的指针,比如成员为字节型分配4个字节),和非小数和整数,文本型数组不可以取指针,其它的都可以</P>
<P></P>
<P>要注意的是易的子程序前有EBP入栈操作,所以要有出栈操作才行</P>
<P>这是我写的<STRONG>取整数型指针的例子(字节型,短整数型,小数型,日期时间型,双精度小数型都通用,注意参数要为参考):</STRONG></P>
<P>.版本 2<BR>.支持库 spec<BR>.子程序 取整数型指针, 整数型, 公开<BR>.参数 整数, 整数型, 参考<BR><FONT color=#ff0000>'push ebp <------------<STRONG>这两句已经是易原有的<BR></STRONG>'mov ebp, esp</FONT></P>
<P>置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' leave <------------<STRONG>赋值给ESP,从堆栈中弹出到EBP</STRONG><BR>' ret 0004</FONT><BR>返回 (0)</P>
<P><BR><STRONG>取文本指针的例子:</STRONG></P>
<P><BR>.版本 2<BR>.支持库 spec<BR>.子程序 取文本型指针, 整数型, 公开<BR>.参数 文本, 文本型</P>
<P>置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' mov eax, dword ptr [eax]<BR>' leave<BR>' ret 0004</FONT><BR>返回 (0)</P>
<P><BR><STRONG>取字节集指针的例子:</STRONG></P>
<P>.版本 2<BR>.支持库 spec<BR>.子程序 取字节集指针, 整数型, 公开<BR>.参数 字节集, 字节集, 参考</P>
<P>置入代码 ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' mov eax, dword ptr [eax]<BR>' add eax, 00000008<BR>' leave<BR>' ret 0004</FONT><BR>返回 (0)</P></DIV>
<P>经本人研究内嵌汇编不能取自定义类型(成员非4字节,取来的是对齐结构的指针,比如成员为字节型分配4个字节),和非小数和整数,文本型数组不可以取指针,其它的都可以</P>
<P></P>
<P>要注意的是易的子程序前有EBP入栈操作,所以要有出栈操作才行</P>
<P>这是我写的<STRONG>取整数型指针的例子(字节型,短整数型,小数型,日期时间型,双精度小数型都通用,注意参数要为参考):</STRONG></P>
<P>.版本 2<BR>.支持库 spec<BR>.子程序 取整数型指针, 整数型, 公开<BR>.参数 整数, 整数型, 参考<BR><FONT color=#ff0000>'push ebp <------------<STRONG>这两句已经是易原有的<BR></STRONG>'mov ebp, esp</FONT></P>
<P>置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' leave <------------<STRONG>赋值给ESP,从堆栈中弹出到EBP</STRONG><BR>' ret 0004</FONT><BR>返回 (0)</P>
<P><BR><STRONG>取文本指针的例子:</STRONG></P>
<P><BR>.版本 2<BR>.支持库 spec<BR>.子程序 取文本型指针, 整数型, 公开<BR>.参数 文本, 文本型</P>
<P>置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' mov eax, dword ptr [eax]<BR>' leave<BR>' ret 0004</FONT><BR>返回 (0)</P>
<P><BR><STRONG>取字节集指针的例子:</STRONG></P>
<P>.版本 2<BR>.支持库 spec<BR>.子程序 取字节集指针, 整数型, 公开<BR>.参数 字节集, 字节集, 参考</P>
<P>置入代码 ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })<BR><FONT color=#008000>' mov eax, dword ptr [ebp+08]<BR>' mov eax, dword ptr [eax]<BR>' add eax, 00000008<BR>' leave<BR>' ret 0004</FONT><BR>返回 (0)</P></DIV>