CGDevTools Forum

hello sir . i set itab.closeicon;=true , but it does not work , also the close icon in demo version dose not work. please help me .
thank you very much

Hi amirreza_asadpour,

You need implement the TabClose event and close by yourself.
We have removed the automatic remove, to provide the possibility to avoid closing.

delphi code

procedure TIWForm10.IWCGJQTabs1JQTabOptionsTabClose(Sender: TObject; AParams: TStringList);
var
  Index: Integer;
  Tab: TIWCGJQTab;
begin
  if TryStrToInt(AParams.Values['$Arg_Index'], Index) then
  begin
    Tab:= IWCGJQTabs1.Tabs[Index];
    IWCGJQTabs1.DeleteTab(Tab);
  end;
end;

Best Regards.

Hi Alexander Bulei . thank you a lot for your answer but It dose not work again

what should i do ? i used another button to close the selected tab and it work but the X is not working .
please help me .

can you send me a sample project ?

Hi amirreza_asadpour,

It works as expected here.
Please make the simple testcase project to detect your problem.

Best Regards.

Hi AjaxRender is missing

Code: Select all

procedure TIWForm4.IWCGJQTabs1JQTabOptionsTabClose(Sender: TObject;
  AParams: TStringList);
var
  Index: Integer;
  Tab: TIWCGJQTab;
begin
  if TryStrToInt(AParams.Values['$Arg_Index'], Index) then
  begin
    Tab:= IWCGJQTabs1.Tabs[Index];
    IWCGJQTabs1.DeleteTab(Tab);
    IWCGJQTabs1.AjaxReRender();
  end;
end;

Hi,

I checked better this case, and you don't need have the code OnTabClose event.
Just assign the event....

The component have internal code to remove the tab when event is assigned.
And if you want prevent the closing, just raise the exception.

Best Regards.