Hi Leute,

ich verwende Visual Basic 2008 von Microsoft und
beschäftigte mich gerade für eine zweidimensionale Anwednung mit DirectX, nach dem Tutorial von http://www.euclideanspace.com/softwa...sics/index.htm habe ich folgenden Quellcode für die Init() erstellt:

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

'Initialisierung     Public Sub Init()         VisibleSurface = Nothing         BackSurface = Nothing         Dim sdesc As New SurfaceDescription()         Clip = New Clipper(MyDevice)         clip.Window = Me         sdesc.SurfaceCaps.PrimarySurface = True         sdesc.SurfaceCaps.Flip = True         sdesc.SurfaceCaps.Complex = True         sdesc.BackBufferCount = 1         VisibleSurface = New Surface(sdesc, MyDevice)         VisibleSurface.Clipper = Clip         sdesc.Clear()         sdesc.SurfaceCaps.BackBuffer = True         VisibleSurface = BackSurface.GetAttachedSurface(sdesc.SurfaceCaps)     End Sub

Die verursacht zur Laufzeit einen Fehler da Backsurface zwar bekannt ist, aber nicht initialisiert. Meine Versuche es zu initalisieren scheiterten leider beide.

1. Kopie der VisibleSurface Initialisierung

Code :

1	BackSurface = New Surface(sdesc, MyDevice)

Verursacht einen Fehler, da BackSurface und Visiblesurface dann übereinstimmen.

2.Anpassung der Kopie

Code :

1 2 3

Dim bsdesc As SurfaceDescription = sdesc bsdesc.SurfaceCaps.PrimarySurface = False BackSurface = New Surface(sdesc, MyDevice)

Dies verursacht eine Invalid Exception.

Hoffe einer weiß, was ich hier nicht richtig mache.

Gruß Rene

PS: Kann man in seinen Posts auch ein korrektes Highlighting für VB-Code einstellen?

Sorry, Jungs für die Aufregung aber nun habe ich den Fehler gefunden, in der letzten Zeile gehören VisibleSurface und BackpufferSurface vertauscht.

Gruß Rene