Как смоделировать такие события, как Series1DblClick или Chart1ClickSeries, при программном создании диаграмм и рядов во время выполнения?

В небольшой программе Delphi я программно создаю несколько TCharts и TBarSeries во время выполнения, но затем я хочу иметь возможность щелкнуть столбец диаграммы и запустить, например, событие Chart1ClickSeries для отображения информации об этом столбце. Это возможно??


delphi teechart
person mprog    schedule 03.02.2015    source источник
comment
Просто назначьте метод событию OnClickSeries.   -  person LU RD    schedule 03.02.2015
comment
Какая версия Делфи?   -  person Jerry Dodge    schedule 03.02.2015

Ответы (1)


arrow_upward
2
arrow_downward

Сначала создайте обработчик событий:

TForm1 = class...
  ...
  procedure BarSeries1Click(Sender: TChartSeries;
    ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X,
    Y: Integer);
  procedure BarSeries1DblClick(Sender: TChartSeries;
    ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X,
    Y: Integer);
  ...
end;

procedure TForm1.BarSeries1Click(Sender: TChartSeries;
  ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X,
  Y: Integer);
begin
  ShowMessage('Click');
end;

procedure TForm1.BarSeries1DblClick(Sender: TChartSeries;
  ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X,
  Y: Integer);
begin
  ShowMessage('DblClick');
end;

Затем, после того как вы создали свою серию, назначьте события:

BarSeries1.OnClick:=BarSeries1Click;
BarSeries1.OnDblClick:=BarSeries1DblClick;
person Fenistil    schedule 03.02.2015