Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vfp9.0µ÷ÓÃdelphi¶¯Ì¬¿â,Ìáʾ²ÎÊý¹ý¶à

ÇëÎÊһϴó¼Ò£¬ÎÒÔÚµÄʱºò£¬ÀÏÊÇÌáʾ²ÎÊýÌ«¶àÊÇʲôԭÒò°¡£¿

vfp9.0µ÷ÓôúÂëÈçÏ£º
DECLARE string yh_interface_call IN "YhGzHisInterface.dll",string astr_jybh,string astr_jysr_xml,string astr_jylsh,string @astr_jyyzm,string @astr_jysc_xml,long @aint_appcode,string @astr_appmsg

yh_interface_call(astr_jybh,astr_jysr_xml,astr_jylsh,@astr_jyyzm,@astr_jysc_xml,@aint_appcode,@astr_appmsg)

CLEAR dlls

delphi:yh_interface_callÔ­ÐͶ¨ÒåÈçÏ£º
yh_interface_call(string astr_jybh,string astr_jysr_xml,string astr_jylsh,ref string astr_jyyzm,ref string astr_jysc_xml,ref long aint_appcode,ref string astr_appmsg)

Âé·³¸ßÊÖ°ï°ïæ¿´Ï¡£




lzÔõôÑùÁË£¿

»Ø¸´ÄÚÈÝÌ«¶ÌÁË£¡


ллÏÈ£¬²âÊÔϸø·Ö¡£

**½Ó¿Ú³õʼ»¯
DECLARE string yh_interface_init IN "YhGzHisInterface.dll" string astr_jysr_xml,long @aint_appcode,string @astr_appmsg
yh_interface_init(astr_jysr_xml,@aint_appcode,@astr_appmsg)
CLEAR DLLS

ÉùÃ÷dllµ÷ÓóöÏÖÒì³£¡£

DeclareStringyh_interface_initIn"YhGzHisInterface.dll"Stringastr_jysr_xml,Long @aint_appcode,String @astr_appmsglc_astr_jysr_xml=""&&Õâ¸öÖµ²»Ò»¶¨Îª¿Õ£¬¸ù¾ÝÄãµÄº¯Êý¶¨ln_aint_appcode=0&&Õâ¸öÖµ²»Ò»¶¨Îª0£¬¸ù¾ÝÄãµÄº¯Êý¶¨lc_astr_appmsg=Space(255) &&»ò 255¸öchar(0)yh_interface_init(lc_astr_jysr_xml,@ln_aint_appcode,@lc_astr_appmsg)
*³É¹¦ºó£¬Äã¿ÉÒÔÏÔʾ´«³öÖµ£º
?ln_aint_a


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

delphiµÄdll×Ó´°ÌåÎÊÌâµÄ½â¾ö - Delphi / ·Ç¼¼ÊõÇø

Ò»Ö±ÏëʹÓÃdll£¬µ«delphiµÄdll×Ó´°Ìå¾­³£Óи÷ÖÖÎÊÌ⣬±ÈÈçÖ÷´°¿ÚÓëdll×Ó´°¿ÚµÄ½¹µãÎÊÌ⣬×Ó´°¿ÚÖпؼþµÄtab¼ü¡¢Èȼü¡¢enter¼üµÈµÄÎÊÌ⣬×Ó´°¿ÚÍ˳öµÄÎÊÌâ¡¢Æ½Ãæ°´Å¥ÎÊÌâµÈµÈ£¬ÍøÕ¾ÉϽøÐÐÁËËÑË÷£¬Ã»ÓбȽÏÍêÃÀµÄ½â¾ö· ......

jmp,je,jnzÔÚdelphiÖеÄд·¨

function myfun:integer;
var b:pointer;
begin
b:=pointer($6Bc3C6);
asm
  mov eax,[eax]
  xor eax,[ecx+4]
  cmp eax,0
  je @b
 end;
ÕâÑùд±àÒë²»¹ýÈ¥¡£ÇëÎÊÈçºÎ² ......

ÕÐdelphi³ÌÐòÔ±

¹¤×÷µØµãÔÚ½­ËÕÀ¥É½
delphi¿ª·¢¾­Ñ飺1Ä꣨º¬£©ÒÔÉÏ
ÊìÁ·Ê¹ÓÃSQL Server OracleµÈ³£ÓÃÊý¾Ý¿â
ÄܶÀÁ¢½â¾öÏà¹ØÎÊÌâ
ÎÒÃǹ«Ë¾ÒªÕÐdelphi³ÌÐòÔ±,²»ÖªµÀÒª¿ª¶àÉÙÒø×Ó£¬Çë¸÷λָ½ÌÖ¸½Ì

Â¥Ö÷£¬¿´¿´ÎÒÕ¦Ñù 5ÄêµÄdelph ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