چطوری میشه این دستورات در direct x را تبدیل کرد به open gl

سلام کسی میدونه این چند خط را چطوری میشه تبدیل کرد به opengl این مثال ها مربوط به directx هست اما برخی توابع به نظر میرسه یا وجود نداره یا باید به شکل دیگه کد نویسی بشه

کد:

---

Dim lrc As D3DLOCKED_RECT
Private texRefl As Direct3DTexture8
.
.
.
'srfOff.LockRect lrc, ByVal 0&, 0
'SetDIBitsToDevice Me.hdc, 0, 0, Me.ScaleWidth, Me.ScaleHeight, 0, 0, 0, Me.ScaleHeight, ByVal lrc.pBits, biWnd, 0
'srfOff.UnlockRect

---

و همچنین این :

کد:

---

texRefl.LockRect 0, lrc, ByVal 0&, D3DLOCK_DISCARD
and
StretchBlt dstDc, 0, 0, refQ, refQ, srcDc, 0, 0, Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY, vbSrcCopy
memcpy ByVal lrc.pBits, ByVal lpDat, refQ * refQ * 4

---

با دستوراتی شبیه این حل شد :

کد:

---

f GdipBitmapLockBits(hImage, dstBoundsI, ImageLockModeWrite Or ImageLockModeUserInputBuf, tBMPsrc.PixelFormat, tBMPsrc) Then
            GdipDisposeImage hImage: hImage = 0
        Else
            GdipBitmapUnlockBits hImage, tBMPsrc
        End If

---