Frage deutsch
~~~~~~~~~~~~~
Wie ist das möglich einen Text in die unterste Zeile ausgeben, ohne dass der Bildschirminhalt rollt?
 

Question English
~~~~~~~~~~~~~
My sreen scrolls away when I print something into the 25th line!
 

Antwort 1
~~~~~~~~~
[ von Pawel ( http://www.pkworld.de ) , 2000 ]
 
Wenn man die PRINT Anweisung in der letzten Zeile mit einem Semikolon abschließt, rollt der Bildschirm nicht weiter.
 
*** Beispielcode:
 
'*******************************************************
' NOSCROL1.BAS = Ausgabe in die 25. Zeile ohne Scrollen
' =============
' (c) Pawel, 2000 - www.pkworld.de
'*******************************************************
CLS
LOCATE 1, 1
PRINT "Text in der 1. Zeile. "
PRINT "Text in der 2. Zeile. "
LOCATE 25, 1
'
PRINT "Text in der 25. Zeile";
'das Semikolon ";" bewirkt, dass kein Zeilenvorschub
'zur "26" Zeile eingefuegt wird. Daher scrollt der
'Bildschirminhalt nicht nach oben
'
SLEEP
'Auf Taste warten, damit der Text in der 25. Zeile nicht
'von [Beliebige Taste zum Fortsetzen druecken]
'ueberschrieben wird
 
Das obige Programm steht im Verzeichnis Progs\ zur Verfügung sowie online unter www.antonis.de/faq/progs/noscrol1.bas .
 
 

Antwort 2
~~~~~~~~
[ von Thomas Antoni, 5.5.2002]
 
Beende die PRINT-Anweisung in der 25. Zeile mit einem Semikolon. Dann bleibt der ausgegebene Text in der letzten Zeile und rollt zusammen mit dem gesamten Bildschirminhalt um eine Zeile nach oben.
 
*** Programmbeispiel:
 
'**************************************************************************
' NOSCROL2.BAS = Textausgabe in Zeile 25 ohne zu schrollen
' =============
' (c) Thomas Antoni, 5.5.02 - 23.2.04
'**************************************************************************
WIDTH 80, 25 'Bildschirm mit 80 Spalten und 25 Zeilen
CLS
PRINT "Zeile 1"
LOCATE 25, 1 'Cursor auf den Beginn d.letzten Bildschirmzeile
PRINT SPC(72); "Zeile 25"; '72 Blanks u.8 Zeichen Text in Zeile 25 ausgeben
SLEEP
 
Das obige Programm steht im Verzeichnis Progs\ zur Verfügung sowie online unter www.antonis.de/faq/progs/noscrol2.bas .
 

[ The QBasic-MonsterFAQ --- Start Page: www.antonis.de/faq ]