Re: Using CreateObject to create a DirectX object

Tech-Archive recommends: Fix windows errors by optimizing your registry

From: Patrice Scribe (_at_)
Date: 03/04/05 

Date: Fri, 4 Mar 2005 10:43:48 +0100

Just does the same thing as in VB :

Set oDX = CreateObject("DirectX8")
Set oD3D = oDX.Direct3DCreate() 

-- 
Patrice Scribe
"civerson" <civerson.1lc8lu@mail.codecomments.com> a écrit dans le message
de news:civerson.1lc8lu@mail.codecomments.com...
>
> I am trying to use CreateObject to create a DirectX object.
>
> This works fine.
>
> Dim oDX As DirectX8           ' The core DirectX object
> Dim oD3D As Direct3D8          ' The core Direct3D object
> Dim d3DCaps As D3DCAPS8
>
> Set oDX = New DirectX8         ' Create your DirectX object
> Set oD3D = oDX.Direct3DCreate()
>
> oD3D.GetDeviceCaps 0, D3DDEVTYPE_HAL, d3DCaps
>
> The above will not work in vbScript so I need to use the CreateObject
> object.
>
> I have tried the following and they don't work.
>
> Dim oDX                        ' The core DirectX object
>
> Set oDX = CreateObject("DirectX8")
>
> or
>
> Set oDX = CreateObject("Direct3D")
>
> I have Googled for an hour and a half and no luck.
>
> Any ideas?
>
> Thanks,
> Chris
>
>
>
> --
> civerson
> ------------------------------------------------------------------------
> Posted via http://www.codecomments.com
> ------------------------------------------------------------------------
>