DelphiÀïʵÏÖMD5¼ÓÃÜ ¿Ø¼þ·¨
ÔÚDelphiÀïʵÏÖMD5¼ÓÃÜÆäʵºÜÈÝÒ×£¡·½·¨ÈçÏ£º
ÔÚUsesµ¥ÔªÖÐÒýÓà IdHashMessageDigest,IdGlobal, IdHash µ¥Ôª£¬ÔÙдÈçÏ´úÂë
¼´¿ÉÒÔ´ïµ½MD5µÄʵÏÖ¡£
ʾÀý´úÂë
procedure
TForm
1.Button1Click(Sender: TObject);
var
MyMD5: TIdHashMessageDigest5;
Digest: T4x4LongWordRecord;
begin
MyMD5 := TIdHashMessageDigest5.Create;
Digest := MyMD5.HashValue('');
ShowMessage('32: ' + MyMD5.AsHex(Digest)); //ÏÔʾ32¸ö×Ö·û³¤¶ÈµÄMD5Ç©Ãû½á¹û
ShowMessage('16: ' + Copy(MyMD5.AsHex(Digest), 9, 16)); //ÏÔʾ16¸ö×Ö·û³¤¶ÈµÄMD5Ç©Ãû½á¹û
end;
˵Ã÷£º
MyMD5.HashValue º¯ÊýÖпÉÒÔÊÇÒ»¸ö×Ö·û´®»òÊÇÒ»¸öÁ÷¶ÔÏó,Ëü·µ»ØµÄ½á¹ûÀàÐÍΪ T4x4LongWordRecord µÄMD5Ç©Ãûºó½á¹û
MyMD5.AsHex º¯ÊýÊǽ«T4x4LongWordRecordµÄMd5Ç©Ãûת»»³ÉΪʮÁù½øÖƵÄMD5Ç©Ãû×Ö·û´®
Ïà¹ØÎĵµ£º
±êÌâ
Delphi¶à²ã¿ª·¢·½°¸±È½Ï £¨×ªÔØ£©
¹Ø¼ü×Ö
Delphi¶à²ã¿ª·¢·½°¸±È½Ï
³ö´¦
·½°¸->
Midas
DCOM
COM+
ASTA
RemoteObject
.NET
ÌṩÕß
Borland
΢Èí
΢Èí
http://www.astatech.com
http://www.remobjects.com
΢Èí
ºËÐļ¼Êõ
COM
COM
COM
ASTA×Ô¼ ......
Ò»¡¢DelphiÖÐÁ÷µÄ»ù±¾¸ÅÄî¼°º¯ÊýÉùÃ÷
ÔÚDelphiÖÐ,ËùÓÐÁ÷¶ÔÏóµÄ»ùÀàΪTStreamÀà,ÆäÖж¨ÒåÁËËùÓÐÁ÷µÄ¹²Í¬ÊôÐԺͷ½·¨¡£ TStreamÀàÖж¨ÒåµÄÊôÐÔ½éÉÜÈçÏÂ: 1¡¢Size:´ËÊôÐÔÒÔ×Ö½Ú·µ»ØÁ÷ÖÐÊý¾Ý´óС¡£ 2¡¢Position:´ËÊôÐÔ¿ØÖÆÁ÷ÖдæÈ¡Ö¸ÕëµÄλÖᣠTstreamÖж¨ÒåµÄÐé·½·¨ÓÐËĸö: 1¡¢Read:´Ë·½·¨ÊµÏÖ½«Êý¾Ý´ÓÁ÷ÖжÁ³ö¡£º¯ÊýÔÐÎΪ: ......
community.csdn.net/Expert/topic/3423/3423580.xml?temp=.7675897
Ö÷¡¡¡¡Ì⣺ ÔõÑùÓÃDELPHI½ÓÊÕÉãÏñÍ·µÄͼÏó
×÷¡¡¡¡Õߣº benbenpear (±¿±¿)
µÈ¡¡¡¡¼¶£º
ÐÅ Óþ Öµ£º 100
ËùÊôÉçÇø£º Delphi GAME£¬Í¼Ðδ¦Àí/¶àýÌå
ÎÊÌâµãÊý£º 0 ......
ÓÃDelphi×÷µÄ³ÌÐòµÄÔ´´úÂëÖг£¼ûµÄÎļþÀ©Õ¹Ãû£¬²¢¸ø³öÁËÕâЩÎļþÀ©Õ¹ÃûµÄÒâÒ壬ÒÔ±ãÔ´´úÂë¹ÜÀíʱ×÷Ϊ²ÎÕÕ£¬À©Õ¹ÃûÒÔ×ÖĸΪÐò£¨²»ÐèÒª½øÔ´´úÂë¿â²»±íʾ²»ÐèÒª½ø¿â£©¡£
¡¡¡¡~*
¡¡¡¡DelphiÉú³ÉµÄ±¸·ÝÎļþ£¬ÔÚ°æ±¾¿ØÖƿ⼰·¢²¼´úÂëÖв»Ó¦¸Ã³öÏÖÕâЩÎļþ£¬Èç¹ûÐÞ¸ÄÁËij¸öÎļþÈ´ÒòijЩÔÒòûÓб£´æµÄ»°£¬¿ÉÒÔ³¢ÊÔʹÓÃÕâЩÎļþ» ......
ö¾ÙÀàÐÍ
¡¡¡¡Pascal³ÌÐò²»½öÓÃÓÚÊýÖµ´¦Àí£¬»¹¸ü¹ã·ºµØÓÃÓÚ´¦Àí·ÇÊýÖµµÄÊý¾Ý¡£ÀýÈ磬ÐÔ±ð¡¢Ô·ݡ¢ÐÇÆÚ¼¸¡¢ÑÕÉ«¡¢µ¥Î»Ãû¡¢Ñ§Àú¡¢Ö°ÒµµÈ¡£
1¡¢Ã¶¾ÙÀàÐ͵͍Òå
¸ñʽ:¡¡type ö¾ÙÀàÐͱêʶ·û=(±êʶ·û1,±êʶ·û2,¡,±êʶ·ûn)
2¡¢Ã¶¾ÙÀàÐÍÊý¾ÝÌØµã
¢Ù ö¾ÙÔªËØÖ»ÄÜÊDZêʶ·û£»
ÀýÈ磬ÏÂÁÐÀàÐͶ¨ÒåÊǺϷ¨µÄ£º
¡¡ ......