Font.ToHfont Método
Definición
Importante
Parte de la información hace referencia a la versión preliminar del producto, que puede haberse modificado sustancialmente antes de lanzar la versión definitiva. Microsoft no otorga ninguna garantía, explícita o implícita, con respecto a la información proporcionada aquí.
Devuelve un identificador a este Font.
public:
IntPtr ToHfont();
public IntPtr ToHfont ();
member this.ToHfont : unit -> nativeint
Public Function ToHfont () As IntPtr
Devoluciones
nativeint
Identificador de Windows para este Font.
Excepciones
La operación no se realizó correctamente.
Ejemplos
En el ejemplo de código siguiente se crea un Font y, a continuación, se obtiene un identificador para ese Font. El ejemplo está diseñado para su uso con Windows Forms y requiere PaintEventArgse
, que es un parámetro del controlador de eventos 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
Comentarios
Al usar este método, debe eliminar el Hfont
resultante mediante el método DeleteObject
GDI para asegurarse de que los recursos se liberan.