Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отчеты в QR [D5]

soware © (2002-08-16 07:07:00)
Как сделать, чтобы вертикальный размер QRShape, помещенный в секцию Detail менялся в завиимости от размера Detail ? Примечание: размер Detail меняется в зависимости от размера компонента QRMemo.

Leran2002 (2002-08-16 11:59:00) [1]

> MCFire © (16.08.02 11:26)

Вопрос внимательнее прочитай...

Mahmud~ (2002-08-16 11:49:00) [2]
Вопрос MCFire: я что-то не пойму, чья высота будет меняться в зависимости от высоты QRShape?

MCFire (2002-08-16 11:26:00) [3]
Зачем всё так сложно.Нужно лишь когда распологаешь QRShape в бенде снизу от него ничего не размещать и высота будет сама регулироваться в зависимости от QRShape.

Leran2002 (2002-08-16 10:30:00) [4]
Вместо
QRShape1.Size.Height:=QRBand1.Size.Height;
можно
QRShape1.Height:=QRBand1.Height;

Leran2002 (2002-08-16 10:21:00) [5]
Ух и задал ты вопрос мужик...
Держи:

procedure TForm3.QRBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
var
R:TRect;
begin
QRMemo1.Lines.Text:=Table1Notes.AsString;
// используем канвас формы на которой лежит TQuickRep
Form3.Canvas.Font.Assign(QRMemo1.Font);

R:=QRMemo1.ClientRect;
DrawText(Form3.Canvas.Handle,PChar(QRMemo1.Lines.Text),-1,R,
DT_CALCRECT or DT_WORDBREAK or DT_BOTTOM);

// QRMemo1.AutoStretch:=false; т.к. сами вычисляли
QRMemo1.Height:=R.Bottom;
QRBand1.Height:=QRMemo1.Top+QRMemo1.Height;

QRShape1.Size.Height:=QRBand1.Size.Height;
end;

Ну как???

soware (2002-08-16 09:03:00) [6]
Я спрашиваю об изменении размера QRShape. Его высоту надо сделать равной высоте QRBand. Но, по-моему, в событии QRBandBeforePrint еще не известна новая высота QRBand.

Leran2002 (2002-08-16 07:21:00) [7]
Обрабатывай у бэнда BeforePrint:

procedure TForm2.QRBand2BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
...
QRBand2.Height:=...;
...
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »