Страница 1 из 1
Текстовая консоль
Добавлено:
12.12.2011 (Пн) 10:07
jangle
Очень удобная штука появилась в 10 версии. Консоль для ввода/вывода данных. Можно использовать для вывода отладочной информации или логов. А также быстро вводить данные. Пример использования:
- Код: Выделить всё
Compile Exe
#Dim All
Function PBMain () As Long
Local hText As Long
Local x, y As Long
Local sName As String
Local MyTime As IPowerTime
MyTime = Class "PowerTime"
Desktop Get Client To x, y
MyTime.Now
Txt.Window("Текстовая консоль", (x-780)\2, (y-470)\2) To hText
Txt.Color = %rgb_Blue
Txt.Color = %rgb_Brown
Txt.Print "Today is " + DayName$(MyTime.DayOfWeek) + " " + MonthName$(MyTime.Month) + " " + Format$(MyTime.Day) + ", " + Format$(MyTime.Year) + _
" Time is " + MyTime.TimeString
Txt.Print
Txt.Color = %Black
Txt.Print MyTime.DateStringLong
Txt.Line.Input "What is your name ? ", sName
If Len(sName) Then
Txt.Print: Txt.Print
Txt.Print "Hello there " + MCase$(sName)
Txt.Print: Txt.Print
For x = 1 To 12
Txt.Print MonthName$(x)
Next x
Txt.Print "Press a key to exit..."
Txt.WaitKey$
End If
Txt.End
End Function
Re: Текстовая консоль
Добавлено:
24.12.2011 (Сб) 20:24
spamjokester
Блин. Ну полезная штука. Мне нужна. Только нужно,что додумывать.
Так как прилагаемый код не компилируется. Например,должна быть структура (As IPowerTime) и.т.д.
А нельзя ли по проще. Например,инициализация пару переменных. Вводим их имя и получаем значение.
Спасибо.
Re: Текстовая консоль
Добавлено:
24.12.2011 (Сб) 23:45
jangle
у меня все компилируется
Re: Текстовая консоль
Добавлено:
26.12.2011 (Пн) 21:02
spamjokester
Возможно, потому, что используется оболочка forms,у меня редактор PBedit.
В любом случае,было бы хорошо,если бы существовал,специальный раздел. Где пользователи VB60,могли бы
получить некоторые похожие методы отладки, к которым, они привыкли в старой системе.
Так быстрее и больше людей смогли перейти к PWBASIC.
Re: Текстовая консоль
Добавлено:
27.12.2011 (Вт) 10:40
Димитрий
spamjokester писал(а):Вводим их имя и получаем значение.
Запустите в режиме debug. В меню Debug - Watch Variables. В окне Variable Vatcher двойной клик. Вводите имя переменной - смотрите значение или меняете его.
Не знаю то ли имели ввиду.
PS Всё компилится в PBedit (10)
Re: Текстовая консоль
Добавлено:
22.01.2012 (Вс) 19:15
spamjokester
'Запустите в режиме debug. В меню Debug - Watch Variables.'
Если надо найти причину ошибки по определенному условию.
Например, бывают ошибки которые удобнее найти по условию IF в коде, и другими способами.
В этом случае тоже надо делать кучу глупых телодвижений. Полезте туда,нажмите то....
Мне нужно остановить программу в определенной sub, в нужный мне момент вычислений и посмотреть
значение разных переменных. Даже,если это можно адаптировать к режиму debug, я не буду менять свои
способы,поэтому мне не нужен debug,а то, что можно совместить с VB60 способами.
Не компилируется.
Re: Текстовая консоль
Добавлено:
22.01.2012 (Вс) 21:15
jangle
spamjokester писал(а):Не компилируется.
Все компилируется. Проблема видимо в прокладке между монитором и креслом
Re: Текстовая консоль
Добавлено:
12.02.2012 (Вс) 15:29
Zenitchik
Я тащусь от этой штуки!
Снова можно писать прямо в код
TXT.CLS
Наконец-то появился язык, пригодный для обучения программированию тех, для кого это не основной род деятельности.
Re: Текстовая консоль
Добавлено:
13.02.2012 (Пн) 11:44
Dark Machine
Да. вещь нужная.
В свое время я писал библиотеку для поддержки своих старых программ написанных на QB PDS7.
Нужно было реанимировать несколько важных ДОС-ких проектов за краткий срок (весь интерфейс был в графическом режиме).
Переписать заново под Винду - ушло бы много времени - форм было много, поэтому пришлось написать оболочку.Получилось почти тоже самое что и объект TXT...
-
Был однако прикол с режимом 640 на 480 - он выглядел очень мелко на фоне 1280х1024.Пришлось добавить коэффициент масштабирования - дотянул до 800х600. Больше уже не имеет смысла и выглядит не очень. В итоге заказчик был доволен.
Re: Текстовая консоль
Добавлено:
13.02.2012 (Пн) 11:52
jangle
На официальном форуме есть исходник консоли Матусовского, встраивается прямо в форму. Очень круто и натурально выглядит
Re: Текстовая консоль
Добавлено:
18.06.2012 (Пн) 11:13
Smitis-R
Ну вот, глючок этой консоли нашёлся - после TXT.END поток, в котором идёт обработка вывода в консоль (или что он там делает), не завершается, THREADCOUNT, соответственно, на 1 больше, чем хотелось бы. Повторный TXT.WINDOW добавляет ещё один поток и т.д.
Re: Текстовая консоль
Добавлено:
18.06.2012 (Пн) 19:35
Smitis-R
Сподобился наконец опробовать это чудо средство и - обломисимус!
Эта консоль совершенно не умеет работать в многопоточном приложении - если выводить в неё из разных потоков, полная лажа получается.