2
0
Эх сурвалжийг харах

Fix "The event 'Key{Down/Press/Up}' has a non-standard type."

Martin Andersen 4 жил өмнө
parent
commit
a797cf6f19

+ 3 - 4
FSharpExample/Program.fs

@@ -360,10 +360,9 @@ type Demo() = class end
                 list.Add (keyEvent.ToString ())    
                 list.Add (keyEvent.ToString ())    
             listView.MoveDown ();
             listView.MoveDown ();
     
     
-    container.add_KeyDown(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Down") |> ignore))
-    container.add_KeyPress(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Press") |> ignore))
-    container.add_KeyUp(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Up") |> ignore))
-
+        container.add_KeyDown(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Down") |> ignore))
+        container.add_KeyPress(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Press") |> ignore))
+        container.add_KeyUp(Action<View.KeyEventEventArgs> (fun (e : View.KeyEventEventArgs) -> KeyDownPressUp (e.KeyEvent, "Up") |> ignore))
         Application.Run (container)
         Application.Run (container)
 
 
     let Main() =
     let Main() =