Это не должно быть так уж сложно, там же чистый код, без дополнительных библиотек
Да, действительно, нашёл строчку в hotdates.clw
Стал копать в этой рутинке (устанавливает цвет строк в легенде)
ListProperties Routine
do SetFormat
c{prop:from} = self.Legends
c{prop:column} = 1
c{prop:nobar} = 1
y = c{prop:width} / self.legendcols
!!! c{proplist:style,1} = 1 ! специально вынес из Loop - и тут же получаю GPF
!mia
loop x = 1 to self.legendcols
c{proplist:width,x} = y
! c{proplist:style,x} = 1 !mia comment for build >= Clarion10.11975
if self.LegendIcon = 1
c{proplist:icontrn,x} = 1
end
if self.legendicon
c{proplist:fieldno,x} = 2 + ((x-1) * 3)
else
c{proplist:fieldno,x} = 2 + ((x-1) * 2)
end
end
if self.LegendIcon = 1
c{Prop:IconList,1} = '~nocheck.ico'
c{Prop:IconList,2} = '~check.ico'
else
c{Prop:IconList,1} = '~blank.ico'
end
Т.е. конструкция XXXList{proplist:style,1} не работает в последних билдах
Спасибо RaFael за нстойчивость.