Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.308 c
2-1338107276
rikitiki2012
2012-05-27 12:27
2013.03.22
Автоматически прерывает выполнение (BreakPoint в настройках )


15-1335247067
99999
2012-04-24 09:57
2013.03.22
Проверить синтаксис.


15-1345119186
stas
2012-08-16 16:13
2013.03.22
Расчет площади сложной фигуры


15-1336768202
Юрий
2012-05-12 00:30
2013.03.22
С днем рождения ! 12 мая 2012 суббота


15-1333544592
Pit
2012-04-04 17:03
2013.03.22
Ищу, от 60к, Москва, ведущий программист / Team Lead, нач. отдела