بســم الله الـرحمــن الرحيــم
السلام عليكــم ورحمـة الله وبركاتــه
نستهل اول درس في لغة دلفي بريسم الجديد
وهو كيفة انشاء مفتاح في الرجستري
اولا ماهو الرجستري باختصار
الريجستري قاعدة بيانات خاصة بالويندوز تستخدم لحفظ اعدادت الويندوز البرامج المثبتة عليه
كما يتح لنا انشاء مفاتيح لحفظ اعدات البرامج التي نقوم ببرمجتها
كيف يتم ذلك وهو ما سنقوم به اليوم ان شاء الله ولاننا سنقوم بالتعرف لاول مرة مع هذه البيئة الجديدة للبريسم ساقوم ببعض الاجراءت الروتنية
نبدا بسم الله
افتح الفيجول ستديو كما في الصورة
- انشاء مشروع جديد
- اختيار لغة البرمجة التي سنتعامل معها طبعا سنقوم باختيارdelphi prsim
- اختيار نوع التطبيق وطبعا سيكون Windows Appliction
- اختيار اسم للتطبيق
- اختيار مسار للتطبيق كما يمكننا اختيار المسار بالضغط على الزر Browse
ستظهر النافذة الرئيسية
اولا انشاء مفتاح للرجستري
نقوم بوضع مكون textBox ومكون button
ننقر على الزر نقرا مزدوجا
في القسم Uses نكتب
Microsoft.win32
ويقصد بهذا الكود التعمل مع المكتبة المذكورة
نرجع الى حدث الضغط على الزر ونكتب الكود التالي
var
Mykey:RegistryKey;
begin
Mykey:= Registry.CurrentUser.CreateSubKey('software\test');
Mykey.SetValue('Name',textBox1.Text);
Mykey.Close;
end;
method MainForm.button1_Click(sender: System.Object; e: System.EventArgs);
اولا نقوم بتعريف متغيير من النوعRegistryKey
ثانيا نختار اين سنضع المفتاح الذي سننشاه وفي هذا المثال اخترت
يمكنك ان تختار اين ستضع المفتاح في اي موضع الموضحة على الصورة
ثم حددننا المسار الذي سنضع فيه المفتاح وكما هو موضح في الكود فقد وضعناه المجلد Software ثم قم بتسمية المفتاح وهنا واخترنا test
في السطر الثاني سياخذ المفتاح قيمته منtextBox1
اخيرا سنقوم باغلاق المفتاح الذي انشاناه
يمكنك التجريب الان
وستلاحظ النتجية اذا قمت بالبحث في المسار الذي قمنا به في الريجستري
اذهب الى القائمة ابدا ثم Runومن ثم اكتب reggedit ثم اختر المجلد CurrentUser ثم software ثم test كما في الصورة
الان ننتقل لكيفة القراة لن يختلف الامر كثيرا
ضع زر اخر ومكون في حدث الضغط على الزر اكتب الكود التالي textBox
begin
var
Outkey:RegistryKey;
begin
Outkey:= Registry.CurrentUser.OpenSubKey('software\test');
textBox2.Text:=Outkey.GetValue('Name').ToString();
Outkey.Close;
end;
method MainForm.button2_Click(sender: System.Object; e: System.EventArgs);
قمنا بالتصريح بمتغيير اخر من النوع RegistryKey
في السطر الاول قمنا هذه المرة بفتح المفتاح المنشاء مسبقا عن طريق التعليمة OpenSubKey
في السطر الثاني قمنا باسناد القيمة الموجود في المفتاح الى textBox2.Text
واخيرا اغلقنا المفتاح
وقم بالتجريب
اتمنى ان اكون قد وفقت في الشرح
وفقنا الله واياكم