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
Ïà¹ØÎÊ´ð£º
hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ
ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
RT
ÎÒÔڹرÕDelphi³ÌÐòµÄʱºòÐèÒªÏòINIÎļþÖÐдµã¶«Î÷.
ÏÂ´ÎÆô¶¯Delphi³ÌÐòµÄʱºòÐèÒª¶Á,ÔÚDelphi³ÌÐòµÄOnCloseʼþÖÐдÁËûÎÊÌâ,µ«ÎÒ·¢ÏÖÈç¹û³ÌÐò¿ª×Å,È»ºó½«»úÆ÷:¿ªÊ¼->¹Ø±Õ¼ÆËã»ú->¹Ø±Õ»òÕßÖØÐÂÆô¶¯µÄʱº ......
ºÜ¼òµ¥µÄÎÊÌ⣬ÈçºÎÔÚ×é¼þmapcontrolÖÐÏÔʾAutoCAD»æÖƵĵØÍ¼ÐÅÏ¢£¿ÇëÏêϸָ½Ì
ʲôÇé¿ö£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿£¿
mapcontrolÊÇʲô¶«Î÷ѽ
ÏÔʾAutoCAD»æÖƵĵØÍ¼ÐÅÏ¢,´ÓÍøÉÏÕҿؼþ°É,
»òÕßÄúÓнâÊÍ ......
ÈçÌâËùʾ
СµÜʹÓÃDelphi7»·¾³½øÐÐÊý¾Ý²É¼¯£¬²É¼¯µ½µÄÊý¾Ý·ÅÈëSQL Server2000Êý¾Ý¿âÖУ¬µ«ÊÇÏë²»°²×°SQLServer2000À´ÊµÏÖ´ÓÆäËü¼ÆËã»úÉÏÔËÐд˳ÌÐò£¬²»ÖªÈçºÎʵÏÖ£¿Íû¸÷λ´óϺ¸æÖªÒ»¶þ¡£
ÁíÍ⣬ÏÖÔÚСµÜÓöµ½ÁËÒ»¸ö ......