如何控制TChart.Series的显示标签数量？

[zxtyhy]

如题，请高手指教
当数据较多时，显示的标签就会相互重叠看不清楚，如何才能适当的减少标签的数量？

[wukw]

是底下标签还是Value标签？如果是底下的话：
Chart1.BottomAxis.LabelsMultiLine:=True;

//把一个字符串按指定的每行字符个数分割成多行
Function DivideStrToLine(In_Str:String;In_StrPerLine:Integer):String;
var
iLine,iIndex,iLength:Integer;
Begin
Result := '';
iLength := Length(In_Str);
iIndex := 1;
iLine := 1;
while (iIndex <= iLength) do
Begin
if (ByteType(In_Str,iIndex) = mbSingleByte) then
Begin
Result := Result + Copy(In_Str,iIndex,1);
Inc(iIndex);
End
Else
if (ByteType(In_Str,iIndex) = mbLeadByte) then
Begin
Result := Result + Copy(In_Str,iIndex,2);
iIndex := iIndex + 2;
End;
if ((iIndex < iLength) and (iIndex >= iLine * In_StrPerLine)) then
Begin
Result := Result + #13;
Inc(iLine) ;
End;
End;
End;
用法：
procedure TForm1.btn1Click(Sender: TObject);
begin
Series1.Add(21,DivideStrToLine('AAAAAAAAAAAAAAAAAAAAA',5));
end;

[zxtyhy]

楼上，理解有误，
应该是控制Series.Marks的多少

[wukw]

这个，DBCHART怎么可能自动知道需要显示哪些不显示哪些？ 很简单，改用TCHART自己画啦！也不算很麻烦。