From 49d1c6c73e0c2936c457a991922adcd62795e2c7 Mon Sep 17 00:00:00 2001 From: JappaWakka Date: Thu, 28 Mar 2024 19:19:17 +0100 Subject: [PATCH] Chat on-screen keyboard only when using gamepad --- P3D/Network/ChatScreen.vb | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/P3D/Network/ChatScreen.vb b/P3D/Network/ChatScreen.vb index 9d0b9375c..cb8c6a10a 100644 --- a/P3D/Network/ChatScreen.vb +++ b/P3D/Network/ChatScreen.vb @@ -933,9 +933,11 @@ Public Class ChatScreen Dim ControllerShown As Boolean = False Public Overrides Sub ChangeTo() - If ControllerHandler.IsConnected() = True And Core.GameOptions.GamePadEnabled = True And ControllerShown = False Then - Core.SetScreen(New InputScreen(Me, "", InputScreen.InputModes.Text, "", 38, New List(Of Texture2D), AddressOf Me.GetControllerInput)) - ControllerShown = True + If ControllerHandler.ButtonDown(Buttons.RightShoulder) = True Then + If ControllerHandler.IsConnected() = True And Core.GameOptions.GamePadEnabled = True And ControllerShown = False Then + Core.SetScreen(New InputScreen(Me, "", InputScreen.InputModes.Text, "", 38, New List(Of Texture2D), AddressOf Me.GetControllerInput)) + ControllerShown = True + End If End If End Sub