Font.ToHfont Font.ToHfont Font.ToHfont Font.ToHfont Method

Definition

Returns a handle to this Font.

public:
 IntPtr ToHfont();
public IntPtr ToHfont ();
member this.ToHfont : unit -> nativeint
Public Function ToHfont () As IntPtr

Returns

A Windows handle to this Font.

Exceptions

Examples

The following code example creates a Font and then gets a handle to that Font. The example is designed for use with Windows Forms, and it requires PaintEventArgse, which is a parameter of the Paint event handler.

   //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

Remarks

When using this method, you must dispose of the resulting Hfont using the GDI DeleteObject method to ensure the resources are released.

Security

SecurityPermission
for access to unmanaged code. Related enumeration: UnmanagedCode

Applies to