From bcaf1c1e2e949eb54fbef7ef55e4beeacfdf297d Mon Sep 17 00:00:00 2001
From: "OPTIMUS-PRIME\\craig" <craig@craigoates.net>
Date: Tue, 13 Nov 2018 01:28:55 +0000
Subject: [PATCH] refactor creating file stream in drawSkiaGrid function.

---
 DeathSocket/ImageServices.fs | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/DeathSocket/ImageServices.fs b/DeathSocket/ImageServices.fs
index 68235b8..ba0d0cb 100644
--- a/DeathSocket/ImageServices.fs
+++ b/DeathSocket/ImageServices.fs
@@ -72,13 +72,8 @@
         imageFill.Style <- SKPaintStyle.Fill
 
         // Add Bitmap
-        //let fileStream = File.Open (@"C:\Users\craig\Desktop\test.jpg", FileMode.Open)
-
-        let byteArray = File.ReadAllBytes(@"C:\Users\craig\Desktop\test.jpg")
-        use memStream = new MemoryStream(byteArray)
-
-        // this works...
-        use skStream = new SKManagedStream (memStream)
+        let fileStream = File.Open (@"C:\Users\craig\Desktop\test.jpg", FileMode.Open)
+        use skStream = new SKManagedStream (fileStream)
         use bitmap = SKBitmap.Decode (skStream)
         use shader = SKShader.CreateBitmap (bitmap, SKShaderTileMode.Mirror, SKShaderTileMode.Mirror)
         imageFill.Shader <- shader