Font.ToHfont Méthode
Définition
Important
Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.
Retourne un handle à ce Font.
public:
IntPtr ToHfont();
public IntPtr ToHfont ();
member this.ToHfont : unit -> nativeint
Public Function ToHfont () As IntPtr
Retours
nativeint
Handle Windows pour ce Font.
Exceptions
L’opération a échoué.
Exemples
L’exemple de code suivant crée un Font, puis obtient un handle pour ce Font. L’exemple est conçu pour une utilisation avec Windows Forms et nécessite PaintEventArgse
, qui est un paramètre du gestionnaire d’événements Paint.
//Reference the GDI DeleteObject method.
public:
[System::Runtime::InteropServices::DllImport("GDI32.dll")]
static bool DeleteObject( IntPtr objectHandle );
void ToHfont_Example( PaintEventArgs^ /*e*/ )
{
// Create a Font object.
System::Drawing::Font^ myFont = gcnew System::Drawing::Font( "Arial",16 );
// Get a handle to the Font object.
IntPtr hFont = myFont->ToHfont();
// Display a message box with the value of hFont.
MessageBox::Show( hFont.ToString() );
//Dispose of the hFont.
DeleteObject( hFont );
}
//Reference the GDI DeleteObject method.
[System.Runtime.InteropServices.DllImport("GDI32.dll")]
public static extern bool DeleteObject(IntPtr objectHandle);
public void ToHfont_Example(PaintEventArgs e)
{
// Create a Font object.
Font myFont = new Font("Arial", 16);
// Get a handle to the Font object.
IntPtr hFont = myFont.ToHfont();
// Display a message box with the value of hFont.
MessageBox.Show(hFont.ToString());
//Dispose of the hFont.
DeleteObject(hFont);
}
' Reference the DeleteObject method in the GDI library.
<System.Runtime.InteropServices.DllImportAttribute("GDI32.DLL")> _
Private Shared Function DeleteObject(ByVal objectHandle As IntPtr) As Boolean
End Function
Public Sub ToHfont_Example(ByVal e As PaintEventArgs)
' Create a Font object.
Dim myFont As New Font("Arial", 16)
' Get a handle to the Font object.
Dim hFont As IntPtr = myFont.ToHfont()
' Display a message box with the value of hFont.
MessageBox.Show(hFont.ToString())
' Dispose of the hFont.
DeleteObject(hFont)
End Sub
Remarques
Lorsque vous utilisez cette méthode, vous devez supprimer les Hfont
résultants à l’aide de la méthode de DeleteObject
GDI pour vous assurer que les ressources sont libérées.