オブジェクトの削除

もののふ 2003-12-19 01:15:13 No: 110815

WinAPIを使って画像の読み込み表示等をしています。
早速ですが質問させていただきます。

Dim DC as Long
Dim OBJ as Long
Dim OOBJ as Long

DC=CreateCompatibleDC(Picture1.hdc)
OOBJ=SelectObject(DC,LoadPicture("パス"))
StretchBlt Picture1.hdc,0,0,80,80,DC,0,0,160,160,vbSrcCopy
Picture!.Refresh
OBJ=SelectObject(DC,OOBJ)
DeleteObject(OBJ)
DeleteDC(DC)

とした場合に
DeleteObject(OBJ)って必要なのでしょうか？