Object.Finalize Object.Finalize Object.Finalize Object.Finalize Method

Définition

Autorise un objet à tenter de libérer des ressources et à exécuter d'autres opérations de nettoyage avant qu'il ne soit récupéré par une opération garbage collection. Allows an object to try to free resources and perform other cleanup operations before it is reclaimed by garbage collection.

!Object ()
~Object ();
abstract member Finalize : unit -> unit
override this.Finalize : unit -> unit
Finalize ()

Exemples

L’exemple suivant vérifie que le Finalize méthode est appelée lorsqu’un objet qui substitue Finalize est détruit.The following example verifies that the Finalize method is called when an object that overrides Finalize is destroyed. Notez que, dans une application de production, le Finalize méthode est substituée pour libérer les ressources non managées détenues par l’objet.Note that, in a production application, the Finalize method would be overridden to release unmanaged resources held by the object. Notez également que l’exemple c# fournit un destructeur au lieu de remplacer le Finalize (méthode).Also note that the C# example provides a destructor instead of overriding the Finalize method.

using System;
using System.Diagnostics;

public class ExampleClass
{
   Stopwatch sw;
   
   public ExampleClass()
   {
      sw = Stopwatch.StartNew();
      Console.WriteLine("Instantiated object");
   } 

   public void ShowDuration()
   {
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        this, sw.Elapsed);
   }
   
   ~ExampleClass()
   {
      Console.WriteLine("Finalizing object");
      sw.Stop();
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        this, sw.Elapsed);
   }
}

public class Demo
{
   public static void Main()
   {
      ExampleClass ex = new ExampleClass();
      ex.ShowDuration();
   }
}
// The example displays output like the following:
//    Instantiated object
//    This instance of ExampleClass has been in existence for 00:00:00.0011060
//    Finalizing object
//    This instance of ExampleClass has been in existence for 00:00:00.0036294
Imports System.Diagnostics

Public Class ExampleClass
   Dim sw As StopWatch
   
   Public Sub New()
      sw = Stopwatch.StartNew()
      Console.WriteLine("Instantiated object")
   End Sub 

   Public Sub ShowDuration()
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        Me, sw.Elapsed)
   End Sub
   
   Protected Overrides Sub Finalize()
      Console.WriteLine("Finalizing object")
      sw.Stop()
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        Me, sw.Elapsed)
   End Sub
End Class

Module Demo
   Public Sub Main()
      Dim ex As New ExampleClass()
      ex.ShowDuration()
   End Sub
End Module
' The example displays output like the following:
'    Instantiated object
'    This instance of ExampleClass has been in existence for 00:00:00.0011060
'    Finalizing object
'    This instance of ExampleClass has been in existence for 00:00:00.0036294

Pour obtenir un exemple supplémentaire qui remplace le Finalize (méthode), consultez le GC.SuppressFinalize (méthode).For an additional example that overrides the Finalize method, see the GC.SuppressFinalize method.

Remarques

Le Finalize méthode est utilisée pour effectuer des opérations de nettoyage sur les ressources non managées détenues par l’objet actuel avant la destruction de l’objet.The Finalize method is used to perform cleanup operations on unmanaged resources held by the current object before the object is destroyed. La méthode est protégée et par conséquent est accessible uniquement par le biais de cette classe ou une classe dérivée.The method is protected and therefore is accessible only through this class or through a derived class.

Dans cette section :In this section:

Fonctionne de la finalisationHow finalization works

Le Object classe ne fournit pas d’implémentation pour le Finalize (méthode) et que le garbage collector ne marque pas les types dérivés de Object pour la finalisation, sauf si elles substituent la Finalize (méthode).The Object class provides no implementation for the Finalize method, and the garbage collector does not mark types derived from Object for finalization unless they override the Finalize method.

