Issue with FixedDropDownButton

VCL TMS VCL UI Pack
1

Hi,
Delphi XE8,
TMS Component Pack 7.9.1.0

I found a strange behavior when using both events CanShowFixedDropDown and FixedDropDownClick at the same time.
With the following code, even though CanShow is always set to False in the CanShowFixedDropDown event, the FixedDropDownClick still gets fired if you click where the drop button would normally be visible it it could be shown.

Is this by design because it's causing me issues in my project.
If it's by design, is there a way I could work around this issue?

Thanks!

procedure TForm1.FormCreate(Sender: TObject);
begin
   AdvStringGrid1.HoverFixedCells := hfFixedRows;
   AdvStringGrid1.ControlLook.FixedDropDownButton := True;
end;

procedure TForm1.AdvStringGrid1CanShowFixedDropDown(Sender: TObject; ACol: Integer; var CanShow: Boolean);
begin
   CanShow := False;
end;

procedure TForm1.AdvStringGrid1FixedDropDownClick(Sender: TObject; ACol, ARow: Integer; var AMenu: TPopupMenu; var KeepFixedCellHighlighted: Boolean);
begin
   ShowMessage('Intended?');
end;

2

Thanks for reporting. 
We traced & solved this issue. Next update will address this.