Сохранение текста "журнала" в текстовое окно.
Posted: 2015-12-20 16:08:43
Hi, All!
А нельзя ли весь тот текст, который пишется в "журнал", одновременно сохранять в текстовое окно с сохранением цвета текста? ^^
Например как-то так (без цвета), но в реалтайм.
И как я понял, не весь текст, что виден в журнале, является строками журнала?
Например, что что выводится по UO.Print(text) из журнала таким образом уже не вытащить?
С цветом надо конечно выводить в RichEdit, а не в Edit.
А нельзя ли весь тот текст, который пишется в "журнал", одновременно сохранять в текстовое окно с сохранением цвета текста? ^^
Например как-то так (без цвета), но в реалтайм.
Code: Select all
####################################################
sub CopyJournalToText()
var i
UO.TextOpen()
for i=0 to 200
if UO.Journal(i)<>"" then
UO.TextPrint (UO.Journal(i))
end if
next
И как я понял, не весь текст, что виден в журнале, является строками журнала?
Например, что что выводится по UO.Print(text) из журнала таким образом уже не вытащить?
С цветом надо конечно выводить в RichEdit, а не в Edit.