diff options
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/TerminalApps.vb')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/TerminalApps.vb | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/TerminalApps.vb b/ShiftOS-TheRevival/MainForms/TerminalApps.vb index f137fc1..40346af 100644 --- a/ShiftOS-TheRevival/MainForms/TerminalApps.vb +++ b/ShiftOS-TheRevival/MainForms/TerminalApps.vb @@ -134,6 +134,7 @@ Module TerminalApps Terminal.CurrentInterpreter = "terminal" Terminal.CheckFeature() Terminal.AssignPrompt() + Terminal.PrintPrompt() Terminal.TextRebind() End Select End Sub @@ -257,6 +258,19 @@ Module TerminalApps End If End Sub + Public Sub ShOSKey_InputCommand(lastcommand As String) + Terminal.ShOSKey = lastcommand + End Sub + + Public Sub ShOSKey_Display() + Terminal.TextBox1.Text = Terminal.TextBox1.Text & Terminal.ShOSKey + Try + Terminal.TrackPos = Terminal.ShOSKey.Length + Catch ex As Exception + Terminal.TrackPos = 0 + End Try + End Sub + Public Sub TextPad_CheckExist(TxtFileName As String) If File.Exists(Terminal.CurrentDirectory & "\" & TxtFileName) = True Then Terminal.TextBox1.Text = My.Computer.FileSystem.ReadAllText(Terminal.CurrentDirectory & "\" & TxtFileName) |
