delphi¶þ½øÖƲéѯij¼¸¸ö×Ö½ÚÓÃIFTHENÈ¥±È½ÏÌ«ÂýÁË
delphi¶þ½øÖƲéѯ¼¸¸ö×Ö½ÚÓÃIFTHENÈ¥±È½ÏÌ«ÂýÁË£¬
if (buffer[0]=$A9 ) and ( buffer[1]=$B5 ) and ( buffer[2]=$B2 ) and ( buffer[3]=$04 ) then
begin
¼ÈÈ»ÊÇÏàÁ¬µÄ£¬²»ÄܰÑËü×÷Ϊһ¸öÕûÌåÈ¥²éÕÒÂð
Á¬ÐøµÄ4¸ö×ֽڵıȽÏ, ¿ÉÒÔ¿´³ÉDWORDÀàÐÍÀ´½øÐÐ, ÀýÈç:
Delphi(Pascal) code:
var
buffer: array[0..1023] of Byte;
begin
buffer[0] := $A9;
buffer[1] := $B5;
buffer[2] := $B2;
buffer[3] := $04;
if (buffer[0] = $A9 ) and (buffer[1] = $B5 ) and (buffer[2] = $B2 ) and (buffer[3] = $04) then ShowMessage ('One');
if DWORD(PDWORD(@buffer[0])^) = $04B2B5A9 then ShowMessage ('Two');
end;
if PInteger(@buffer[0])^ = $04b2b5a9 then
²»ÖªµÀlzÊDz»ÊÇÒª±È½ÏºÝ¶àÕâÑùµÄbyte£¿Èç¹û4¸öµØ»°.........
Êǵġ£¡£¾ÍÊÇN¶à¸ö¿ÉÄܼ¸°Ù¼¸Ç§¸ö..¼¸Íò¸öÒ²ÓпÉÄÜ
ÎÒµÄÒâ˼ÊÇÒ»¸öºÜ´óµÄÎļþ¼¸M»òÊ®¼¸M¡£¡£ÔÚÕâÀïÅúÁ¿²éѯÕ⼸¸ö×Ö½Ú¡£¡£DELPHI´¦ÀíËÙ¶ÈÌ«Âý¡£¡£ÓÐûÓкð취
這應該ÊDzéÕÒËã·¨問題£¬±È較ÊÇ難ÃâµÄ....
ÓÐûÓкõİ취¡£¡£ÌáÉýËÙ¶È
up`
case
Ïà¹ØÎÊ´ð£º
¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
ÈçÌ⣬ µã»÷DelphiµÄFile²Ëµ¥µÄExitÍ˳öDelphi£¬ Delphi²¿·Ö¹Ø±Õ--¼´²»ÄÜÔÙ²Ù×÷Delphi£¬µ«ÈÎÎñÀ¸ºÍ½ø³ÌÀDelphi»¹ÔÚÔËÐУ¬Ã»ÓÐÕæÕýµÄÍ˳ö¡£ÊDz»Êǰ²×°ÁËjre¸Ä±äÁËijЩ»·¾³±äÁ¿µ¼Ö£¬ÇëÎʸßÊÖÈçºÎ½â¾ö£¿ ×¢£ºÃ»°²×° ......
ÒªÇóÄÜʵÏÖ¶þÈËÔŲ́ͬµçÄÔÉ϶ÔÕ½µÄ ²»ÓÃÌ«»¨ÉÚ ×îºÃ»¹¼ÓÉÏÈË»ú¶ÔÕ½µÄ ¼±Ðè ˰ïÏÂæ°¡Ñ½!!!!!!!!
up
baidu£¬google
up
http://www.codepub.com/software/view-software-4061.html
ÍøÕ¾ÉÏÓÐ
......
delphiÈçºÎ»ñÈ¡ÍøÒ³µÄ·µ»Ø×´Ì¬£¬¾ÍÏñä¯ÀÀÆ÷Öзµ»ØµÄhttp 500´íÎó£¬404´íÎóµÈ
ÁíÍâÄܲ»ÄÜ»ñÈ¡µ½´ò¿ªÒ»¸öÍøÒ³µÄ·´Ó¦Ê±¼ä£¬¿ÉÒÔ´óÖ²ο¼ÍøÒ³´ò¿ªµÄËÙ¶È
лл£¡
¶¼¿ÉÒÔʵÏֵ쬾ßÌåµÄÄ㻹ÊDzé×ÊÁϰɣ¡
×Ô¼º ......