DeleteEnhMetaFile 拡張メタファイルの破棄

Cの宣言:

BOOL DeleteEnhMetaFile(HENHMETAFILE hEmf);

VBの宣言:

Declare Function DeleteEnhMetaFile Lib "gdi32" (ByVal hEmf As Long) As Long

説明:

オープンされている拡張メタファイルを破棄する。

hEmfがメモリ上の拡張メタファイルを識別している場合、メモリは破棄される。hEmfがファイル上の拡張メタファイルを識別している場合、ハンドルはクローズされるがファイル自体は破棄されない。

引数の意味は以下の通り。
hEmf 破棄する拡張メタファイルのハンドル。

戻り値は、関数の実行結果を表す真偽値である。

VBのサンプル:

"c:\pic\test.emf"という拡張メタファイルをピクチャボックスに描画する。
' 拡張メタファイルの描画
Private Sub Command1_Click()

    Dim hEmf As Long '拡張メタファイルのハンドル
    Dim r As RECT '描画する領域
    
    '拡張メタファイルのオープン
    hEmf = GetEnhMetaFile("c:\pic\test.emf")
    
    '描画領域の設定
    r.Left = 0
    r.Top = 0
    r.Right = 300
    r.Bottom = 300
    
    '拡張メタファイルの描画
    PlayEnhMetaFile Picture1.hDC, hEmf, r
    
    '拡張メタファイルのクローズ
    DeleteEnhMetaFile hEmf

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

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