+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : استخدام مكتبات الهاش والتشفير في Delphi xe (/showthread.php?tid=3151)
استخدام مكتبات الهاش والتشفير في Delphi xe - cargem - 05-06-2011
كيف يمكن استخدام مكتبات الهاش والتشفير في Delphi xe
مع العلم ان مكتبات الهاش التي تخص D7 لا تفي بالغرض مع Delphi xe
ما المكتبات الممكن استخدامها مع Delphi xe
تحياتي
استخدام مكتبات الهاش والتشفير في Delphi xe - محمد عبد العزيز - 05-06-2011
السلام عليكم ورحمة الله
أولا من الاحسن ان تفرق بين الHash والتشفير
إقتباس :مكتبات الهاش التي تخص D7 لا تفي بالغرض مع Delphi xeعن اي مكتبة تتحدث ولما لاتفي بالغرض ؟
استخدام مكتبات الهاش والتشفير في Delphi xe - cargem - 05-06-2011
وعليكم السلام ورحمة الله وبركاته
مثلا md5
اقصد الناتج خطأ
Dcpcrypt
Base64
Blowfish
Cast128
Cast256
CryptReg
DCPcrypt
Gost
Haval
IDEA
Mars
Misty1
RC2
RC5
RC6
Rijndael
Rmd160
SHA1
Twofish
UUEnc
Hashes
DCPhaval
DCPmd4
DCPmd5
DCPripemd128
DCPripemd160
DCPsha1
DCPsha256
DCPsha512
DCPtiger
Md5
![[صورة: picture0001i.png]](http://img231.imageshack.us/img231/6587/picture0001i.png)
استخدام مكتبات الهاش والتشفير في Delphi xe - محمد عبد العزيز - 05-06-2011
واضح انها مشكلة Unicode
المرفق بحاجة لتعديل ليتوافق مع اصدار دلفي 2009 وما فوق
راجع : مكتبة لحساب md5 متوافقة مع إصدار Delphi 2010
http://www.delphi4arab.net/forum/showthread.php?tid=2236
نفس الشيئ بالنسبة لDCPcrypt فلها تحديث، حملها من موقعها
كود :
http://www.cityinthesky.co.uk/opensource/dcpcryptاستخدام مكتبات الهاش والتشفير في Delphi xe - cargem - 05-06-2011
هذ الكود اروع مايكون
ولكن ماذا عن ?decrypts and hash files
PHP كود :
function GetMd5(const Value: UnicodeString): string; overload;
var
hash: MessageDigest_5.IMD5;
fingerprint: string;
begin
hash := MessageDigest_5.GetMD5();
hash.Update(Value);
fingerprint := hash.AsString();
Result := LowerCase(fingerprint);
end;
function GetMd5(const Value: AnsiString): string; overload;
var
hash: MessageDigest_5.IMD5;
fingerprint: string;
begin
hash := MessageDigest_5.GetMD5();
hash.Update(Value);
fingerprint := hash.AsString();
Result := LowerCase(fingerprint);
end;
استخدام مكتبات الهاش والتشفير في Delphi xe - محمد عبد العزيز - 06-06-2011
إقتباس :ولكن ماذا عن ?decrypts and hash filesماذا عنهم ؟ إسال سؤال محدد
استخدام مكتبات الهاش والتشفير في Delphi xe - cargem - 06-06-2011
md5 اشتغلة على delphi xe
بوجود MessageDigest_5
هل هناك مكتبات اخرى تتعامل مع بقية hashes
استخدام مكتبات الهاش والتشفير في Delphi xe - محمد عبد العزيز - 07-06-2011
عامة هناك عدة طرق:
- تفهم الخواريزمية وتكتبها/تبرمجها بنفسك
- تبحث عنها مكتوبة بدلفي (سبق لغيرك وكتبها)
- تبحث عنها بلغات اخرى مثل لغة السي وتحولها الى باسكال/دلفي
- تبحث عنها بلغات اخرى على شكل مكتبات/DLL وتستخدمها بدلفي
-
مجموعة منها (معظمها قديم) بموقع efg
كود :
http://www.efg2.com/Lab/Library/Delphi/MathFunctions/Cryptography.htmكود :
http://lockbox.seanbdurkin.id.au