CloseMetaFile Windowsメタファイル用デバイスコンテキストのクローズ

Cの宣言:

HMETAFILE CloseMetaFile(HDC hDC);

VBの宣言:

Declare Function CloseMetaFile Lib "gdi32" (ByVal hDC As Long) As Long

説明:

CreateMetaFileで取得したWindowsメタファイル用デバイスコンテキストをクローズし、描画された内容を元にWindowsメタファイルを作成してそのハンドルを返す。

引数の意味は以下の通り。
hDC クローズするWindowsメタファイル用デバイスコンテキスト。

戻り値は、取得結果のWindowsメタファイルのハンドルである。関数の実行に失敗した場合、NULLが返される。

VBのサンプル:

長方形を描画するWindowsメタファイルを作成し、"c:\pic\test.wmf"というファイルに保存する。
' Windowsメタファイルの作成
Private Sub Command1_Click()

    Dim hDC As Long 'メタファイル用デバイスコンテキストのハンドル
    Dim hWmf As Long 'メタファイルのハンドル

    'Windowsメタファイルを作成
    hDC = CreateMetaFile("c:\pic\test.wmf")

    '長方形を描画
    Rectangle hDC, 0, 0, 100, 100
    
    'Windowsメタファイル用デバイスコンテキストのクローズ
    hWmf = CloseMetaFile(hDC)
    
    'Windowsメタファイルのクローズ
    DeleteMetaFile hWmf

End Sub

(original text:2000/01/27 更新)

本ドキュメントの内容は保証しません。本ドキュメントによって生じた結果について、一切の責任を負いません。