Teecommander undo explode

[Calou]

Hello,

With Teecommander the users can explode pie with the mouse.
How can we do to "undo" it, is there is a key or mouse command?

thanks

Regards

[Yeray]

Hi Calou,

Wouldn't be better simply disallowing the user to delete any series?

Code: Select all

  TeeCommander1.ChartEditor := TChartEditor.Create(nil);
  TeeCommander1.ChartEditor.Chart := Chart1;
  TeeCommander1.ChartEditor.Options := TeeCommander1.ChartEditor.Options-[ceDelete];

[Calou]

Hello,

I am not talking about deleting series but explode pie.

Regards

[Yeray]

Hi Calou,

I'm sorry, I didn't understand correctly. To do this you could reset pie's explode with in editor's OnClose event:

Code: Select all

uses TeeEdit;

procedure TForm1.FormCreate(Sender: TObject);
begin
  TeeCommander1.ChartEditor := TChartEditor.Create(nil);
  TeeCommander1.ChartEditor.Chart := Chart1;
  TeeCommander1.ChartEditor.OnClose := OnCloseEditor;

end;

procedure TForm1.OnCloseEditor(Sender: TObject);
begin
  Series1.ExplodeBiggest := 0;
end;