Si un type remplace le Finalize (méthode), le garbage collector ajoute une entrée pour chaque instance du type à une structure interne appelée la file d’attente de finalisation.If a type does override the Finalize method, the garbage collector adds an entry for each instance of the type to an internal structure called the finalization queue. La file d’attente de finalisation contient des entrées pour tous les objets dans le tas managé dont le code de finalisation doit s’exécuter avant que le garbage collector puisse récupérer leur mémoire.The finalization queue contains entries for all the objects in the managed heap whose finalization code must run before the garbage collector can reclaim their memory. Le garbage collector appelle ensuite la Finalize méthode automatiquement dans les conditions suivantes :The garbage collector then calls the Finalize method automatically under the following conditions:

  • Une fois que le garbage collector a découvert qu’un objet est inaccessible, sauf si l’objet a été exclu de finalisation par un appel à la GC.SuppressFinalize (méthode).After the garbage collector has discovered that an object is inaccessible, unless the object has been exempted from finalization by a call to the GC.SuppressFinalize method.

  • Sur .NET Framework uniquement, pendant l’arrêt d’un domaine d’application, sauf si l’objet est exempté de la finalisation.On .NET Framework only, during shutdown of an application domain, unless the object is exempt from finalization. Lors de l’arrêt, même des objets qui sont toujours accessibles sont finalisées.During shutdown, even objects that are still accessible are finalized.

Finalize est automatiquement appelé qu’une seule fois sur une instance donnée, sauf si l’objet est réinscrit à l’aide d’un mécanisme tel que GC.ReRegisterForFinalize et GC.SuppressFinalize méthode n’a pas été appelée par la suite.Finalize is automatically called only once on a given instance, unless the object is re-registered by using a mechanism such as GC.ReRegisterForFinalize and the GC.SuppressFinalize method has not been subsequently called.

Finalize opérations présentent les limitations suivantes :Finalize operations have the following limitations:

  • L’heure exacte lorsque le finaliseur s’exécute n’est pas défini.The exact time when the finalizer executes is undefined. Pour garantir la mise en production déterministe des ressources pour implémenter des instances de votre classe, un Close méthode ou fournissez un IDisposable.Dispose implémentation.To ensure deterministic release of resources for instances of your class, implement a Close method or provide a IDisposable.Dispose implementation.

  • Les finaliseurs de deux objets ne sont pas garanties à exécuter dans un ordre spécifique, même si un objet fait référence à l’autre.The finalizers of two objects are not guaranteed to run in any specific order, even if one object refers to the other. Autrement dit, si l’objet a une référence à l’objet B, et avoir des finaliseurs, l’objet B peut avoir déjà été finalisée lorsque le finaliseur de l’objet A démarre.That is, if Object A has a reference to Object B and both have finalizers, Object B might have already been finalized when the finalizer of Object A starts.

  • Le thread sur lequel s’exécute le finaliseur n’est pas spécifié.The thread on which the finalizer runs is unspecified.

Le Finalize méthode ne peut pas s’exécuter jusqu'à la fin ou peut s’exécuter pas du tout dans les circonstances exceptionnelles suivantes :The Finalize method might not run to completion or might not run at all under the following exceptional circumstances:

  • Si un autre finaliseur se bloque indéfiniment (entrera en une boucle infinie, tente d’obtenir un verrou, il peut obtenir jamais et ainsi de suite).If another finalizer blocks indefinitely (goes into an infinite loop, tries to obtain a lock it can never obtain, and so on). Étant donné que le runtime tente d’exécuter des finaliseurs jusqu'à son achèvement, autres finaliseurs ne pas être appelés si un finaliseur se bloque indéfiniment.Because the runtime tries to run finalizers to completion, other finalizers might not be called if a finalizer blocks indefinitely.

  • Si le processus se termine sans donner au runtime une chance à nettoyer.If the process terminates without giving the runtime a chance to clean up. Dans ce cas, la première notification d’arrêt du processus du runtime est une notification DLL_PROCESS_DETACH.In this case, the runtime's first notification of process termination is a DLL_PROCESS_DETACH notification.

Le runtime continue à finaliser des objets lors de l’arrêt aussi longtemps que le nombre d’objets finalisables diminuer.The runtime continues to finalize objects during shutdown only while the number of finalizable objects continues to decrease.

Si Finalize ou une substitution de Finalize lève une exception et que le runtime n’est pas hébergée par une application qui substitue la stratégie par défaut, le runtime termine le processus et aucun actif try / finally blocs ou les finaliseurs sont exécutées.If Finalize or an override of Finalize throws an exception, and the runtime is not hosted by an application that overrides the default policy, the runtime terminates the process and no active try/finally blocks or finalizers are executed. Ce comportement garantit l’intégrité du processus si le finaliseur ne peut pas libérer ou détruire des ressources.This behavior ensures process integrity if the finalizer cannot free or destroy resources.

Remplacer la méthode FinalizeOverriding the Finalize method

Vous devez substituer Finalize pour une classe qui utilise des ressources non managées, telles que les descripteurs de fichiers ou des connexions de base de données qui doivent être lancées lorsque l’objet managé qui les utilise est ignorée pendant le garbage collection.You should override Finalize for a class that uses unmanaged resources, such as file handles or database connections that must be released when the managed object that uses them is discarded during garbage collection. Vous ne devez pas implémenter un Finalize méthode pour les objets managés, car le garbage collector libère automatiquement les ressources managées.You shouldn't implement a Finalize method for managed objects because the garbage collector releases managed resources automatically.

Important

Si un SafeHandle objet n’est disponible qui encapsule votre ressource non managée, l’alternative recommandée consiste à implémenter le modèle de suppression avec un handle sécurisé et substituez pas Finalize.If a SafeHandle object is available that wraps your unmanaged resource, the recommended alternative is to implement the dispose pattern with a safe handle and not override Finalize. Pour plus d’informations, consultez alternative de SafeHandle The section.For more information, see The SafeHandle alternative section.

Le Object.Finalize méthode ne fait rien par défaut, mais vous devez substituer Finalize uniquement si nécessaire et uniquement pour libérer les ressources non managées.The Object.Finalize method does nothing by default, but you should override Finalize only if necessary, and only to release unmanaged resources. Libération de la mémoire a tendance à prendre beaucoup plus de temps si une opération de finalisation est exécutée, car elle nécessite au moins deux garbage collections.Reclaiming memory tends to take much longer if a finalization operation runs, because it requires at least two garbage collections. En outre, vous devez substituer la Finalize types de méthode pour référence uniquement.In addition, you should override the Finalize method for reference types only. Le common language runtime finalise uniquement les types référence.The common language runtime only finalizes reference types. Il ignore les finaliseurs dans les types valeur.It ignores finalizers on value types.

L’étendue de la Object.Finalize méthode est protected.The scope of the Object.Finalize method is protected. Vous devez maintenir cette portée limitée lorsque vous substituez la méthode dans votre classe.You should maintain this limited scope when you override the method in your class. En conservant un Finalize méthode protégée, empêcher les utilisateurs de votre application à partir de l’appel d’un objet Finalize directement la méthode.By keeping a Finalize method protected, you prevent users of your application from calling an object's Finalize method directly.

Toutes les implémentations de Finalize dans un type dérivé doit appeler implémentation de son type de base de Finalize.Every implementation of Finalize in a derived type must call its base type's implementation of Finalize. Ceci est le seul cas dans lequel application code est autorisé à appeler Finalize.This is the only case in which application code is allowed to call Finalize. D’un objet Finalize méthode ne doit pas appeler une méthode sur tous les objets autres que ceux de sa classe de base.An object's Finalize method shouldn't call a method on any objects other than that of its base class. Il s’agit, car les autres objets appelées pu être collectées en même temps que l’objet appelant, comme dans le cas d’un arrêt de runtime de langage commun.This is because the other objects being called could be collected at the same time as the calling object, such as in the case of a common language runtime shutdown.

Note

Le compilateur c# ne vous permet pas de substituer le Finalize (méthode).The C# compiler does not allow you to override the Finalize method. Au lieu de cela, vous fournissez un finaliseur en implémentant un destructeur pour votre classe.Instead, you provide a finalizer by implementing a destructor for your class. Un destructeur c# appelle automatiquement le destructeur de sa classe de base.A C# destructor automatically calls the destructor of its base class.

Visual C++ fournit aussi sa propre syntaxe pour l’implémentation de la Finalize (méthode).Visual C++ also provides its own syntax for implementing the Finalize method. Pour plus d’informations, consultez la section « Destructeurs et finaliseurs » de Comment : définir et consommer des Classes et Structs (C++ / c++ / CLI).For more information, see the "Destructors and finalizers" section of How to: Define and Consume Classes and Structs (C++/CLI).

Étant donné que le garbage collection est non déterministe, vous ne savez pas précisément lorsque le garbage collector effectue la finalisation.Because garbage collection is non-deterministic, you do not know precisely when the garbage collector performs finalization. Pour libérer les ressources immédiatement, vous pouvez également choisir d’implémenter le dispose, modèle et IDisposable interface.To release resources immediately, you can also choose to implement the dispose pattern and the IDisposable interface. Le IDisposable.Dispose implémentation peut être appelée par les consommateurs de votre classe pour libérer les ressources non managées, et vous pouvez utiliser la Finalize méthode pour libérer les ressources non managées dans le cas où la Dispose méthode n’est pas appelée.The IDisposable.Dispose implementation can be called by consumers of your class to free unmanaged resources, and you can use the Finalize method to free unmanaged resources in the event that the Dispose method is not called.

Finalize peut effectuer presque toute action, y compris ressusciter (un objet qui rendre à nouveau accessible) a été nettoyé pendant le garbage collection.Finalize can take almost any action, including resurrecting an object (that is, making the object accessible again) after it has been cleaned up during garbage collection. Toutefois, l’objet peut uniquement être réactivé une seule fois ; Finalize ne peut pas être appelée sur des objets ressuscités pendant le garbage collection.However, the object can only be resurrected once; Finalize cannot be called on resurrected objects during garbage collection. Il existe une seule action que votre implémentation de Finalize ne doit jamais prendre : il ne doit jamais lever une exception.There is one action that your implementation of Finalize should never take: it should never throw an exception. Si toutes les exceptions levées par les méthodes appelées à partir la Finalize méthode ne sont pas gérées par le Finalize (méthode), le runtime suppose que le Finalize méthode retournée et continue à appeler le Finalize méthodes d’autres objets.If any exceptions thrown by methods called from the Finalize method are unhandled by the Finalize method, the runtime assumes that the Finalize method returned and continues to call the Finalize methods of other objects.

L'alternative de SafeHandleThe SafeHandle alternative

Création des finaliseurs fiables est souvent difficile, car vous ne pouvez pas faire d’hypothèses concernant l’état de votre application et non prise en charge des exceptions de système comme OutOfMemoryException et StackOverflowException terminer le finaliseur.Creating reliable finalizers is often difficult, because you cannot make assumptions about the state of your application, and because unhandled system exceptions such as OutOfMemoryException and StackOverflowException terminate the finalizer. Au lieu d’implémenter un finaliseur pour votre classe pour libérer les ressources non managées, vous pouvez utiliser un objet qui est dérivé de la System.Runtime.InteropServices.SafeHandle classe pour encapsuler vos ressources non managées et implémentez le modèle de suppression sans un finaliseur.Instead of implementing a finalizer for your class to release unmanaged resources, you can use an object that is derived from the System.Runtime.InteropServices.SafeHandle class to wrap your unmanaged resources, and then implement the dispose pattern without a finalizer. Le .NET Framework fournit les classes suivantes dans le Microsoft.Win32 espace de noms qui sont dérivés de System.Runtime.InteropServices.SafeHandle:The .NET Framework provides the following classes in the Microsoft.Win32 namespace that are derived from System.Runtime.InteropServices.SafeHandle:

