 a bitmap handle:
          'picView.Cls
          'If (m_cClip.ClipboardOpen(Me.hWnd)) Then
          '   dim hBmp as long, hBmpOld as long, hDC as long, tBM as BITMAP
          '    hBmp = m_cClip.GetClipboardMemoryHandle(CF_BITMAP)
          '    hDC = CreateCompatibleDC(picView.hDC)
          '    hBmpOld = SelectObject(hDC, hBmp)
          '    GetObjectAPI pic.Handle, Len(tBM), tBM
          '    BitBlt picView.hDC,0,0, tBM.bmWidth,tBM.bmHeight, hDC,0,0,SRCCOPY
          '    SelectObject hDC,hBmpOld
