请问下SGrid2里面的那个拖动一列时,那个显示的随鼠标移动的标头图标是如何实现的,我已经看了原代码,但还是没找出答案。
解决方案 »
- 怎么在TEXT上发送16进制了。 想把在WPE拿下来的16进制放上TEXT上发送。怎么解决?
- 关于数据查询的问题
- 关于调用CryptAcquireContext的问题,请高手解答>>>>>>>>>>>>>>>>>>>.
- 使用树型菜单遇到的一点问题
- 100分求解 水晶报表9.0的问题--关于子报表(在线等候)
- 急救!!如何实现在VB环境下给自定义函数添加帮助,重要的是当用EXECL中引用该自定义函数时依然可见!
- 求VB记录序列号程序代码
- 在线等~~~~~~~~怎样删除联合查询里面的纪录?
- 请问。这句是什么意思呢
- 做报表到底用什么工具好?华表?水晶报表?还是spread?
- 关于vsflexgrid的additem的问题
- [求助VB] 存储后的字符串中能否一行一行读取数据呢
lhDCDisp = CreateDC("DISPLAY", ByVal 0&, ByVal 0&, ByVal 0&)
lhDC = CreateCompatibleDC(lhDCDisp)
lhBmp = CreateCompatibleBitmap(lhDCDisp, lWidth, lHeight)
DeleteDC lhDCDisp
lhBmpOld = SelectObject(lhDC, lhBmp)
' Draw the item onto the DC:
hFontOld = SelectObject(lhDC, m_hFnt)
DrawGroupedHeaderItem lhDC, lIndex, tR
SelectObject lhDC, hFontOld
' Select the bitmap out:
SelectObject lhDC, lhBmp
' Clear up DC:
DeleteDC lhDC
' Add the bitmap to the ImageList:
ImageList_AddMasked m_hImlDragImageList, lhBmp, &H10101