Текущий архив: 2002.11.28;
Скачать: CL | DM;
Вниз
Boolean - поле и QReport Найти похожие ветки
← →
ton2 (2002-11-11 12:07) [0]В базе есть числовое поле принимающее значения 1 и 0. Надо бы при отображении этого поля в QReport отображать вместо 1 "Да" и вместо 0 - "нет". помогите пожалуста раньше не приходилось еще с QReport работать.
← →
Alexandr © (2002-11-11 12:14) [1]ну так в датасете заведи вычисляемое поле, для которого свое условие прикрути и его в репорте показывай.
← →
Wolf226 © (2002-11-11 12:23) [2]Или на событие OnPrint прицепись
← →
ЮЮ © (2002-11-11 12:24) [3]А ещё есть onPrint или onBeforePrint компонентов на отчёте, где можно изменить печатаемое значение, как душе угодно
← →
KDS © (2002-11-11 12:25) [4]Поставь qrLabel вместо qrDBText на это поле и
обрабатывай событие "перед печатью" у DetailBand
procedure TqrZakaz.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
if Table1.FieldByName("Field1").AsInteger=1
then qrLabel1:="Да"
else qrLabel1:="Нет"
end;
← →
KDS © (2002-11-11 12:30) [5]ой как некрасиво отображается :( Я имел ввиду это:
then qrLabel1:="Да"
else qrLabel1:="Нет"
← →
ЮЮ © (2002-11-11 12:57) [6]А в виду ты всё-таки имел qrLabel1. Caption:="Да"
а в QRDBText1Print текста меньше:
procedure TfrmStandardEditor.QRDBText1Print(sender: TObject;
var Value: String);
begin
if Value = "1" then Value := "Да" else Value := "Нет"
end;
Страницы: 1 вся ветка
Текущий архив: 2002.11.28;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.011 c
