Steema Issues Database

Note: This database is for bugs and wishes only. For technical support help, if you are a customer please visit our online forums;
otherwise you can use StackOverflow.
Before using this bug-tracker we recommend a look at this document, Steema Bug Fixing Policy.



Bug 2584 - OnClickSeries event not fired when having two TBarSeries in 3D
Summary: OnClickSeries event not fired when having two TBarSeries in 3D
Status: RESOLVED FIXED
Alias: None
Product: VCL TeeChart
Classification: Unclassified
Component: Series (show other bugs)
Version: 36.220929
Hardware: PC Windows
: --- enhancement
Target Milestone: ---
Assignee: yeray alonso
URL: https://www.steema.com/support/viewto...
Keywords:
Depends on:
Blocks:
 
Reported: 2023-01-20 05:23 EST by yeray alonso
Modified: 2023-01-23 12:48 EST (History)
1 user (show)

See Also:
Chart Series: ---
Delphi / C++ Builder RAD IDE Version:


Attachments

Note You need to log in before you can comment on or make changes to this bug.
Description yeray alonso 2023-01-20 05:23:37 EST
Having two TBarSeries (or more) in a 3D chart, the OnClickSeries event is not fired.
Code to reproduce the problem:

var Chart1: TChart;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1:=TChart.Create(Self);
  with Chart1 do
  begin
    Parent:=Self;
    Align:=alClient;

    AddSeries(TBarSeries).FillSampleValues(2);
    AddSeries(TBarSeries).FillSampleValues(2);

    OnClickSeries:=Chart1ClickSeries;
  end;
end;

procedure TForm1.Chart1ClickSeries(Sender: TCustomChart; Series: TChartSeries;
  ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  ShowMessage('OnClickSeries event fired!');
end;

The problem seems to be at TCustomBarSeries.Clicked function
Comment 1 yeray alonso 2023-01-23 12:48:54 EST
This started appearing after implementing the fix for #2494:
https://www.steema.com/bugs/show_bug.cgi?id=2494

Now revised.