Delphi Excel OLE Chart数据标签问题

Question

我想自动生成一个图表标签为＆＃34; text + percentage＆＃34;但是我希望将文本放在一行，然后将百分比放在下面（在下一行）。 我使用此函数生成图表标签：

E.ActiveChart.ApplyDataLabels(xlDataLabelsShowLabelAndPercent, false,true,
                              true, false, true, true,false, false,'; ');

此函数生成由分号分隔的标签。所以我基本上希望能够取代＆＃39 ;; ＆＃39;有什么说（新线）？！？！ 或者更好的是，在检查了VBA后，我注意到它在内部被编码为 ＆＃34; ＆安培; Chr（10）＆amp; ＆＃34; 但是如果我在我的函数中使用这个编码，我就没有想要的结果。 所以我的最终结果必须是这样的：

我应该在ApplyDataLabels函数中发送什么

Answer 1

窗口通常使用Chr（10）在正在显示的文本中插入换行符。

如果必须将其构造为字符串，则可能必须以这种方式指定：

E.ActiveChart.ApplyDataLabels(xlDataLabelsShowLabelAndPercent, false,true,
                              true, false, true, true,false, false, AnsiString(#10));