Terminal Like feature

Playing around with an idea to add a terminal like feature in an app. So far it works, however after me.AddText (PathToApp) ,it does a carriage return, which I don’t want. How do I keep the caret on the same line as text from me.AddText (PathToApp) ?

Opening()
TerminalBox.Text = PathToApp + " " //DesktopTextArea

KeyDown(Key as string) As Boolean 
dim s as new Shell

if asc(key) = 13 then
  TerminalLines.Add(me.Text)// list of commands. For testing, needs to be changed later. 
  s.Execute(TerminalLines(TerminalLines.LastIndex))
end if

if s.ExitCode = 0 Then
  
Else//some error
  me.AddText(EndOfLine)
  me.AddText(s.Result)

  me.AddText(PathToApp) 
end if

Thanks.

5 posts - 3 participants

Read full topic