L’exemple suivant utilise le dispose, modèle avec des handles sécurisés au lieu de remplacer le Finalize (méthode).The following example uses the dispose pattern with safe handles instead of overriding the Finalize method. Il définit un FileAssociation classe qui encapsule les informations de Registre sur l’application qui gère les fichiers avec une extension de fichier particulier.It defines a FileAssociation class that wraps registry information about the application that handles files with a particular file extension. Les handles de deux Registre retournés en tant que out paramètres par Windows RegOpenKeyEx appels de fonction sont passés à la SafeRegistryHandle constructeur.The two registry handles returned as out parameters by Windows RegOpenKeyEx function calls are passed to the SafeRegistryHandle constructor. Le type protégé Dispose méthode appelle ensuite la SafeRegistryHandle.Dispose méthode pour libérer ces deux poignées.The type's protected Dispose method then calls the SafeRegistryHandle.Dispose method to free these two handles.

using Microsoft.Win32.SafeHandles;
using System;
using System.ComponentModel;
using System.IO;
using System.Runtime.InteropServices;

public class FileAssociationInfo : IDisposable
{
   // Private variables.
   private String ext;
   private String openCmd;
   private String args;
   private SafeRegistryHandle hExtHandle, hAppIdHandle;

   // Windows API calls.
   [DllImport("advapi32.dll", CharSet= CharSet.Auto, SetLastError=true)]
   private static extern int RegOpenKeyEx(IntPtr hKey, 
                  String lpSubKey, int ulOptions, int samDesired,
                  out IntPtr phkResult);
   [DllImport("advapi32.dll", CharSet= CharSet.Unicode, EntryPoint = "RegQueryValueExW",
              SetLastError=true)]
   private static extern int RegQueryValueEx(IntPtr hKey,
                  string lpValueName, int lpReserved, out uint lpType, 
                  string lpData, ref uint lpcbData);   
   [DllImport("advapi32.dll", SetLastError = true)]
   private static extern int RegSetValueEx(IntPtr hKey, [MarshalAs(UnmanagedType.LPStr)] string lpValueName,
                  int Reserved, uint dwType, [MarshalAs(UnmanagedType.LPStr)] string lpData,
                  int cpData);
   [DllImport("advapi32.dll", SetLastError=true)]
   private static extern int RegCloseKey(UIntPtr hKey);

   // Windows API constants.
   private const int HKEY_CLASSES_ROOT = unchecked((int) 0x80000000);
   private const int ERROR_SUCCESS = 0;

    private const int KEY_QUERY_VALUE = 1;
    private const int KEY_SET_VALUE = 0x2;
   
   private const uint REG_SZ = 1;
   
   private const int MAX_PATH = 260;
   
   public FileAssociationInfo(String fileExtension)
   {
      int retVal = 0;
      uint lpType = 0;
                  
      if (!fileExtension.StartsWith("."))
             fileExtension = "." + fileExtension;
      ext = fileExtension;
       
      IntPtr hExtension = IntPtr.Zero;
      // Get the file extension value.
      retVal = RegOpenKeyEx(new IntPtr(HKEY_CLASSES_ROOT), fileExtension, 0, KEY_QUERY_VALUE, out hExtension);
      if (retVal != ERROR_SUCCESS) 
         throw new Win32Exception(retVal);
      // Instantiate the first SafeRegistryHandle.
      hExtHandle = new SafeRegistryHandle(hExtension, true);
      
      string appId = new string(' ', MAX_PATH);
      uint appIdLength = (uint) appId.Length;
      retVal = RegQueryValueEx(hExtHandle.DangerousGetHandle(), String.Empty, 0, out lpType, appId, ref appIdLength);
      if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);
      // We no longer need the hExtension handle.
      hExtHandle.Dispose();

      // Determine the number of characters without the terminating null.
      appId = appId.Substring(0, (int) appIdLength / 2 - 1) + @"\shell\open\Command";

      // Open the application identifier key.
      string exeName = new string(' ', MAX_PATH);
      uint exeNameLength = (uint) exeName.Length;
      IntPtr hAppId;
      retVal = RegOpenKeyEx(new IntPtr(HKEY_CLASSES_ROOT), appId, 0, KEY_QUERY_VALUE | KEY_SET_VALUE,
                            out hAppId);
       if (retVal != ERROR_SUCCESS) 
         throw new Win32Exception(retVal);

      // Instantiate the second SafeRegistryHandle.
      hAppIdHandle = new SafeRegistryHandle(hAppId, true);

