forum.boolean.name - Показать сообщение отдельно

Dzirt · 13.11.2010, 01:20

ставь очистку екрана перед тем как выводишь текст а не после него.

If pot Then
     While Not Eof(pot)
         Cls()
         Text 10,100,ReadLine$(pot)
         Flip()
     Wend
EndIf

13.11.2010, 01:20	#14
Dzirt Элита Регистрация: 16.01.2008 Сообщений: 1,800 Написано 958 полезных сообщений (для 3,833 пользователей) Всего наград 1	Ответ: как убрать текст, созданный Print'ом ставь очистку екрана перед тем как выводишь текст а не после него. If pot Then While Not Eof(pot) Cls() Text 10,100,ReadLine$(pot) Flip() Wend EndIf
(Offline)