[kslawy]

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

في الرابط اللي وضعته تريد تغير طريقة إظهار امتدادات الملفات ببرنامجك

يتم ذلك عن طريق الريجستري في المفتاح التالي :

كود :

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced

في المفتاح أعلاه توجد قيمة بالاسم HideFileExt

تأخذ هذه القيمة قيمتين وهي إما 0 أو 1 :
0 تعني إظهار امتدادات الملفات
1 تعني إخفاء امتدادات الملفات

وقد وجدت مثال بالنت للتحقق من وجود ذلك المفتاح عدلت عليه ليمكنك من إخفاء وإظهار امتدادات الملفات :

PHP كود :

Private Sub ExtensionShown(ByVal HideExtFile As Boolean)
Dim strKey As String = "Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" ' مسار قيمة تغيير إظهار أو إخفاء امتدادات الملفات في الريجستري
Dim reg As Microsoft.Win32.RegistryKey = Nothing ' إنشاء مفتاح ريجستري
Dim NewValue As Integer   ' القيمة التي ستحفظ بملف الريجستري
Try
reg = Microsoft.Win32.Registry.CurrentUser.OpenSubKey(strKey, True) ' فتح مسار الريجستري 
If Not (reg Is Nothing) Then  ' إذا لم يكن مفتاح الريجستري خالي
If HideExtFile = True Then
NewValue = 0 ' إذا كانت القيمة (ترو) يتم إظهار إمتداد الملفات 
Else
NewValue = 1 ' إذا كانت القيمة (فولص) يتم إخفاء امتداد الملفات
End If
reg.SetValue("HideFileExt", NewValue) ' حفظ القيمة الجديدة المختارة في ملف الريجستري 
End If
Catch ex As Exception
MessageBox.Show(ex.ToString) ' إظهار رسالة إذا حدث خطأ ما
Finally
If Not reg Is Nothing Then reg.Close() ' إغلاق مفتاح الريسجتري عند الانتهاء 
End Try
End Sub 


طريقة تنفيذ الكود أعلاه كالتالي :

PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ExtensionShown(True)
End Sub 


إذا أردت إظهار امتدادات الملفات ضع True ، ولإخفاءها ضع False .


* ملحوظة: التعديل علي الريجستري يتطلب أن تمكن برنامج من العمل بصلاحيات مسئول النظام . إذا كنت لا تعرف ذلك ابحث بالمنتدى عن تشغيل البرنامج كمسئول بالنظام .

****
***
**
*