変更TDBChart月フォーマット表示

Question

私はTDBChartを使用しています - TeeChart STDから私が使用しているDB内の私のPRICE列の値のSUMを行い、それがソートだ円グラフを表示しますMonthsのデータ - DATE列から、データベースにはdatetime typeと設定されています。次

マイTDBChart表示さ

：

私の問題：私はそれが10月〜2016年11月 - 2016として月を表示させるにはどうすればよい

（idealyオクト16およびNov-16）。

ご覧のとおり、現在は10-16と11-16の数字が表示されています。

シリーズオプション内の任意の場所でフォーマットオプションを見つけることができないようです。

Answer 1

ポイントを追加する前にdatetimeを文字列としてフォーマットし、それをラベルとして渡します。すなわち：

uses DateUtils; 

procedure TForm1.FormCreate(Sender: TObject); 
var tmpDate: TDateTime; 
    i: Integer; 
begin 
    for i:=0 to 1 do 
    begin 
    tmpDate:=IncMonth(Today,i); 
    Series1.AddPie(random*100,FormatDateTime('mmm-yy', tmpDate)); 
    end; 
end; 

---

EDIT：

あなたがデータソースに接続する移入されている場合は、ラベルが自動的に追加されます。次に、ソースを変更することなく、私が見る唯一のオプションは、次のようにOnGetMarkTextイベントを使用することです：

procedure TForm1.Series1GetMarkText(Sender: TChartSeries; ValueIndex: Integer; 
    var MarkText: string); 
var i: Integer; 
    m, y: string; 
begin 
    i:=Pos('-',MarkText); 
    m:=Copy(MarkText,1,i-1); 
    y:=Copy(MarkText,i+1,Length(MarkText)-i); 
    MarkText:=ShortMonthNames[StrToInt(m)] + ' ' + y; 
end;