التعامل مع ريجستر ويندوز7 بالدلفي

[مبرمج هاوي]

السلام عليكم ورحمة الله
لتطبيق هذا الكود من خلال الدلفي على الويندوز سفن واضافته في الرجيستر

كود :

Regedit4 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings] MigrateProxy=dword:00000001 ProxyEnable=dword:00000001 ProxyHttp1.1=dword:00000000 ProxyServer="http://127.0.0.1:80" ProxyOverride="<local>"

قمت بالبحث في المنتدى ووجدت اكثر من كتاب واكثر من مقال يشرح التعامل مع الرجستري في الدلفي

لكن هل يوجد اختلاف بين الرجستري في الويندوز 7 و الويندوز xp

[kachwahed]

وعليكم السلام ورحمة الله
الاختلاف ليس في Registry وإنما على الأرجح في الصلاحيات
قد يتطلب ذلك تشيغل برنامجك بصلاحيات مدير، جرب...
بالتوفيق.

[مبرمج هاوي]

جربت ولكن لم ينفع

ايضا قمت بايقاف الحماية ولم ينفع ذالك ايضا

اعتقد ان هناك اختلاف في التعامل او في الرجستري !!

لا اعلم مالمشكلة !

[محمد عبد العزيز]

السلام عليكم ورحمة الله

ماهو النظام المستخدم 32/64bits ؟
ما اصدار دلفي ؟ ضع الكود الذي استعملته

[Agmcz]

السلام عليكم
على حسب ما اعطاني قوقل عن مفتاح Internet Settings
النتيجة تكون قريبه من هده

PHP كود :

procedure Proxy(Srever: string);
var
  Reg: TRegistry;
begin
 Reg := TRegistry.Create;
  try
   with reg do
   begin
   RootKey := HKEY_CURRENT_USER;
   if KeyExists('Software\Microsoft\Windows\CurrentVersion\Internet Settings') then
   OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings', False);
   if valueexists('MigrateProxy') then
   WriteBool('MigrateProxy',False);//True
   if valueexists('ProxyEnable') then
   WriteBool('ProxyEnable',False);//True
   if valueexists('ProxyHttp1.1') then
   WriteBool('MigrateProxy',True);//False
   if valueexists('ProxyServer') then
   WriteString('ProxyServer', Server);
   CloseKey;
   end;
  finally
 end;
end; 


ممكن تزيد تعطينا معلومات اكثر عن طبيعة القيم bool string integer
معا اني لم أتعامل مسبقا معا هدا المفتاح
أما عن رجيستري فنفس الشيء xp, vista, win7
فقط في vista, win7 شغل البرنامج administrator