delphi4arab منتديات دلفي للعرب
DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي الأخرى (https://delphi4arab.net/forum/forumdisplay.php?fid=4)
+--- قسم : ملفات و مكونات دلفي مجانية للتحميل (https://delphi4arab.net/forum/forumdisplay.php?fid=25)
+--- الموضوع : DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي (/showthread.php?tid=272)

الصفحات: 1 2


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - محمد عبد العزيز - 24-11-2008


DCPcrypt
مكتبة مجانية ومفتوحة المصدر بترخيص MiT
بها اشهر خواريزميات التشفير العالمية بدلفي
  • Blowfish
  • Cast 128
  • Cast 256
  • DES, 3DES
  • Ice, Thin Ice, Ice2
  • IDEA
  • Mars
  • Misty1
  • RC2, RC4, RC5, RC6
  • Rijndael (the new AES)
  • Serpent
  • Tea
  • Twofish

وخواريزميات الهاش Hash
  • Haval
  • MD4
  • MD5
  • RipeMD-128
  • RipeMD-160
  • SHA-1
  • SHA-256, SHA-384, SHA-512
  • Tiger
التحميل
كود :
http://www.cityinthesky.co.uk/opensource/dcpcrypt



DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - مبتدأ جدا - 10-01-2009

اعتذر ولكن مالقصود بالتشفير هنا؟
تشفير النصوص؟ أم تشفير برامج بتغيير قيمها مثلا -كما في تشفير الفيروسات والتروجونات-
اقبلوا تساؤلاتي...


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - محمد عبد العزيز - 10-01-2009

إقتباس :اعتذر ولكن مالقصود بالتشفير هنا؟
المقصود هو المعنى الحقيقي للكلمة في اللغة العربية
تماما كما تجدها في القاموس



DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - محمد الغيلي - 16-02-2009

شكرررراً جدا أخي العزيز اصلاً انا مهتم جداً بالتشفير كما انني أعمل كذلك على Java في برمجة الخوارزميات DES-RSA وغيرها ، شكراً

التشفير معناه تغيير البيانات الاصليه الى بيانات غير واضحه scrambled data وبطريقه اخرى يمكن الرجوع الى البيانات الأصليه عن طريق تلك البيانات الغير واضحه

ام التشفير هي طريقة xor


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - Goblin - 17-03-2009

[COLOR="RoyalBlue"]السلام عليكم و رحمة الله و بركاته

لدي مشكلة اثناء تنصيب المكتبة (انظر للصورة).[/COLOR]

[صورة: 64ea20.png]

لدي CodeGear™ Delphi® for Win32® Version 11.


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - محمد عبد العزيز - 18-03-2009

إقتباس :لدي مشكلة اثناء تنصيب المكتبة (انظر للصورة)
بالنسبة لتنصيب اي مكون راجع درس : شرح فلاشي لتثبيت مكونات دلفي

بالنسبة لرسالة الخطأ بالصورة فوق فهي تظهر عند محاولة تنفيذك لDLL
المكتبات DLL لا تنفذ من داخل دلفي وانما يتم استخدامها من مشروع اخر
والسلام عليكم



DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - James - 16-07-2009

مبتدأ جدا كتب :اعتذر ولكن مالقصود بالتشفير هنا؟

يا سيدي الفاضل أعتقد أنه ورد على مسامعك من قبل أنه "يحبذ" مثلا أن يتم تشفير ال Password يعني كمثال تلاحظ أنه لما تضيع الباسوورد الحاص بك أحيانا.... فالغالب أنه يتم إعطائك فرصة لإعادة كتابة باسوورد جديد وليس استرجاع القديم... وهذا لأن جميع الباسووردا تخضع غالبا لأنظمة تشفير غير عكسية مثل MD5 و SHA1 .
فإدا المقصود هنا بالتشفير هو تشفير النصوص بأدوات عالية الفعالية مادام وجب جعلها سرية.....Wink
... هذا والله أعلم


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - white_knight - 31-01-2011

السلام عليكم

لاحظت وجود نظام التشفير DES فهل يوجد من ضمن المكتبة النوع البسيط منه SDES
simplified DES وشكرا جزيلا


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - ELARAPY - 06-02-2011

بارك الله فيك استاذ عبد العزيز


DCPcrypt لاستخدام اشهر خواريزميات التشفير العالمية بدلفي - S.FATEH - 13-01-2015

بارك الله فيك مكونات جيدة لكن على ما يبدو مطور الموقع الرسمي توقف عن تطويرها التطوير يجري من طرف اشخاص اخرين
الموقع الرسمي
كود :
http://www.cityinthesky.co.uk/opensource/dcpcrypt/
التطويرات
كود :
https://bitbucket.org/wpostma/dcpcrypt2010
جربتها على xe6...
تطوير اخر
كود :
http://sourceforge.net/projects/dcpcrypt/

مثال للاستخدام :
كود :
function TForm1.MD5(Value: string): string; var Buf: string; BufSize: Integer; Hash:array[0..15] of byte; i: Integer; begin Buf:= Value; BufSize:= SizeOf(Buf); DCP_md51.Init; DCP_md51.Update(Buf, BufSize); DCP_md51.Final(Hash); Result := ''; for I := 0 to 15 do Result := Result + IntToHex(Hash[i], 1); end; procedure TForm1.Button1Click(Sender: TObject); begin Edit2.Text := MD5(Edit1.Text); end;