X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FGUI.fs;h=0a93d90367cd6e46ca268d021670594a70a88390;hp=985c8a4cc0be54cad1b7ef9f945685d401cb5575;hb=e2517b9837d5c82e003bc3aa7b27040636cea6f0;hpb=ecf48cdb4f085eb6f53b42f9d4eac67b44a92d70 diff --git a/Parasitemia/ParasitemiaUI/GUI.fs b/Parasitemia/ParasitemiaUI/GUI.fs index 985c8a4..0a93d90 100644 --- a/Parasitemia/ParasitemiaUI/GUI.fs +++ b/Parasitemia/ParasitemiaUI/GUI.fs @@ -226,7 +226,6 @@ let run (defaultConfig : Config) (fileToOpen : string option) = RBCFrameFromExisting srcImg rbc (win.canvasCurrentImage.Children.[currentCanvas] :?> Views.RBCFrame) else let f = RBCFrame srcImg rbc - f.Opacity <- 0.7 win.canvasCurrentImage.Children.Add(f) |> ignore f