Добрый день!
Есть шаблон (вид шаблона во вложении). Стоит задача:
1. Если фазное напряжение выходит за допустимые пределы Umin и Umax, то выделить текст красным цветом.
2. Если токи в фазах различаются на 20% и более, шрифт ячеек с током сделать желтым.
begin
with Sender as TM_TableCell do
case Row of
2: if AsInt > Umax or AsInt < Umin then FontColor := clRed;
3: FontColor := clRed;
end;
end.
Какие возникли проблемы:
1. Что является Sender в событии OnCellDatachange? Я полагал, что TM_TableCell, поскольку он фигурирует как аргумент события. Однако выдается ошибка про TM_Control
2. Не все ячейки должны реагировать на изменение цвета. Я анализирую свойство Row ячейки. Номер строки считается с учетом заголовка?
3. В коде не воспринимается AsInt. По "шифт+пробел" меняет его на PrevAsInt. Т.е. доступа к переменной ячейки у меня нет?
4. По току: как в событии ячейки обратиться к значению другой ячейки, чтобы рассчитать перекос фаз. И чтобы изменить цвет шрифта сразу у трех ячеек.