Текущий архив: 2002.09.19;
Скачать: 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 вся ветка
Текущий архив: 2002.09.19;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.011 c
