Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
ВнизFastReport Помогите. Выделение строк по условию Найти похожие ветки
← →
Gedimen © (2012-08-19 15:52) [0]Доброго времени суток, мастера.
Нужна Ваша помощь.
(использую Delphi XE2, FastReport 4.12.6)
Нужно выделить строки в отчете желтым цветом (в зависимости от условия).
Есть поле date_end.
Нужно при формировании отчета проверять:
- если date_end< "текущая дата +20 дней", то выделяем желтым.
Но при реализации какая-то хрень получается.
Например у меня 7 строк в отчете:
1 - Не удовлетворяет условию;
2, 3 удовлетворяет;
4 - опять нет.
и т.д. Так он мне берет и выделяет, например, все кроме первой.
Пробовал по-разному: через OnAfterData, OnAfterPrint, OnBeforePrint.
Одна фигня. Такое чувство, что он только один раз проверяет условие.
//<myDate> передаю дату+20 из программы.
procedure Memo6OnAfterData(Sender: TfrxComponent);
if (StrToDate(<frxDBDataset1."date_check">)< StrToDate(<myDate>)) then
memo6.color:=cl Yellow;
end;
Уже весь инет облазил, а так ничего толкового не нашел.
P.S. Условное выделение под мою задачу не подходит, т.к. буду выделять красным когда дата окончания будет меньше текущей.
← →
Gedimen © (2012-08-19 15:54) [1]В коде указал <date_check> (не ошибка). Просто другой кусок скопировал. Это поле тоже проверяю.
← →
Inovet © (2012-08-19 17:41) [2]procedure MasterData1OnBeforePrint(Sender: TfrxComponent)
begim
if (<dMd."ID"> mod 2) = 1 memo6.Color := clYellow;
else memo6.Color = clWhite;
end
← →
Gedimen © (2012-08-19 20:50) [3]Спасибо. Сам допер уже.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.112 c