mirror of
https://github.com/gui-cs/Terminal.Gui.git
synced 2025-12-26 15:57:56 +01:00
fix the build issue of F# example
This commit is contained in:
@@ -19,7 +19,7 @@ type ExampleWindow() as this =
|
||||
let btnLogin = new Button(Text = "Login", Y = Pos.Bottom(passwordLabel) + Pos.op_Implicit(1), X = Pos.Center(), IsDefault = true)
|
||||
|
||||
// When login button is clicked display a message popup
|
||||
btnLogin.Accept.Add(fun _ ->
|
||||
btnLogin.Accepting.Add(fun _ ->
|
||||
if userNameText.Text = "admin" && passwordText.Text = "password" then
|
||||
MessageBox.Query("Logging In", "Login Successful", "Ok") |> ignore
|
||||
ExampleWindow.UserName <- userNameText.Text.ToString()
|
||||
|
||||
Reference in New Issue
Block a user