Dim ddrval As Long
Dim r1 As RECTDim r3 As RECT
Dim r4 As RECTobjDX7.GetWindowRect Me.hWnd, r1
r3.Bottom = ddsd3.lHeight
r3.Right = ddsd3.lWidthr4.Bottom = ddsd3.lHeight
r4.Right = ddsd3.lWidth
r4.Top = r1.Top
r4.Left = r1.Leftddrval = objDDPrimSurf.Blt(r4, objDDSprite, r3, _
DDBLT_WAIT)我要用窗口模式,发现没办法控制blt 到窗口的位置。 每次运行程序 图片的位置都在变化, 有时候还消失了。
请问应该怎么写?
Dim r1 As RECTDim r3 As RECT
Dim r4 As RECTobjDX7.GetWindowRect Me.hWnd, r1
r3.Bottom = ddsd3.lHeight
r3.Right = ddsd3.lWidthr4.Bottom = ddsd3.lHeight
r4.Right = ddsd3.lWidth
r4.Top = r1.Top
r4.Left = r1.Leftddrval = objDDPrimSurf.Blt(r4, objDDSprite, r3, _
DDBLT_WAIT)我要用窗口模式,发现没办法控制blt 到窗口的位置。 每次运行程序 图片的位置都在变化, 有时候还消失了。
请问应该怎么写?
解决方案 »
- DataList控件如何做到像List控件一样可以实时地往框内添加和删除内容呢?谢谢!
- vb调用vc生成的dll问题,谢谢!
- 需要频繁打开的窗体, 使用那种方式打开此窗口比较好???
- 怎樣在VB中用DataReport做層次式的報表???
- 怎样用CommonDialog打开文本文件??
- 谁可以给我一个vb中callback函数的例子,谢谢
- 如何让装入的图片平铺显示?
- VB中关于prodave6.0读取数据块函数的参数解释
- 帮忙测试!
- 请问那个高手知道同时播放6个MID或WAV文件的方法?(给分20)
- 有偿请VB高手,急救。。。
- 利用MshFlexGrid和TextBox进行输入时,如何进行文本换行?
r4.Left = r1.Left
r4.Bottom = r1.Top +ddsd3.lHeight
r4.Right = r1.Left+ddsd3.lWidth 原来坐标是基于屏幕的, 不是基于窗体。