DirextX7 サーフェスのロックについて (ID:86169)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Lockの第一引数にはロックする範囲を指定したRECT型を指定します。 どんな用途と条件でロックしようとしているのかわからないですが、 イメージデータ等の書き込みをするならば、こんな感じでしょうか。 Dim rct As RECT Dim wk() As Byte Dim ds As DDSURFACEDESC2 With rct .Left = 0 .Top = 0 .Right = texsz_x - 1 .Bottom = texsz_y - 1 End With lpSurface.Lock rct, ds, DDLOCK_WAIT Or DDLOCK_WRITEONLY, 0 lpSurface.GetLockedArray wk() ： wk()にイメージをつっこむ。 ： lpSurface.Unlock rct