المشاركات : 232
المواضيع 98
:
: 0
الإنتساب : Oct 2011
السلام عليكم ورحمة الله وبركاته ..
كيف يمكننا عمل استثناء للتحكم في الرجيستري في قسم اذا كان النظام يمنع الكتابة في هذا القسم دون موافقة المستخدم ؟
جزاكم الله كل خير
اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت
فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم
المشاركات : 232
المواضيع 98
:
: 0
الإنتساب : Oct 2011
وجدت طريقة لتشغيل البرنامج كـ ادمن لكن المطلوب تحكم بالرجيستري فقط وليس تشغيل البرنامج كمسؤول
الطريقة :
http://www.delphi4arab.net/forum/showthr...498&page=3
اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت
فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم
المشاركات : 654
المواضيع 34
:
: 106
الإنتساب : Aug 2010
أولا لن تسطيع عمل أي شيء بدون صلاحية كاملة في regedit
هل تقصد تشغيل البرنامج بشكل عادي إلا في حال توجه الى regedit
سبحان الله وبحمده سبحان الله العظيم
المشاركات : 25
المواضيع 1
:
: 0
الإنتساب : Aug 2013
وعليكم السلام
لايمكن هذا لانه هناك حمايه بلانظمه الحديثه
لهذا يجب تشغيل الملف كـ مسؤل
هذا كود يشغل كـ مسؤل
كود :
function RunAsAdmin(hWnd: HWND; filename: string; Parameters: string): Boolean;
{
See Step 3: Redesign for UAC Compatibility (UAC)
http://msdn.microsoft.com/en-us/library/bb756922.aspx
}
var
sei: TShellExecuteInfo;
begin
ZeroMemory(@sei, SizeOf(sei));
sei.cbSize := SizeOf(TShellExecuteInfo);
sei.Wnd := hwnd;
sei.fMask := SEE_MASK_FLAG_DDEWAIT or SEE_MASK_FLAG_NO_UI;
sei.lpVerb := PChar('runas');
sei.lpFile := PChar(Filename); // PAnsiChar;
if parameters <> '' then
sei.lpParameters := PChar(parameters); // PAnsiChar;
sei.nShow := SW_SHOWNORMAL; //Integer;
Result := ShellExecuteEx(@sei);
end;
للمزيد
http://www.delphi4arab.net/forum/search....hid=545742
لن يفشل ابداا انسان يحاول ثم..... يحاول
المشاركات : 232
المواضيع 98
:
: 0
الإنتساب : Oct 2011
إقتباس :هل تقصد تشغيل البرنامج بشكل عادي إلا في حال توجه الى regedit
نعم اخي هذا هو طلبي
اخ ماريو ممكن شرح اكثر وهل يتطلب الاذن عند كل تشغيل ؟
اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت
فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم
المشاركات : 232
المواضيع 98
:
: 0
الإنتساب : Oct 2011
إقتباس :أولا لن تسطيع عمل أي شيء بدون صلاحية كاملة في regedit
أخي الكريم لقد رأيت الكثير من البرامج التي لديها دعم في الريجستري دون صلاحيات المسؤول برأيك ما السر في ذلك ؟
اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت
فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم
المشاركات : 25
المواضيع 1
:
: 0
الإنتساب : Aug 2013
نعم يتطلب الاذن عند كل تشغيل
اعتقد يوجد طريقه اخرى
وهيه اضافه قيمه الى الريجستري
للبرنامج ويصبح مسؤل
الحمايه وضعت حتى لايتم التلاعب بلريجستري
لن يفشل ابداا انسان يحاول ثم..... يحاول
المشاركات : 232
المواضيع 98
:
: 0
الإنتساب : Oct 2011
كود :
اعتقد يوجد طريقه اخرى
وهيه اضافه قيمه الى الريجستري
للبرنامج ويصبح مسؤل
هذا صحيح
اللهمّ إنّي ظلمت نفسي ظلماً كثيراً ولا يغفر الذّنوب إلا أنت
فاغفر لي مغفرة من عندك وارحمني إنّك أنت الغفور الرّحيم