2025年6月17日 星期二
2025年6月11日 星期三
QuickReport 調整 QRShape 配合 DetailBand 展延
procedure TForm1.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
var h:extended;
begin
DetailBand1.ExpandedHeight(h);
QRShape1.Size.Height := h - QRShape1.Size.Top - 1;
end;
begin
DetailBand1.ExpandedHeight(h);
QRShape1.Size.Height := h - QRShape1.Size.Top - 1;
end;
2025年6月8日 星期日
2025年6月4日 星期三
訂閱:
意見 (Atom)

