السلام عليكم يا أخوان
أنا لدي مشروع عبارة عن مترجم فوري للكلمات و جمل ... بلغة الفيجوال بيسك.نت
بحيث عندما يضلل شخص كلمة أوجملة فى ملف بأي صيغة كان ... وأأخذ قيمة الكلمة المضلله وابحث عنها فى الداتابيس
مشكلتي هى كيف أضيف برنامجي التنفيذي الى
context menu
للملفات بحميع انواعها؟
و كيف اعرف ... ما هي الكلمة المضلله من قبل المستخدم؟
بعد البحث وجدت انه ممكن عمل ذلك عن طريق الرجستري ...لكن المشكلة لأعرف ما هو الرجستري ولم يسبق لي التعامل معه
وشكراً
مرحباً أخـ(ـتـ)ـي الكريمـ(ـة),
ماتسأل عنه ليس له أي علاقة بالـ( Registry ) وإنما بالأداة أو الإستعلام المستخدم في تصفية البيانات على شكل تقريبي للكلمة أو الأحرف المظللة, _
بالنسبة للـ Context Menu فيجب حذف وإضافة عناصر جديدة اي ( عناصر معنونة بالكلمات القريبة للكلمة المظللة ) ومن ثم إضافة معامل تابع لحدث تم إنشاءه مسبقاً ليستخدم كمحرك لعملية الترجمة .
بالتوفيق
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.
شكراً لك أخي ... ممكن التوضيح لأني لم أفهم ما كتبت
أليس اضافة عناصرالى الكونتكست منيو ... عن طريق اضافة
keys to registry
أحد الأشخاص اعلمني انه ممكن عمل ذلك عن طريق الرجستري
و كتابته بلغة برمجية مثل(لغة الفيجوال بيسك.نت) ...أرجو التوضيح أخي
وشكراً
السلام عليكــم ورحمـة الله وبركاتــه ،،
هذا الكود لتعيين برنامج النوتباد لفتح الملفات ذات الامتداد ext
Imports Microsoft.Win32
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim key As RegistryKey = Registry.ClassesRoot.CreateSubKey(".ext")
key.SetValue("", "My Custom Extension", RegistryValueKind.String)
Dim iconKey As RegistryKey = key.CreateSubKey("DefaultIcon")
iconKey.SetValue("", "Notepad.exe,0", RegistryValueKind.String)
Dim shellKey As RegistryKey = key.CreateSubKey("Shell\Open\Command")
shellKey.SetValue("", "Notepad.exe %1")
End Sub
End Classلتعيين برنامجك لفتح كل أنواع الملفات يمكنك انشاء الأمر الذى سيظهر فى القائمة المنسدلة للملف داخل المفتاح HKEY_CLASSES_ROOT\*\shell
تم تعديل هذه المشاركة بواسطة GHOST2010 في 29 أبريل 2009 في 11:16
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
مرحباً مرة أخرى,
عذراً يبدو أنني لم أفهم ماتبحث عنه, هل تريد عرض قائمة بكلمات مقاربة لكلمة مظللة داخل ( TextBox أو RichTextBox ) داخل مشروعك
( برنامج شبيه ( Golden Al-Wafi ) ), أم تريد الوصول إلى أي برنامج, يتم ذلك بحجز ( HotKey ) وعند الضغط على ذلك أو تلك المفاتيح يتم ترجمة ماهو محدد من برنامج الأخر ( برنامج شبيه ( Babylon ) ),
رجاءً حاول شرح الفكرة بشكل مفصل أكثر,
بالتوفيق
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.
GHOST2010 كتب:السلام عليكــم ورحمـة الله وبركاتــه ،،هذا الكود لتعيين برنامج النوتباد لفتح الملفات ذات الامتداد ext
Imports Microsoft.Win32 Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim key As RegistryKey = Registry.ClassesRoot.CreateSubKey(".ext") key.SetValue("", "My Custom Extension", RegistryValueKind.String) Dim iconKey As RegistryKey = key.CreateSubKey("DefaultIcon") iconKey.SetValue("", "Notepad.exe,0", RegistryValueKind.String) Dim shellKey As RegistryKey = key.CreateSubKey("Shell\Open\Command") shellKey.SetValue("", "Notepad.exe %1") End Sub End Classلتعيين برنامجك لفتح كل أنواع الملفات يمكنك انشاء الأمر الذى سيظهر فى القائمة المنسدلة للملف داخل المفتاح HKEY_CLASSES_ROOT\*\shell
شكراً جزيلاً كثيراً على الكود والرد أخى
Bashar Rabat كتب:مرحباً مرة أخرى,عذراً يبدو أنني لم أفهم ماتبحث عنه, هل تريد عرض قائمة بكلمات مقاربة لكلمة مظللة داخل ( TextBox أو RichTextBox ) داخل مشروعك
( برنامج شبيه ( Golden Al-Wafi ) ), أم تريد الوصول إلى أي برنامج, يتم ذلك بحجز ( HotKey ) وعند الضغط على ذلك أو تلك المفاتيح يتم ترجمة ماهو محدد من برنامج الأخر ( برنامج شبيه ( Babylon ) ),
رجاءً حاول شرح الفكرة بشكل مفصل أكثر,
بالتوفيق
ليس مثل الوافي
برنامجي رح يكون مشابهة الى حد كبير جداً الى برنامج
easy lingo
سأضيف رابط له للإطلاع عليه لو كنت ترغب
أنا أريد الوصول الى البرنامج عند تضليل كلمة مثلاً من ملف وورد وعند عمل
right click
عليها واختيار من القائمة "العنصر الخاص ببرنامجي و هو للترجمه" فتظهر ترجمة الكلمة فى نافذه صغيرة
أتمنى يكون شرح الفكرة واضح
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…