Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.013 c