كل عام وأنتم بخير
أنا أريد أن أخزن كلمة في متحول يعني مثل باسورد هل يوجد طريقة أخزنها في متحول واقدر أغيرها حتى بعد ماأغلق البرنامج يضل حافظها
عمل كلمة مرور للبرنامج
مغلق
السلام عليكم
لم اهفم جيدا
راي الخاص :
احسن طريفة لحفظ كلمت السر هي الرجيستري بالاضافة الى تشفير كلمت السر بواسطة نضام من انضمة التشفير
شكراً على الأهتمام
أنا عندي برنامج بدي أعمله كلمة سر أول ما يفتح البرنامج أكتبها يقبلها البرنامج فيفتح وإلا فلا .
أنا فكرت بطريقة وهي أني أعمل كلمة وشفرها بطرق حسابية وحطها بملف بس المشكلة أني بدي طريقة كمان أكثر أمان ووثوقية بحيث اني ما أسوي ملف عشوائي .
راجع درس الرجيستري
و درس كيف احمي بنامجي للا خ عرة على ماظن
بسم الله الرحمن الرحيم
رمضان كريم
بامكانك ان تخزن كلمة السر في قاعدة بيانات وان تتعامل معها على انها احد الحقول
بالتوفيق وصح فطوركم كما نقول بالجزائر
اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا
مشكور شباب على الجهود وسوف أبدء بالعامل فوراً
رمضان كريم
عن أسامة بن زيد قال: قال رسول الله - صلى الله عليه وسلم -: ( من صنع إليه معروف فقال لفاعله جزاك الله خيرا فقد أبلغ في الثناء ) .
رواه الترمذي و قال هذا حديث حسن جيد غريب.
و صححه العلامة الألباني في صحيح الترغيب
مشكور أخي وجزاك الله خيراً ... الأستفادة هي في المناقشة مع من هم أكثر خبرة منك وأيضاً مع من هم أقل خبرة منك .
فتقبل خالص شكري ولا حرمنا الله من جديدك .
أخوك ناصر
افضل طريقة اخي الكريم هي التشفير عن طريق الريجستري
سارفق لك التعليمات غدا ان شاء الله
تحياتي
أنا عندي نصيحة
عشان تحمي قاعدة البيانات والبرنامج
لو كان عندك قاعدة بيانات حطلها كلمة سر..من برنامج قاعدة البيانات..مثلا 123456
..ولما بتستخدمها بالبرنامج أول مابيفتح البرنامج بيطلب كلمة السر..لأنو البرنامج بيتعامل مع قاعدة البيانات المقفولة بكلمة سر
وهيك بينقفل البرنامج كمان
ولو بدك تفتح البرنامج بس تبقى قاعدة البانات مقفولة..بامكانك ان تضع التعليمة التالية عند اقلاع البرنامج
session.addpassword(123456);
مجربة وتعبت عليها كتير
يا اخوان الاخ يقصد حفظ كلمة المرور وقابلية تغييرها وليس التشفير اليس كذلك اخ ناصر
اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا
السلام عليكم ....أذا كنت تقصد عمل كلمة المرور وكيفية تغيير الكلمة وتحفظ في قواعد البيانات فأني سأضع كود لكيفية عمل كلمة المرور وكود لتغير كلمة المرور.......
والله الموفق
صحيح اخي الكريم سيكون سهلا للفتح لكن عليك ان تحتاط لهذا والاساليب كثيرة لفعل ذلك
اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا
G~M كتب::lol:ولكن سيبقى البرنامج قابل للفتح
لتفادي هذا يجب استعمال كلمة السر في شيئ مهم
فان جاء شخص وتخطى كلمة السر لن يعمل ذلك الشيئ المهم
ايضا استعمال thread خاص للتحق من لكمة السر :lol:
أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر
وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري
كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو
أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري
عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري
فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري
أخي الكريم يمكنك استخدام الكود الاتي
var
x,w,r,pwd,pwd1:string;
a:char;
i:integer;
reg:tregistry;
begin
if edit1.text=''
then begin
showmessage('أدخل كلمة المرور ');
edit1.SetFocus;
end
else begin
Reg:= TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\Software\arabteam', false)
then
begin
pwd:=reg.ReadString('software\arabteam');
for i:=1 to length(pwd)do begin
a:=pwd;
r:=r+chr(ord(a)-100);
pwd1:=edit1.text
end;
end;
if r<>pwd1 then
begin
edit1.text:='';
showmessage('كلمة المرور خاطئة');
edit1.setfocus;
end;
if r=pwd1 then
begin
form2.show;
form1.hide;
end;
IF not
Reg.OpenKey('\Software\arabteam', false)
then begin
Reg.OpenKey('software\arabteam',true);
x:=edit1.text;
for i:=1 to length(x)do begin
a:=x;
w:=w+chr(ord(a)+100); end;
reg.WriteString('software\arabteam',w);
end;
reg.closekey;
reg.free;
end;حيث تلاحظ ان التشفير في الريجستري و ستكون كلمة المرور لاول مرة تشغل فيها البرنامج و تحفظ في المفتاحSoftware\arabteam'
و من ثم يجب ان تدخلها نفسها في المرة القادمة
و كما تلاحظ ايضا وضعنا في الكود امكانية لتشفيرها
فلو دخلت المفتاح Software\arabteam' لوجدتها تختلف عما كتبتها
وتسطيع حذف ذلك المفتاح من الريجستري في حالة انك تريد الغائها و من ثم انشاءها من جديد
اي استفسار نحن مستعدون
البرنامج في المرفقات
اتمنى للجميع التوفيق و النجاح
جيد ابن اليمن
وهناك طرق اخرى كثيرة كان تجعل في قاعدة البيانات كما اشرت في رد سابق ولتحميها عليك ان تفرق كلمة المرور على عدة قواعد من البيانات وتجمعها في الاخير في متغيير وكزيادة في الحرص لك ان تحول الحروف الى ارقام ك1>>a و 2>> b ....
ولك ان تختار انت ما تريده ان شاء الله في المرة القادمة سارفق مثال
تحياتي للجميع
اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا
ياشباب هل من كود اخر حيث تكون الحماية بي User name / Password معا
سمعت بان هناك اكواد جاهزة مثل MD5, Sha1
وبارك الله فيكم
اذا كنت تتقن الدلفي او الهندسة العكسية فلك عمل عندي فلا تتردد بان تتصل بي
DCPcrypt
والله الملفات كلها نزلتها البارحة فقط ولكن لم افهم استعمالها بالضبط
في موقع المؤلف لايوجد شرح لتنصيب المكونات
فهل من مساعدة
لكن سوف احاول من جديد
لم تجب على سؤالى هل جربت برنامج MASM2Delphi ؟
اذا كنت تتقن الدلفي او الهندسة العكسية فلك عمل عندي فلا تتردد بان تتصل بي
وهل جربت به تحويل كود من asambler الى Delphi ؟
لقد حملت البرنامج لكن ملف .obj ينقص
تم تعديل هذه المشاركة بواسطة Alhamda-me في 2 نوفمبر 2007 في 02:57
اذا كنت تتقن الدلفي او الهندسة العكسية فلك عمل عندي فلا تتردد بان تتصل بي
لا شئ ناقص
افتح ملف الكوماند بالنوت باد وافهم الية عمله
اصلح المسارات او ضعه في المكان الصحيح
mov eax, dword ptr ds:[0xffdf0308]
jmp dword ptr [eax+0xfc]
هذا الموضوع مغلق.