Страница 1 из 1

Передача контрола BROWSE как параметр процедуры

Добавлено: 13 Сентябрь 2014, 9:17
Игорь Столяров
Привет всем !

Ничего не могу понять ... вроде бы простой код, но работает на половину.

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

  Map
    SetMyBrowse(ushort)
  end

QuickWindow  WINDOW
   LIST,AT(1,1,100,100),USE(?Browse:1) ...
                     end 
 
   Open(QuickWindow)
   ?Browse:1{Prop:FontSize} = 16  ! Работает
   SetMyBrowse(?Browse:1)          !  Передаем контрол списка как параметр

SetMyBrowse Procedure(xMyBrowse)

    Code

    xMyBrowse{PropList:Grid} = Color:Red  ! Работает
    xMyBrowse{Prop:FontSize} = 10            ! Не работает ... :(  
    SetFont(xMyBrowse,,10)                       ! Не работает ... :(  
Или я что-то изначально делаю неправильно при передаче контрола списка в процедуру ?
Спасибо за любую наводку ...

Re: Передача контрола BROWSE как параметр процедуры

Добавлено: 13 Сентябрь 2014, 10:00
Admin
Игорь Столяров писал(а):Или я что-то изначально делаю неправильно при передаче контрола списка в процедуру ?
Спасибо за любую наводку ...
Что значит работает на половину?
Какой код дальше? Это важно.
По сути Feq контрола это просто цифра. Главное как потом к нему обращаешься.
Еще может быть важен TARGET

Re: Передача контрола BROWSE как параметр процедуры

Добавлено: 13 Сентябрь 2014, 10:07
Игорь Столяров
Все, разобрался ... :) Сам запутался.
Расписал тестовый пример - все работает. :cat: