Главная страница
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.053 c
15-1335609759
Тут иногда бываю
2012-04-28 14:42
2013.03.22
Как точно располагать Gui в редакторе?


15-1346305970
ZeroDivide
2012-08-30 09:52
2013.03.22
Современный смартфон с долгой батарейкой. Есть такие?


15-1330513399
Константинов
2012-02-29 15:03
2013.03.22
Разбит диск на разделы


15-1334867402
Юрий
2012-04-20 00:30
2013.03.22
С днем рождения ! 20 апреля 2012 пятница


6-1258480519
vadim009
2009-11-17 20:55
2013.03.22
Агент, мессенджер