以编程方式设置 ReportBuilder 中特定行的高度
Programmatically set height of specific line in ReportBuilder
免责声明:我不是 Delphi 程序员,我这样做是因为这是一个需要一些小调整的旧项目(而且,因为2018年,我的工作场所不再有Delphi程序员)。
是否可以使用 ReportBuilder 中的 Calc 选项卡来设置备注字段中特定行的高度?我不知道这是否可以从“设计”视图/选项卡中实现。
简而言之,我想增加最后两行之间的间距/填充(比如 OpenOffice / LibreOffice Writer 或 Microsoft Word 等)。
这就是我现在在 BeforePrint
活动中所拥有的。 Memo1
和Memo2
是两个互不相关的备注字段。
procedure ReportBeforePrint;
begin
Memo1.lines.Clear;
Memo1.Lines.Add(Variable1.Caption);
Memo1.Lines.Add(Variable2.Caption + ' ' + Variable5.Caption);
Memo1.Lines.Add(Variable3.Caption);
Memo1.Lines.Add(Variable4.Caption);
Memo2.lines.Clear;
Memo2.Lines.Add(Variable6.Caption);
Memo2.Lines.Add(Variable7.Caption);
Memo2.Lines.Add(Variable8.Caption);
// the code below does nothing
Variable9.Height := 1.2;
Variable10.Height := 1.2;
// the code above does nothing
Memo2.Lines.Add('stuff:' + Variable9.Caption + ' moreStuff: ' + Variable10.Caption);
end;
有没有办法设置特定行的高度?在这种情况下,我希望能够设置 Memo2 中最后一行的高度,将所有其他行保留为默认值。大致如下:
procedure ReportBeforePrint;
begin
// rest of the code....
Memo2.Lines.Add('stuff:' + Variable9.Caption + ' moreStuff: ' + Variable10.Caption);
Memo2.LastLine.Height := 1.2;
end;
我也试过在“设计”选项卡>“属性”>“文本”>“字体”中更改 Variable9 和 Variable10 的高度和字体值,但没有任何效果。
我知道我可以创建空变量并用它们创建另一行,但我不想那样做。
编辑
这就是我希望得到的(第 4 行)。
我意识到我是个白痴。最终在 Memo2
下方创建了 Memo3
,并更改了它们之间的间距,还为 Memo3
.
的内容设置了较小的字体
抱歉浪费大家的时间。
免责声明:我不是 Delphi 程序员,我这样做是因为这是一个需要一些小调整的旧项目(而且,因为2018年,我的工作场所不再有Delphi程序员)。
是否可以使用 ReportBuilder 中的 Calc 选项卡来设置备注字段中特定行的高度?我不知道这是否可以从“设计”视图/选项卡中实现。
简而言之,我想增加最后两行之间的间距/填充(比如 OpenOffice / LibreOffice Writer 或 Microsoft Word 等)。
这就是我现在在 BeforePrint
活动中所拥有的。 Memo1
和Memo2
是两个互不相关的备注字段。
procedure ReportBeforePrint;
begin
Memo1.lines.Clear;
Memo1.Lines.Add(Variable1.Caption);
Memo1.Lines.Add(Variable2.Caption + ' ' + Variable5.Caption);
Memo1.Lines.Add(Variable3.Caption);
Memo1.Lines.Add(Variable4.Caption);
Memo2.lines.Clear;
Memo2.Lines.Add(Variable6.Caption);
Memo2.Lines.Add(Variable7.Caption);
Memo2.Lines.Add(Variable8.Caption);
// the code below does nothing
Variable9.Height := 1.2;
Variable10.Height := 1.2;
// the code above does nothing
Memo2.Lines.Add('stuff:' + Variable9.Caption + ' moreStuff: ' + Variable10.Caption);
end;
有没有办法设置特定行的高度?在这种情况下,我希望能够设置 Memo2 中最后一行的高度,将所有其他行保留为默认值。大致如下:
procedure ReportBeforePrint;
begin
// rest of the code....
Memo2.Lines.Add('stuff:' + Variable9.Caption + ' moreStuff: ' + Variable10.Caption);
Memo2.LastLine.Height := 1.2;
end;
我也试过在“设计”选项卡>“属性”>“文本”>“字体”中更改 Variable9 和 Variable10 的高度和字体值,但没有任何效果。
我知道我可以创建空变量并用它们创建另一行,但我不想那样做。
编辑 这就是我希望得到的(第 4 行)。
我意识到我是个白痴。最终在 Memo2
下方创建了 Memo3
,并更改了它们之间的间距,还为 Memo3
.
抱歉浪费大家的时间。