delphi4arab منتديات دلفي للعرب
كيف احذف مجلد في الرجيستري ؟ - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف احذف مجلد في الرجيستري ؟ (/showthread.php?tid=7156)



كيف احذف مجلد في الرجيستري ؟ - أحمد 13 - 16-08-2015

السلام عليكم

كيف احذف مجلد في الرجيستري ؟ علما هذا المسار :
[HKEY_LOCAL_MACHINE\SOFTWARE\Sony Creative Software\Shared Information]
و انا او حذف المجلد الاخير من المسار اي يصبح المسار النهائي هكذا
[HKEY_LOCAL_MACHINE\SOFTWARE\Sony Creative Software\Shared Information\User Information]
جربت مع هذا الامر و لم يعمل معي ؟
PHP كود :
var
reg: Tregistry;
begin
 reg
:= Tregistry.Create;
 
reg.RootKey:= HKEY_LOCAL_MACHINE;
  try
 
reg.DeleteKey ('User Information');
 if 
reg.DeleteKeySOFTWARE\Sony Creative Software\Shared Information') then
 showmessage(' 
تم الحذف بنجاح ')
 else
 showmessage('
!لاتوجد اي بيانات على جهازكم') ;
 except
     end;
    end; 



كيف احذف مجلد في الرجيستري ؟ - ferrero - 16-08-2015

var
Reg: TRegistry;
S: string;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
S := 'Software\Sony Creative Software\Shared Information';
Reg.OpenKey(S, False);
if Reg.DeleteKey('User Information') then
ShowMessage('تم الحذف بنجاح')
else
ShowMessage('!لاتوجد اي بيانات على جهازكم');
end;


كيف احذف مجلد في الرجيستري ؟ - أحمد 13 - 16-08-2015

بارك الله فيك اخي ، و لكن للاسف امر الحذف لم يعمي معي ؟
اين هو المشكل ؟ جربت كذا مرة و لم يعمل فهل من كود اخر ؟ و جزاكم الله خيرا


كيف احذف مجلد في الرجيستري ؟ - ferrero - 16-08-2015

ماهو نظام التشغيل الذي تستخدمه


كيف احذف مجلد في الرجيستري ؟ - أحمد 13 - 16-08-2015

ferrero كتب :ماهو نظام التشغيل الذي تستخدمه
نظام تشغيل ويندوز 7 نواة 32 بت
و بارك الله فيك اخي الفاضل Smile


كيف احذف مجلد في الرجيستري ؟ - ferrero - 16-08-2015

var
reg: Tregistry;
s: String;
begin
reg := tregistry.create;
Reg.Access := KEY_WOW64_32KEY or KEY_WRITE; // جرب اضف هذا الكود هنا
reg.rootkey := hkey_local_machine;
s := 'software\sony creative software\shared information';
reg.openkey(s, false);
if reg.deletekey('user information') then
showmessage('تم الحذف بنجاح')
else
showmessage('!لاتوجد اي بيانات على جهازكم');
end;


كيف احذف مجلد في الرجيستري ؟ - أحمد 13 - 17-08-2015

استاذي الفاضل ارجوا ان تتحملني من فضلك فللأأسف لم استطع من تنفيذ الكود و تظهر لي الرسالة الاتية
كود :
http://im51.gulfup.com/vdmM2i.png
الكود ما قبل الاخير أظن هو صحيح الكود و لكن لا يستجيب لم افهم لما ؟
للتذكير : هذا المسار كاملا و أود حذف المجلد الملون بلأحمر
HKEY_LOCAL_MACHINE\SOFTWARE\Sony Creative Software\Shared Information\User Information


كيف احذف مجلد في الرجيستري ؟ - Houdini - 17-08-2015

كود صحيح مشكله فقط شغل برنامج ناتج ك ادمين uac admin لانك تتاعمل هنا مع HKEY_LOCAL_MACHINE


كيف احذف مجلد في الرجيستري ؟ - أحمد 13 - 18-08-2015

الان عمل تمام
بعد تشغيل البرنامج كمسؤول , بارك الله فيكما و جزاكما الله عني كل خير