كيف؟؟؟

[Samar]

عندس سؤال بس موكتير عم أعرف عبر عنو لذلك رح أطرح مثال بيقرب الفكرة
لنفرض عندي برنامج(بغض النظر عن اللغة)  بيحاكي برنامج الرسام(فرضا)  يعني بيرسم مجموعة  أشكال هندسبة
 المستخدم بيقدر يحفظ أي  شي رسمه في ملف  منفصل : لحقق هالشي كل شكل عندي عو عبارة عن غرض  وعندما يختار المستخدم حفظ يتم كتابة خصائص هذه الأشكال في ملف من لاحقة من اختراعي خاصة بالبرنامج خلينا نقول الملف اسمو  shape.rsm
وعندمت يقوم المستخدم بفتح  هذا الملف من البرنامج يتم قراءة الملف ورسم تلك الأشكال على حسب خصائصها

الشي يلي بدو إعملو أنو الملف يصير يفتح مباشرة  لما أستخدم أمر فتح باستخدام يعني دون ما أضطر لأفتحه من البرنامج

حدا تعامل مع هيك حالة..
بيجوز مو كتير عرفت وضح

[MuazWeb]

أنا بزماني عملتها

بس ما متذكر كيف، بدي شوية وقت لجيب الطريقة

[The Tornado]

أنا بزماني عملتها

بس ما متذكر كيف، بدي شوية وقت لجيب الطريقة

yep man
مشروع الحسابات العلمية بالكلية

[Samar]

thanks guys
did you still remember the way

[MuazWeb]

I remember that you have to write some values in the system registry
under the key: HKEY_CLASSES_ROOT
I used a predefined function provided by Win32 API using Borland Delphi 7

But I have 2 problems:
1- I don't remember the function's name
2- I don't know if it'll work properly on Vista or Seven


I'm sorry because I can't help you for the time being because I have too much pressure @ work
Nevertheless, if you can wait, I can check for some solution ASAP (I think it will take more than a week)

I'm really sorry

[Samar]

NO problem
take your time

[monther]

Try

كود:

Private Declare Sub SHChangeNotify Lib "shell32.dll" (ByVal wEventId As Long, _
    ByVal uFlags As Long, ByVal dwItem1 As Long, ByVal dwItem2 As Long)
Const SHCNE_ASSOCCHANGED = &H8000000
Const SHCNF_IDLIST = 0

' Create the new file association
'
' Extension is the extension to be registered (eg ".cad"
' ClassName is the name of the associated class (eg "CADDoc")
' Description is the textual description (eg "CAD Document"
' ExeProgram is the app that manages that extension (eg "c:\Cad\MyCad.exe")
'
' NOTE: requires CreateRegistryKey and SetRegistryValue functions

Sub CreateFileAssociation(ByVal Extension As String, ByVal ClassName As String, _
    ByVal Description As String, ByVal ExeProgram As String)
    Const HKEY_CLASSES_ROOT = &H80000000
   
    ' ensure that there is a leading dot
    If Left(Extension, 1) <> "." Then
        Extension = "." & Extension
    End If
   
    ' create a new registry key under HKEY_CLASSES_ROOT
    CreateRegistryKey HKEY_CLASSES_ROOT, Extension
    ' create a value for this key that contains the classname
    SetRegistryValue HKEY_CLASSES_ROOT, Extension, "", ClassName
    ' create a new key for the Class name
    CreateRegistryKey HKEY_CLASSES_ROOT, ClassName & "\Shell\Open\Command"
    ' set its value to the command line
    SetRegistryValue HKEY_CLASSES_ROOT, ClassName & "\Shell\Open\Command", "", _
        ExeProgram & " ""%1"""

    ' notify Windows that file associations have changed
    SHChangeNotify SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0
End Sub

[MuazWeb]

I think it is written in VB.NET
Can anybody translate to C# or C++ or Java or any other readable language ?

[monther]

كود:

    public class Monther
    {
        [System.Runtime.InteropServices.DllImport("Shell32.dll")]
        private static extern int SHChangeNotify(int eventId, int flags, IntPtr item1, IntPtr item2);

        const int SHCNE_ASSOCCHANGED = 0x8000000;
        const int SHCNF_IDLIST = 0;


        // Create the new file association
        //
        // Extension is the extension to be registered (eg ".cad"
        // ClassName is the name of the associated class (eg "CADDoc")
        // Description is the textual description (eg "CAD Document"
        // ExeProgram is the app that manages that extension (eg "c:\Cad\MyCad.exe")

        public static void CreateFileAssociation(String Extension, String ClassName,
                                                 String Description, String ExeProgram)
        {

            // ensure that there is a leading dot
            if (!Extension.StartsWith("."))
            {
                Extension = "." + Extension;
            }

            // create a new registry key under HKEY_CLASSES_ROOT
            Microsoft.Win32.RegistryKey k = Microsoft.Win32.Registry.ClassesRoot.CreateSubKey(Extension);

            // create a value for this key that contains the classname
            k.SetValue("", ClassName);
            k.Close();

            // create a new key for the Class name
            Microsoft.Win32.RegistryKey k1 = Microsoft.Win32.Registry.ClassesRoot;
            Microsoft.Win32.RegistryKey k2 = k1.CreateSubKey(ClassName).CreateSubKey("Shell").
                                                CreateSubKey("Open").CreateSubKey("Command");

            // set its value to the command line
            k2.SetValue("", ExeProgram + " \"%1\"");

            k1.Close();
            k2.Close();

            // notify Windows that file associations have changed
            SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, (IntPtr)0, (IntPtr)0);
        }
    }

[monther]

VB.net vs C#.net

وجهان لعملة واحدة

[MuazWeb]

VB.net vs C#.net

وجهان لعملة واحدة

بعرف

بس أنا ما بعرف VB .NET، حبيت استفيد أكتر من الكود

شكراً