Font.ToHfont Metod
Definition
Viktigt
En del information gäller för förhandsversionen av en produkt och kan komma att ändras avsevärt innan produkten blir allmänt tillgänglig. Microsoft lämnar inga garantier, uttryckliga eller underförstådda, avseende informationen som visas här.
Returnerar ett handtag till den här Font.
public:
IntPtr ToHfont();
public IntPtr ToHfont();
member this.ToHfont : unit -> nativeint
Public Function ToHfont () As IntPtr
Returer
nativeint
En Windows hantera den här Font.
Undantag
Åtgärden misslyckades.
Exempel
Följande kodexempel skapar en Font och hämtar sedan ett handtag till den Font. Exemplet är utformat för användning med Windows Forms och kräver PaintEventArgse, vilket är en parameter för händelsehanteraren 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
Kommentarer
När du använder den här metoden måste du ta bort resultatet Hfont med hjälp av GDI-metoden DeleteObject för att säkerställa att resurserna släpps.