런타임시 차트 및 시리즈를 프로그래밍 방식으로 만들 때 Series1DblClick 또는 Chart1ClickSeries와 같은 이벤트를 어떻게 시뮬레이트 할 수 있습니까?

Question

작은 델파이 프로그램에서는 런타임에 프로그래밍 방식으로 TCharts 및 TBarSeries를 거의 만들지 않지만 차트 및 불의 막대 (예 : Chart1ClickSeries 이벤트)를 클릭하여 해당 막대의 정보를 표시하려고합니다. 그게 가능한가 ??

Answer 1

먼저, 이벤트 핸들러를 만들 : 당신이 당신의 시리즈를 만든 다음 후

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;