Delphi Excel OLE Chart数据标签问题

我想自动生成具有“文本+百分比”forms的标签的图表，但是我希望在一行上具有文本，并且在下一行中具有百分比。 我使用这个函数来生成图表的标签：

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

该函数生成以分号分隔的标签。 所以我基本上想要能够取代'; （新线）？！？！ 或者更好的是，检查出VBA后，我发现它在内部被编码为“＆Chr（10）＆”但是我没有期望的结果，如果我在我的函数中使用这个编码。 所以我的最终结果应该是这样的：

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

Answer 1

Chr（10）已经被Windows普遍使用来在显示给windows控件的文本中插入换行符。

如果必须将其构build为string，则可能需要这样指定：

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