Я изучаю F #, и решил попробовать сделать простые игры XNA для окон, используя F # (чистый энтузиазм), и получил окно с отображением некоторых изображений.
Вот код:
(*Methods*)
member self.DrawSprites() =
_spriteBatch.Begin()
for i = 0 to _list.Length-1 do
let spentity = _list.List.ElementAt(i)
_spriteBatch.Draw(spentity.ImageTexture,new Rectangle(100,100,(int)spentity.Width,(int)spentity.Height),Color.White)
_spriteBatch.End()
(*Overriding*)
override self.Initialize() =
ChangeGraphicsProfile()
_graphicsDevice <- _graphics.GraphicsDevice
_list.AddSprite(0,"NagatoYuki",992.0,990.0)
base.Initialize()
override self.LoadContent() =
_spriteBatch <- new SpriteBatch(_graphicsDevice)
base.LoadContent()
override self.Draw(gameTime : GameTime) =
base.Draw(gameTime)
_graphics.GraphicsDevice.Clear(Color.CornflowerBlue)
self.DrawSprites()
И AddSprite Метод:
member self.AddSprite(ID : int,imageTexture : string , width : float, height : float) =
let texture = content.Load<Texture2D>(imageTexture)
list <- list @ [new SpriteEntity(ID,list.Length, texture,Vector2.Zero,width,height)]
Объект _list имеет ContentManager , вот конструктор :
type SpriteList(_content : ContentManager byref) =
let mutable content = _content
let mutable list = []
Но я не могу свернуть окно, так как, когда оно восстанавливает фокус, я получаю эту ошибку:
ObjectDisposedException
Невозможно получить доступ к удаленному объекту.
Имя объекта: 'GraphicsDevice'.
Что происходит?