Скачать: CL | DM;

Опаздывание в QRDBText   Найти похожие ветки 

← →
orion_st ©   (2002-08-28 11:00) [0]

Вывожу надпись:
procedure TQuickReportCat.QRDBText8Print(sender: TObject; var Value: String);
begin
if Value="Да" then
begin
QRDBText1.Font.Style:=[fsUnderline];
QRDBText2.Font.Style:=[fsUnderline];
end;
if Value="Нет" then
begin
QRDBText1.Font.Style:=[];
QRDBText2.Font.Style:=[];
end;
end;

и ситуация такая, что выделяется не строка, где выводится "ДА", а следующая. Что за фигня?

---

← →
ЮЮ ©   (2002-08-28 11:04) [1]

При печати QRDBText8 QRDBText1 и QRDBText2 уже напечатались и твои установки сработают как раз на следующей строке. Надо в обработчике QRDBText1Print анализировать, что будет напечатано в QRDBText8, т.е. содержимое текущей записи.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.012 c