Font.ToHfont Метод

Определение

Пространство имен:

System.Drawing

Сборка:

System.Drawing.Common.dll

Пакет:

System.Drawing.Common v9.0.0-rc.2.24474.1

Исходный код:

Font.cs

Возвращает дескриптор этой Font.

public:
 IntPtr ToHfont();

public IntPtr ToHfont ();

member this.ToHfont : unit -> nativeint

Public Function ToHfont () As IntPtr

Возвращаемое значение

IntPtr

nativeint

Дескриптор Windows для этого Font.

Исключения

Win32Exception

Операция была неудачной.

Примеры

В следующем примере кода создается Font, а затем возвращается дескриптор для этого Font. Пример предназначен для использования с Windows Forms и требует PaintEventArgse, который является параметром обработчика событий 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

Комментарии

При использовании этого метода необходимо удалить результирующий Hfont с помощью метода GDI DeleteObject, чтобы обеспечить освобождение ресурсов.