Установить автоматический формат листбокса:

 setlistboxformat control qname

  control       - USE-метка оконного элемента

    qname  - имя очереди

 

Оператор setlistboxformat создает строку, содержащую формат ListBox`а, а затем присваивает значение этой строки свойству PROP:FORMAT оконного элемента control.

В строку формата не включаются поля-группы  (но все ее поля). Так-же, не включаются поля-массивы из-за ошибочной обработки  их блоком RTL Клариона, ответственным за отображение полей очереди в ListBox.

Формат включает центрированные заголовки колонок по имени поля, границы  колонок, сами колонки - изменяемой ширины. Формат отображения колонки  устанавливается в соответствии с заданными установками для каждого поля

 

Пример:

DEFINE DATA

FILE:queue QUEUE,PRE(File)

name        STRING(102)

shortname   STRING(13)

date        DATE(@D06-B),ALIGN(R)

time        TIME

size        LONG(@N10B),ALIGN(R)

attrib      BYTE                      !A bitmap, the same as the attributes EQUATEs

          END

ENDDEFINE

 

makelistboxformat list1_format FILE:queue

 

#после выполнения переменная list1_format = 100L(2)|M~NAME~C(0)@S102@#1#58L(2)|M~SHORTNAME~C(0)@S13@#2#45R(2)|M~DATE~C(0)@D06-B@#3#36R(2)|M~TIME~C(0)@t4@#4#45R(2)|M~SIZE~C(0)@N10B@#5#27R(2)|M~ATTRIB~C(0)@N3@#6#

 

 

См. также: DEFINE DATA, DEFINE WINDOW, OPEN WINDOW, SETPROP, MAKELISTBOXFORMAT