      // Get the executable name for this file type.
      string exePath = new string(' ', MAX_PATH);
      uint exePathLength = (uint) exePath.Length;
      retVal = RegQueryValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0, out lpType, exePath, ref exePathLength);
      if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);
           
      // Determine the number of characters without the terminating null.
      exePath = exePath.Substring(0, (int) exePathLength / 2 - 1);
      // Remove any environment strings.
      exePath = Environment.ExpandEnvironmentVariables(exePath);

      int position = exePath.IndexOf('%');
      if (position >= 0) {
         args = exePath.Substring(position);
         // Remove command line parameters ('%0', etc.).
         exePath = exePath.Substring(0, position).Trim();
      }
      openCmd = exePath;   
   }

   public String Extension
   { get { return ext; } }
   
   public String Open
   { get { return openCmd; } 
     set {
        if (hAppIdHandle.IsInvalid | hAppIdHandle.IsClosed)
           throw new InvalidOperationException("Cannot write to registry key."); 
        if (! File.Exists(value)) {
           string message = String.Format("'{0}' does not exist", value);
           throw new FileNotFoundException(message); 
        }
        string cmd = value + " %1";
        int retVal = RegSetValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0, 
                                   REG_SZ, value, value.Length + 1);
        if (retVal != ERROR_SUCCESS)
           throw new Win32Exception(retVal);                          
     } }
   
   public void Dispose() 
   {
      Dispose(true);
      GC.SuppressFinalize(this);
   }   
   
   protected void Dispose(bool disposing)
   {
      // Ordinarily, we release unmanaged resources here; 
      // but all are wrapped by safe handles.
      
      // Release disposable objects.
      if (disposing) {
         if (hExtHandle != null) hExtHandle.Dispose();
         if (hAppIdHandle != null) hAppIdHandle.Dispose();
      }
   }
}
Imports Microsoft.Win32.SafeHandles
Imports System
Imports System.ComponentModel
Imports System.IO
Imports System.Runtime.InteropServices
Imports System.Text

