Breadcrumbs

[Ffenixw0rks]

Can I bind first line of console to specific text and change it in future?

Like in Counter Strike 1.6 console server - first line will display only server stats, whyle other lines working as console lines( :lol: )

Like this:

First line is my goal.

[mandai]

You can get the current console cursor position with Console.CursorLeft and Console.CursorTop.

You can use this to move the cursor to the top left:

Code: Select all

Console.SetCursorPosition(0, 0)

When you have finished writing to the top line you can also put the cursor back to where it was.

[MrAksel]

So the whole code would be:

Code: Select all

Private Sub WriteSomethingInRedAtTheTop(ByVal s As String)
   Dim cursorLeft As Integer = Console.CursorLeft
   Dim cursorTop As Integer = Console.CursorTop
   Dim color As ConsoleColor = Console.ForegroundColor

   Console.SetCursorPosition(0, 0)

   Console.ForegroundColor = ConsoleColor.Red
   Console.Write(s)

   Console.ForegroundColor = color
   Console.SetCursorPoistion(cursorLeft, cursorTop)
End Sub