Q&A

  • TChart의 PieChart에서.....
TChart중 Pie차트를 올려놓고 Pie차트의 클릭시에 aaa, bbb, ccc등을 ShowMessage할려고 합니다..

다음과 같은 코드를 적어놓고 어떻게 해야 그값을 출력할수 있을까여..

procedure TDockableForm.Button3Click(Sender: TObject);
begin
    with Series1 do
    begin
        Add(100,'aaa');
        Add(200,'bbb');
        Add(300,'ccc');
    end;
end;

2  COMMENTS
  • Profile
    홍성락 2002.08.14 03:58
    hsr//////////////////////////////////////////////////////////////
    아래 이벤트를 OnClickSeries사용해보세요.
    procedure TForm1.Chart1ClickSeries(Sender: TCustomChart;
      Series: TChartSeries; ValueIndex: Integer; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    begin
        showmessage(Series.ValueMarkText[ValueIndex] +#13
                    + floatToStr(Series.ValuesLists[1].Value[ValueIndex]) );
    end;
  • Profile
    델파이사랑 2002.08.14 08:45
    감사합니다....냉무...^^