¹ØÓÚDelphiµÄ .exe ¼ÓÃܵÄÒ»¸öÎÊÌ⣬¸÷λ¼òµ¥¿´ÏÂ
1¡¢Ð´ÁËÒ»¸öСÈí¼þ£¬Óà Delphi µÄ Ado£¬SQLServer Êý¾Ý¿â£¬³ÌÐòûÓдò°ü£¬ .exe ºÍ Êý¾Ý¿âÎļþÖ±½Ó¸øÁ˿ͻ§
2¡¢µ«ÊÇÎÒ²»ÏëÈÿͻ§ËæÒâ´«²¥£¬ÎÒÏë¶Ô .exe ×ö¸ö¼ÓÃÜÏÞÖÆ£¬ÒªÉÔ΢ºÃÒ»µãµÄ£¬²»Òª×¢²á±í¡¢iniÎļþÖ®ÀàµÄ
ÀýÈ磺ֱ½Ó¸´ÖÆ .exe µ½±ðµÄ»úÆ÷Éϲ»ÄÜÓÃ
3¡¢×îºÃ²»Òª×¢²á±íÖ®ÀàµÄ£¬dll µ¹ÊÇ¿ÉÒÔ£¬´ó¼Ò¶¼ÓÐʲôºÃµÄ°ì·¨£¬×îºÃÄÜÓвÎÕÕµÄÀý×Ó´úÂ룬¼òµ¥µÄ¾ÍÐÐ
Äã¿ÉÒÔ×Ô¼º×öÒ»¸ökeyÎļþ£¬È±ÉÙÕâ¸ökey¾Í²»ÄÜÔËÐУ¬ÀàËÆÓÚ¼ÓÃܹ·£¬²»¹ý¼ÓÃÜÇ¿¶ÈÒÀÈ»ºÜÈõ
¶ÁȡӲ¼þID
ÈçÓ²ÅÌID
function GetIdeSerialNumber: pchar;
const IDENTIFY_BUFFER_SIZE = 512;
type
TIDERegs = packed record
bFeaturesReg: BYTE; // Used for specifying SMART "commands".
bSectorCountReg: BYTE; // IDE sector count register
bSectorNumberReg: BYTE; // IDE sector number register
bCylLowReg: BYTE; // IDE low order cylinder value
bCylHighReg: BYTE; // IDE high order cylinder value
bDriveHeadReg: BYTE; // IDE drive/head register
bCommandReg: BYTE; // Actual IDE command.
bReserved: BYTE; // reserved for future use. Must be zero.
end;
TSendCmdInParams = packed record
// Buffer size in bytes
cBufferSize: DWORD;
// Structure with drive register values.
 
Ïà¹ØÎÊ´ð£º
Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿
sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£
È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾
ѧϰѧϰ¡£
ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ×´ ......
ÎÒ±¾À´ÔÚѧУÊÇŪµÄJ2EE
×òÌìÈ¥Á˳¤É³Ò»¼Ò¹«Ë¾Ó¦Æ¸ ˵ÊÇÓÐÒ»¸öÏîÄ¿ delphiµÄ
ʵϰÆÚÒ»¸öÔ ËÄÌì°ëµÄdelphiÅàѵ ºóÃæ25Ìì¸øÄãÒ»¸öÉè¼ÆÎĵµ×Ô¼º×öÒ»¸öÏîÄ¿
×ߺ󲻾ôòµç»°¹ýÀ´½ÐÎÒÐÇÆÚһȥ±¨µ½
¿´µ½delphiµ ......
ÎÒÔÚÍøÉÏÕÒÁ˸ö¹ØÓÚIEBHOµÄ´úÂ룬Ȼºó°´ÕÕÄĸöÉèÖÃÁË£¬ºóÀ´ÔËÐеÄʱºò³öÏÖ
[´íÎó] Unit1.pas(15): Undeclared identifier: 'GetTypeInfoCount'
[´íÎó] Unit1.pas(15): Undeclared identifier: 'GetTypeInfo ......
Ò»Ö±ÏëʹÓÃdll£¬µ«delphiµÄdll×Ó´°Ìå¾³£Óи÷ÖÖÎÊÌ⣬±ÈÈçÖ÷´°¿ÚÓëdll×Ó´°¿ÚµÄ½¹µãÎÊÌ⣬×Ó´°¿ÚÖпؼþµÄtab¼ü¡¢Èȼü¡¢enter¼üµÈµÄÎÊÌ⣬×Ó´°¿ÚÍ˳öµÄÎÊÌâ¡¢Æ½Ãæ°´Å¥ÎÊÌâµÈµÈ£¬ÍøÕ¾ÉϽøÐÐÁËËÑË÷£¬Ã»ÓбȽÏÍêÃÀµÄ½â¾ö· ......