Ничего не могу понять ... вроде бы простой код, но работает на половину.
Код: Выделить всё
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) ! Не работает ... :(
Спасибо за любую наводку ...