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

ÔÚDelphiÖÐÈçºÎÉùÃ÷Õâ¸öC£«£«Öеĺ¯Êý

ÔÚDelphiÖÐÈçºÎÉùÃ÷Õâ¸öC£«£«Öеĺ¯Êý£¬ÊÇÒ»¸öDLLÖÐÒýÈëµÄ

unsigned char _stdcall ConnetDrv( unsigned char DrvSnr, unsigned char DrvType, unsigned char *sRt, unsigned char TCP, unsigned int *dNum, unsigned char *dVAR, unsigned char *dSType, unsigned int tOver);

лл£¡£¡

function ConnetDrv(DrvSnr, DrvType: byte; var sRt: Byte; TCP: Byte;
var dNum :Dword; var dVAR: byte ; var dSType: byte; tOver: Integer): Byte;

Â¥ÉϵÄÍüÁË¼Ó stdcall

Delphi(Pascal) code:

function ConnetDrv(DrvSnr, DrvType: byte; var sRt: Byte; TCP: Byte;
var dNum :Dword; var dVAR: byte ; var dSType: byte; tOver: Integer): Byte; stdcall;



ÕâÑù¿ÉÐаÉ

ÒýÓÃ
Â¥ÉϵÄÍüÁË¼Ó stdcall

ȷʵÊèºöÁË

¸Ðл´ó¼ÒµÄ¹Ø×¢£¡£¡Ð´ÁËÒ»Ìì²ÅдÁËÕ⼸¸öDLLµÄ½Ó¿Ú£¡£¡£¡£¡¡¡³§¼Ò¸øµÄ˵Ã÷²»Ò²²»Ïêϸ£¬¾ÍÄÃÕâ¸öº¯ÊýÀ´Ëµ£¬Ç°ÃæÁ½¸ö²ÎÊý£¬ÓÐʱ¿ÉÄÜÔÚDELPHIÖÐÓÃBYTE£¬ÓÐʱÓÖÒªÓÃINTEGER²ÅÐУ¡£¡£¡ÕæHAN£¬»ù±¾ÒªÒ»¸öÒ»¸ö²ÎÊýµÄÊÔ£¡£¡£¡£¡


Ïà¹ØÎÊ´ð£º

ÓÃC»òC++ÈçºÎ±àдÇó½â3Dħ·½³ÌÐò - C/C++ / C++ ÓïÑÔ

ÇëÎÊÓÃC»òC++ÈçºÎ±àдÇó½â3Dħ·½µÄ³ÌÐò£¬¸Ã´ÓºÎ¿ªÊ¼£¿
лл¸÷룬°ïæÌáµã½¨Òé°É¡£

http://www.mofang.net/code/176/182/6581.html

ÎÒÖ»ÄÜÍ»ÆÆ60Ã룡°¦¡£

ÎÒ¸Õ¹ý40Ãë

googleµÄandroidÖÐÓиöOpenGL ES + ......

ÈçºÎ²éÕÒϵͳδ°²×°²¹¶¡C - C/C++ / ÐÂÊÖÀÖÔ°

ÇëÎʸ÷λ¸ßÊÖÈçºÎÓÃC/C++»ñµÃϵͳδ°²×°²¹¶¡
ºÃÏñºÜרҵµÄ¶«Î÷¡£¡£¡£

²é×¢²á±í
ÿ¸ö²¹¶¡Èç¹û°²×°Á˶¼»áÔÚ×¢²á±íÀïÃæµÇ¼Ç

ÇëÎÊÄܲ»ÄܸüÇåÎúЩ£¬ÎÒÏëÓÃc\c++²é³öÀ´£¬²»ºÃÒâ˼£¬ÎÒÊÇÐÂÊÖ¡£»¹ÍûÖ¸½Ì¡£Ð»

·ÖÖµ ......

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

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

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

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