Внешний вид дерева с выбором

[Alexander]

Сделал такое дерево с возможностью выбора, но вот засада с внешним видом! Хочу сделать так, чтобы колонка с пометкой была отдельно(первой), а тип договора объединен с иконкой ветки, но он мне объединяет пометку с иконкой, а колонку с типом ставит следом... как бороть?

Код: Выделить всё

  tree  TreeMain(,,sci178InsPM)
   show at(,,,15);
   table Dogovor;
   fields
      picked        'V'     : [3], NOAutoSize, #setMyFont(picked), skip;
        if (IsValid(#Dogovor),
    if (Dogovor.cDogovor = 0,
      if (Dogovor.cZamena = 0, UserNameDogovor, UserNameOtmenDogovor),
      if (Dogovor.cZamena = 0, UserNameUtochSogl, UserNameOtmenSogl)),
    '')'Документ' : [8], protect, #setMyFont(picked);
      Dogovor.ddoc  'Дата'  : [8], protect, #setMyFont(picked);
      Dogovor.nodoc '№ Док' : [6], protect, #setMyFont(picked);
      katorg.name   'Контрагент' : [5], protect, #setMyFont(picked);
      Dogovor.direct 'Направление' : [6], protect, #setMyFont(picked);
      Dogovor.summa 'Сума'  : protect;
   end;           

[edward_K]

обычно поле с пометкой тогда делают в конце или вообще скрывают - у вас все равно пометка цветом стоит.

[Alexander]

в стандартном галактическом как-то реализовано! мне интересно как

[edward_K]

где?

[Alexander]

в стандартном селекторе тех же договоров....

[edward_K]

tree 1 TreeMain(,,sci178InsPM)
попробуйте. Да и шрифт логичней задавать на всю строку а не по каждому полю.
ну и TreeSetNodeType надо почитать. Она в cmTreeNodeType: устанавливает иконку.

[Alexander]

1-ка помогла! спасибо!

[Alexander]

а как на строчку шрифт задать?

[edward_K]

Fields
{Font = {Color = if ((picked='[√]') , ColorMark, recColor ) } };
поля ....

[Alexander]

хех... ну когда-нить будут нормальные доки....