Заработался))))))))
Добавлено: 23 Январь 2023, 12:34
Конец дня
cw11
CASE Tab:DataT1 % 7
OF 0
Tab:DN1 = 'ВСК'
OF 1
Tab:DN1 = 'ПНД'
OF 2
Tab:DN1 = 'ВТР'
OF 3
Tab:DN1 = 'СРД'
OF 4
Tab:DN1 = 'ЧТВ'
OF 5
Tab:DN1 = 'ПТН'
OF 6
Tab:DN1 = 'СБТ'
Tab:DN1{PROP:Text} = 'СБТ'
SETFONT(Tab:DN1,,,COLOR:Red,FONT:Bold,CHARSET:CYRILLIC)
END
Если суббота сделать день недели красным шрифтом, что не так ?
cw11
CASE Tab:DataT1 % 7
OF 0
Tab:DN1 = 'ВСК'
OF 1
Tab:DN1 = 'ПНД'
OF 2
Tab:DN1 = 'ВТР'
OF 3
Tab:DN1 = 'СРД'
OF 4
Tab:DN1 = 'ЧТВ'
OF 5
Tab:DN1 = 'ПТН'
OF 6
Tab:DN1 = 'СБТ'
Tab:DN1{PROP:Text} = 'СБТ'
SETFONT(Tab:DN1,,,COLOR:Red,FONT:Bold,CHARSET:CYRILLIC)
END
Если суббота сделать день недели красным шрифтом, что не так ?