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µÄÎÊÌ⣬¹«Ë¾Ö®Ç°ÓõÄÒ²ÊÇD°æDelphi7ÆóÒµ°æµÄ¡£ºóÀ´±»ËÍÁËÂÉʺ¯ÒԺ󣬾ÍÇ¿ÖÆ¸ÄÓÃDelphi7¸öÈ˰棬¾ç˵Õâ¸ö°æ±¾ÊÇÃâ·Ñ°æ£¬»òÕß˵ºÜ±ãÒË£¬Èç¹û²é³öÀ´£¬¾ÍÂò¸öºÃÁË¡£ÕâÏ¿ɺ᣿àÁËÎ ......
hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ
ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
ÒªÇóÄÜʵÏÖ¶þÈËÔŲ́ͬµçÄÔÉ϶ÔÕ½µÄ ²»ÓÃÌ«»¨ÉÚ ×îºÃ»¹¼ÓÉÏÈË»ú¶ÔÕ½µÄ ¼±Ðè ˰ïÏÂæ°¡Ñ½!!!!!!!!
up
baidu£¬google
up
http://www.codepub.com/software/view-software-4061.html
ÍøÕ¾ÉÏÓÐ
......
IF THEN ELSEÖжà¸öÌõ¼þÔõôд£¬È磺×Ö·û´®S1£¬S2£¬S3£¬S4¾ùÒª²»Îª¿Õ¡£
ÔõôÑù°ÑËüдµ½IFÖÐÈ¥£¿
Çë¸÷λ°ï°ï棬лл£¡
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......
delphiÈçºÎ»ñÈ¡ÍøÒ³µÄ·µ»Ø×´Ì¬£¬¾ÍÏñä¯ÀÀÆ÷Öзµ»ØµÄhttp 500´íÎó£¬404´íÎóµÈ
ÁíÍâÄܲ»ÄÜ»ñÈ¡µ½´ò¿ªÒ»¸öÍøÒ³µÄ·´Ó¦Ê±¼ä£¬¿ÉÒÔ´óÖ²ο¼ÍøÒ³´ò¿ªµÄËÙ¶È
лл£¡
¶¼¿ÉÒÔʵÏֵ쬾ßÌåµÄÄ㻹ÊDzé×ÊÁϰɣ¡
×Ô¼º ......