Public Class FileAssociationInfo : Implements IDisposable
   ' Private variables.
   Private ext As String
   Private openCmd As String
   Private args As String
   Private hExtHandle, hAppIdHandle As SafeRegistryHandle

   ' Windows API calls.
   Private Declare Unicode Function RegOpenKeyEx Lib"advapi32.dll" _
                   Alias "RegOpenKeyExW" (hKey As IntPtr, lpSubKey As String, _
                   ulOptions As Integer, samDesired As Integer, _
                   ByRef phkResult As IntPtr) As Integer
   Private Declare Unicode Function RegQueryValueEx Lib "advapi32.dll" _
                   Alias "RegQueryValueExW" (hKey As IntPtr, _
                   lpValueName As String, lpReserved As Integer, _
                   ByRef lpType As UInteger, lpData As String, _
                   ByRef lpcbData As UInteger) As Integer   
   Private Declare Function RegSetValueEx Lib "advapi32.dll" _
                  (hKey As IntPtr, _
                  <MarshalAs(UnmanagedType.LPStr)> lpValueName As String, _
                  reserved As Integer, dwType As UInteger, _
                  <MarshalAs(UnmanagedType.LPStr)> lpData As String, _
                  cpData As Integer) As Integer 
   Private Declare Function RegCloseKey Lib "advapi32.dll" _
                  (hKey As IntPtr) As Integer

   ' Windows API constants.
   Private Const HKEY_CLASSES_ROOT As Integer = &h80000000
   Private Const ERROR_SUCCESS As Integer = 0

   Private Const KEY_QUERY_VALUE As Integer = 1
   Private Const KEY_SET_VALUE As Integer = &h2
   
   Private REG_SZ As UInteger = 1
   
   Private Const MAX_PATH As Integer  = 260
   
   Public Sub New(fileExtension As String)
      Dim retVal As Integer = 0
      Dim lpType As UInteger = 0
                  
      If Not fileExtension.StartsWith(".") Then 
         fileExtension = "." + fileExtension
      End If   
      ext = fileExtension
       
      Dim hExtension As IntPtr = IntPtr.Zero
      ' Get the file extension value.
      retVal = RegOpenKeyEx(New IntPtr(HKEY_CLASSES_ROOT), fileExtension, 0, 
                            KEY_QUERY_VALUE, hExtension)
      if retVal <> ERROR_SUCCESS Then 
         Throw New Win32Exception(retVal)
      End If  
      ' Instantiate the first SafeRegistryHandle.
      hExtHandle = New SafeRegistryHandle(hExtension, True)
      
      Dim appId As New String(" "c, MAX_PATH)
      Dim appIdLength As UInteger = CUInt(appId.Length)
      retVal = RegQueryValueEx(hExtHandle.DangerousGetHandle(), String.Empty, _
                               0, lpType, appId, appIdLength)
      if retVal <> ERROR_SUCCESS Then
         Throw New Win32Exception(retVal)
      End If   
      ' We no longer need the hExtension handle.
      hExtHandle.Dispose()

      ' Determine the number of characters without the terminating null.
      appId = appId.Substring(0, CInt(appIdLength) \ 2 - 1) + "\shell\open\Command"

      ' Open the application identifier key.
      Dim exeName As New string(" "c, MAX_PATH)
      Dim exeNameLength As UInteger = CUInt(exeName.Length)
      Dim hAppId As IntPtr
      retVal = RegOpenKeyEx(New IntPtr(HKEY_CLASSES_ROOT), appId, 0, 
                            KEY_QUERY_VALUE Or KEY_SET_VALUE, hAppId)
      If retVal <> ERROR_SUCCESS Then 
         Throw New Win32Exception(retVal)
      End If   

      ' Instantiate the second SafeRegistryHandle.
      hAppIdHandle = New SafeRegistryHandle(hAppId, True)

      ' Get the executable name for this file type.
      Dim exePath As New string(" "c, MAX_PATH)
      Dim exePathLength As UInteger = CUInt(exePath.Length)
      retVal = RegQueryValueEx(hAppIdHandle.DangerousGetHandle(), _
                               String.Empty, 0, lpType, exePath, exePathLength)
      If retVal <> ERROR_SUCCESS Then
         Throw New Win32Exception(retVal)
      End If     
      ' Determine the number of characters without the terminating null.
      exePath = exePath.Substring(0, CInt(exePathLength) \ 2 - 1)
  
      exePath = Environment.ExpandEnvironmentVariables(exePath)
      Dim position As Integer = exePath.IndexOf("%"c)
      If position >= 0 Then
         args = exePath.Substring(position)
         ' Remove command line parameters ('%0', etc.).
         exePath = exePath.Substring(0, position).Trim()
      End If   
      openCmd = exePath
   End Sub

   Public ReadOnly Property Extension As String
      Get
         Return ext
      End Get
   End Property
   
   Public Property Open As String
      Get
         Return openCmd
      End Get    
      Set 
        If hAppIdHandle.IsInvalid Or hAppIdHandle.IsClosed Then
           Throw New InvalidOperationException("Cannot write to registry key.")
        End If    
        If Not File.Exists(value) Then
           Dim message As String = String.Format("'{0}' does not exist", value)
           Throw New FileNotFoundException(message) 
        End If
        Dim cmd As String = value + " %1"
        Dim retVal As Integer = RegSetValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0, 
                                              REG_SZ, value, value.Length + 1)
        If retVal <> ERROR_SUCCESS Then 
           Throw New Win32Exception(retVal)
        End If                             
      End Set
   End Property   
   
   Public Sub Dispose() _
      Implements IDisposable.Dispose 
      Dispose(true)
      GC.SuppressFinalize(Me)
   End Sub   
   
   Protected Sub Dispose(disposing As Boolean)
      ' Ordinarily, we release unmanaged resources here 
      ' but all are wrapped by safe handles.
      
      ' Release disposable objects.
      If disposing Then
         If hExtHandle IsNot Nothing Then hExtHandle.Dispose()
         If hAppIdHandle IsNot Nothing Then hAppIdHandle.Dispose()
      End If
   End Sub
End Class

S’applique à

Voir aussi