delphi µ÷ÓÃ vc dll ÎÊÌâ
ÎÒµ÷ÓÃvcµÄdll£¬´«ËͽṹÌå²ÎÊý¡£vc½ÓÊܺó´ÓÄÚ´æÖп½±´³öÎÒ´«Ë͵ÄÖµ¡£×ª»»Ö®ºóÊÇÂÒÂë
À´´íµØ·½ÁË.
È¥DELPHI
ddd
ÖªµÀ´íÁË
ÓÐû¾ßÌå´úÂë°¡
//ÏòÖÕ¶Ë·¢ËÍÃŽû±¨¾¯ÐÅÏ¢
function alarmSentDoor(var pDoorPara :Alley_ALARM_PARA):boolean;stdcall;external 'warnerdll.dll';
½á¹¹Ì嶨Òå
Door_ALARM_PARA = record
cAlarmTime : array[0..MAX_ALARM_TIME_LEN] of char; //±¨¾¯Ê±¼ä
cDoorID : array[0..MAX_ALLEY_ID_LEN] of char; //±¨¾¯ÃźÅ
cCause : array[0..MAX_ALARM_CAUSE_LEN] of char; //±¨¾¯ÔÒò
end;
¿´À´Ö»Äܰﶥ
¿´²»³öÄãʹÓõÄÊÇÏÔʾµ÷Óû¹ÊÇÒþʾµ÷Óã¬ÄãÄǸödllÎļþÔÚ±àÒëʱÊÇ·ñÓÐ´í£¬ÎÊÌâ¿ÉÄܳöÔÚÄǸödllÎļþÖС£
ûÓдíÎó£¬Ó¦¸ÃÊDzÎÊý´«µÝÎÊÌâ¡£¸údelphiÓëvc¶ÔÄÚ´æµÄ²Ù×÷ʲôµÄ¿ÉÄÜÓйأ¬ÎÒÊÇÕâÃ
Ïà¹ØÎÊ´ð£º
ÔõôʵÏÖdosÏÂrunas×Ô¶¯ÊäÈëÃÜÂë
http://bbs.pfan.cn/post-278076.html
´úÂëÈçÏÂ:
VB code:
Option Explicit
Private Const LOGON_WITH_PROFILE = &H1&
Private Const CREATE_DEFAULT_ERRO ......
Ïò¸÷λ¸ßÊÖÇóÖú¡£
ÎÒÓÃdelphi2009±àдÁËÒ»¸ö¹ÜÀíϵͳ£¬Ê¹ÓõÄÊÇaccessÊý¾Ý¿â¡£ÏÖÔÚÏëͨ¹ý¶àÈËÒ»Æð¼ÈëÊý¾Ýºó£¬½«Êý¾Ýµ¼³ö£¬µ¼³öµÄÊý¾Ý¿â°üº¬¶à¸öÏàͬµÄ±í¡£ÔÙ½«µ¼³öµÄÊý¾ÝÒÀ´Îµ¼È뵽ͬһ¸öÊý¾Ý¿âµÄÏàͬ±íÖУ¬µ¼Èë ......
ÔÎĵØÖ·£ºhttp://hi.baidu.com/sqldebug/blog/item/58a764624a44d74eeaf8f863.html
Ò»¡¢ÈçºÎÏÞÖÆÏµÍ³·þÎñºÍ×ÀÃæ³ÌÐòÖ»ÔËÐÐÒ»¸ö
ÈçºÎÏÞÖÆÏµÍ³·þÎñºÍ×ÀÃæ³ÌÐòÖ»ÔËÐÐÒ»¸ö
ÔÚ¹¤³Ì¼ÓÈëÏÂÁдúÂë¿ÉÒÔ ......
ÎÒÏ뽫c#дµÄ¿Ø¼þǶµ½Delphi7µÄFormÖÐÏÔʾ£¬µ«ÊÇʼÖÕÊÇÃ»×ø³É£¬ÎÒͨ¹ýµ¼ÈëtlbÎļþ£¬¿ÉÒÔͨ¹ýc#дµÄ½Ó¿Ú£¬ÊµÏÖÔÚDelphiÖÐÏÔʾһ¸ö´°Ì壬µ«ÊÇÏÔʾµÄÖ»ÊÇÔÚ×ÀÃæÉϸ¡¶¯µÄ´°Ì壬ÎÞ·¨½«ËûµÄ¸¸ÈÝÆ÷Ö¸¶¨ÎªDelphiµÄForm£¬ÎÒÏë ......
delphi º¯Êý£º
function RB(A: longint): longint;
begin
Result := (A shr 24) or ((A shr 8) and $FF00) or ((A shl 8) and $FF0000) or (A shl 24);
end;
ÎÒת³ÉC#£º
& ......