Как изменить внешний вид текста в ChuI Editor Widget

Question

Я использую виджет редактора для отображения значения longchar, прочитанного из текстового файла. OpenEdge 11.5 ChUI в Linux.

Логика похожа на следующую:

def var mytext as longchar
init "Sample Text.  Sample Text.  Sample Text.".

form mytext view-as editor large inner-chars 30 inner-lines 15
scrollbar-horizontal scrollbar-vertical
with frame frame1 no-labels no-box.

view frame frame1.
display mytext with frame frame1.
mytext:read-only = yes.
enable mytext with frame frame1.
wait-for end-error of mytext.

Когда отображается редактор, текст в виджете редактора «подсвечивается» (т.е. отображается вобратное видео). (См. Скриншот ниже.)

Есть ли способ отобразить текст в виджете редактора, чтобы он не был "выделен"?

Answer 1

Я обычно делаю что-то вроде этого:

/* textedit.p
 *
 * a file viewer
 *
 */

define variable fileName as character no-undo format "x(30)".

define variable fileBody as longchar  no-undo.

fileName = "textedit.p".

file-info:file-name = fileName.
if file-info:full-pathname = ? then
  do:
    message "no such file:" fileName.
    pause.
    quit.
  end.

copy-lob from file file-info:full-pathname to fileBody.

display
  fileBody view-as editor inner-chars 160 inner-lines 52 large no-word-wrap
 with
  no-box
  no-labels
  color display normal prompt normal    /* this changes the coloring */
.

pause.

https://documentation.progress.com/output/ua/OpenEdge_latest/index.html#page/dvref/color-phrase.html

Вы также можете поиграть с атрибутами фрейма и виджета, если предпочитаете такие вещи.