Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

[unsolved]How to make this work in ER


santa-clause
 Share

Recommended Posts

Hello,

```

Public Sub DrawAuctionItemDesc(ByVal ItemNum As Long)

Dim rec As RECT, rec_pos As RECT, srcRect As D3DRECT, destRect As D3DRECT

Dim itempic As Long

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

'frmMain.picItemDescPic.Cls

If ItemNum > 0 And ItemNum <= MAX_ITEMS Then

itempic = Item(GetPlayerInvItemNum(MyIndex, ItemNum)).Pic

If itempic = 0 Then Exit Sub

Direct3D_Device.Clear 0, ByVal 0, D3DCLEAR_TARGET, D3DColorRGBA(0, 0, 0, 0), 1#, 0

Direct3D_Device.BeginScene

With rec

.Top = 0

.Bottom = .Top + PIC_Y

.Left = Tex_Item(itempic).Width / 2

.Right = .Left + PIC_X

End With

With rec_pos

.Top = 0

.Bottom = 64

.Left = 0

.Right = 64

End With

RenderTextureByRects Tex_Item(itempic), rec, rec_pos

With destRect

.X1 = 0

.Y1 = 0

.y2 = 64

.x2 = 64

End With

Direct3D_Device.EndScene

Direct3D_Device.Present destRect, destRect, frmAuctions.picItem.hWnd, ByVal (0)

End If

' Error handler

Exit Sub

errorhandler:

HandleError "DrawAuctionItemDesc", "modGraphics", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub

```

How can i let this work in Eclipse Reborn or CS;DE

Regards santa,
Link to comment
Share on other sites

Well, depends on where ur going with this. if you WANT it in a picturebox, just create the form, and then create the picturebox.

If you DON'T want it to, you would need to render it to the screen.

Take out the Direct3D_Device parts and replace the line that has the word Present with RenderTexture and do all the arguments. this makes it look better but you will need to add more mouse inputs in ModInput. and that should be it.

Sincerely,

Growlith1223
Link to comment
Share on other sites

hm…im not sure why then :/ i can't rly help without vb6 and im on a public comp so i can't get vb6 on here...that's rly the best i could answer with...Keep tryin, im sure you can get it though ![;)](http://www.touchofdeathforums.com/community/public/style_emoticons/<#EMO_DIR#>/wink.png)
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...