PureBoard

Verfasst: **06.06.2008 23:15**

Hallo,

ich wollte Fragen, ob ein Wagenrücklauf in PureBasic möglich ist

d.h. ein Zeichen nach dem Print wieder löschen

Dann würde das z.B. so aussehen

OpenConsole()
Print("Hallo")
Print("\wagenruecklauf")

Dann steht in dem Programm:

Hall

Geht das?

Verfasst: **06.06.2008 23:21**

> Geht das?
so nicht

Code: Alles auswählen

OpenConsole()
Print("Hallo")
Print(Chr(8))

Dabei wird aber nur das Backspace ausgeführt, nicht gelöscht!
PS: Wagenrücklauf geht an den Anfang der Zeile

Verfasst: **06.06.2008 23:22**

Code: Alles auswählen

OpenConsole()
  EnableGraphicalConsole(1)
  Print("Hallo")
  Delay(1000)
  ClearConsole()
  Print("Hall")
  Input()
CloseConsole()

Verfasst: **06.06.2008 23:29**

Danke TS-Soft

RSBasic, nein, das meinte ich leider nicht, ich möchte eine Ladebar erstellen

Verfasst: **07.06.2008 07:04**

Dann versuch es mal mit ConsoleLocate

Code: Alles auswählen

  If OpenConsole()
    EnableGraphicalConsole(#True)
    
    Print("-")
    ConsoleLocate(10,0)
    Print("-")
    
    ConsoleLocate(1,0)
    
    For i = 1 To 9
      Delay(200)
      ConsoleLocate(i,0)
      Print("|")
    Next
    
    Input()
  EndIf

Verfasst: **07.06.2008 14:51**

edel hat geschrieben:Dann versuch es mal mit ConsoleLocate

Code: Alles auswählen

  If OpenConsole()
    EnableGraphicalConsole(#True)
    
    Print("-")
    ConsoleLocate(10,0)
    Print("-")
    
    ConsoleLocate(1,0)
    
    For i = 1 To 9
      Delay(200)
      ConsoleLocate(i,0)
      Print("|")
    Next
    
    Input()
  EndIf

Danke für den Tipp, auch ganz nützlich :)

Aber Chr(8) ist am besten.

Code: Alles auswählen

OpenConsole()
Print("Hallo")
Print(Chr(8))
Print(" ")