

| Type | Description | |||
| Action as Variant |
[optional] A long expression that specifies the action being removed. If missing
or -1, all actions are removed from the undo queue.
The Action parameter can be one of the following:
For instance, UndoRemoveAction(0) removes only AddBar actions in the undo stack. | |||
| Count as Variant | [optional] A long expression that indicates the number of actions to be removed. If missing or -1, all actions are removed. For instance, UndoRemoveAction(0,1) removes only the last AddBar action from the undo stack |
The records of the Undo/Redo queue may contain actions in the following format:
The records of the Undo/Redo queue may contain actions in the following format (available starting from 23.0):
Also, the Undo/Redo queue may include:
The following samples shows preventing adding the AddLink and RemoveLink undo operations when AddLink event occurs.
VBA (MS Access, Excell...)
' AddLink event - Occurs when the user links two bars using the mouse.
Private Sub G2antt1_AddLink(ByVal LinkKey As String)
With G2antt1
.Items.RemoveLink LinkKey
.Chart.UndoRemoveAction 7,1
.Chart.UndoRemoveAction 8,1
Debug.Print(.Chart.UndoListAction())
End With
End Sub
' ChartEndChanging event - Occurs after the chart has been changed.
Private Sub G2antt1_ChartEndChanging(ByVal Operation As Long)
With G2antt1
Debug.Print(.Chart.UndoListAction())
End With
End Sub
With G2antt1
.BeginUpdate
.Columns.Add "Tasks"
With .Chart
.AllowUndoRedo = True
.FirstVisibleDate = #6/20/2005#
.AllowLinkBars = True
.LevelCount = 2
.PaneWidth(0) = 48
End With
With .Items
.AddBar .AddItem("Task 1"),"Task",#6/21/2005#,#6/25/2005#,""
.AddBar .AddItem("Task 2"),"Task",#6/28/2005#,#7/2/2005#,""
End With
.EndUpdate
End With
VB6
' AddLink event - Occurs when the user links two bars using the mouse.
Private Sub G2antt1_AddLink(ByVal LinkKey As String)
With G2antt1
.Items.RemoveLink LinkKey
.Chart.UndoRemoveAction 7,1
.Chart.UndoRemoveAction 8,1
Debug.Print(.Chart.UndoListAction())
End With
End Sub
' ChartEndChanging event - Occurs after the chart has been changed.
Private Sub G2antt1_ChartEndChanging(ByVal Operation As EXG2ANTTLibCtl.BarOperationEnum)
With G2antt1
Debug.Print(.Chart.UndoListAction())
End With
End Sub
With G2antt1
.BeginUpdate
.Columns.Add "Tasks"
With .Chart
.AllowUndoRedo = True
.FirstVisibleDate = #6/20/2005#
.AllowLinkBars = True
.LevelCount = 2
.PaneWidth(0) = 48
End With
With .Items
.AddBar .AddItem("Task 1"),"Task",#6/21/2005#,#6/25/2005#,""
.AddBar .AddItem("Task 2"),"Task",#6/28/2005#,#7/2/2005#,""
End With
.EndUpdate
End With
VB.NET
' AddLink event - Occurs when the user links two bars using the mouse.
Private Sub Exg2antt1_AddLink(ByVal sender As System.Object,ByVal LinkKey As String) Handles Exg2antt1.AddLink
With Exg2antt1
.Items.RemoveLink(LinkKey)
.Chart.UndoRemoveAction(7,1)
.Chart.UndoRemoveAction(8,1)
Debug.Print(.Chart.get_UndoListAction())
End With
End Sub
' ChartEndChanging event - Occurs after the chart has been changed.
Private Sub Exg2antt1_ChartEndChanging(ByVal sender As System.Object,ByVal Operation As exontrol.EXG2ANTTLib.BarOperationEnum) Handles Exg2antt1.ChartEndChanging
With Exg2antt1
Debug.Print(.Chart.get_UndoListAction())
End With
End Sub
With Exg2antt1
.BeginUpdate()
.Columns.Add("Tasks")
With .Chart
.AllowUndoRedo = True
.FirstVisibleDate = #6/20/2005#
.AllowLinkBars = True
.LevelCount = 2
.set_PaneWidth(False,48)
End With
With .Items
.AddBar(.AddItem("Task 1"),"Task",#6/21/2005#,#6/25/2005#,"")
.AddBar(.AddItem("Task 2"),"Task",#6/28/2005#,#7/2/2005#,"")
End With
.EndUpdate()
End With
VB.NET for /COM
' AddLink event - Occurs when the user links two bars using the mouse.
Private Sub AxG2antt1_AddLink(ByVal sender As System.Object, ByVal e As AxEXG2ANTTLib._IG2anttEvents_AddLinkEvent) Handles AxG2antt1.AddLink
With AxG2antt1
.Items.RemoveLink(e.linkKey)
.Chart.UndoRemoveAction(7,1)
.Chart.UndoRemoveAction(8,1)
Debug.Print(.Chart.UndoListAction())
End With
End Sub
' ChartEndChanging event - Occurs after the chart has been changed.
Private Sub AxG2antt1_ChartEndChanging(ByVal sender As System.Object, ByVal e As AxEXG2ANTTLib._IG2anttEvents_ChartEndChangingEvent) Handles AxG2antt1.ChartEndChanging
With AxG2antt1
Debug.Print(.Chart.UndoListAction())
End With
End Sub
With AxG2antt1
.BeginUpdate()
.Columns.Add("Tasks")
With .Chart
.AllowUndoRedo = True
.FirstVisibleDate = #6/20/2005#
.AllowLinkBars = True
.LevelCount = 2
.PaneWidth(False) = 48
End With
With .Items
.AddBar(.AddItem("Task 1"),"Task",#6/21/2005#,#6/25/2005#,"")
.AddBar(.AddItem("Task 2"),"Task",#6/28/2005#,#7/2/2005#,"")
End With
.EndUpdate()
End With
C++
// AddLink event - Occurs when the user links two bars using the mouse.
void OnAddLinkG2antt1(LPCTSTR LinkKey)
{
/*
Copy and paste the following directives to your header file as
it defines the namespace 'EXG2ANTTLib' for the library: 'ExG2antt 1.0 Control Library'
#import <ExG2antt.dll>
using namespace EXG2ANTTLib;
*/
EXG2ANTTLib::IG2anttPtr spG2antt1 = GetDlgItem(IDC_G2ANTT1)->GetControlUnknown();
spG2antt1->GetItems()->RemoveLink(LinkKey);
spG2antt1->GetChart()->UndoRemoveAction(long(7),long(1));
spG2antt1->GetChart()->UndoRemoveAction(long(8),long(1));
OutputDebugStringW(spG2antt1->GetChart()->GetUndoListAction(vtMissing,vtMissing));
}
// ChartEndChanging event - Occurs after the chart has been changed.
void OnChartEndChangingG2antt1(long Operation)
{
EXG2ANTTLib::IG2anttPtr spG2antt1 = GetDlgItem(IDC_G2ANTT1)->GetControlUnknown();
OutputDebugStringW(spG2antt1->GetChart()->GetUndoListAction(vtMissing,vtMissing));
}
EXG2ANTTLib::IG2anttPtr spG2antt1 = GetDlgItem(IDC_G2ANTT1)->GetControlUnknown();
spG2antt1->BeginUpdate();
spG2antt1->GetColumns()->Add(L"Tasks");
EXG2ANTTLib::IChartPtr var_Chart = spG2antt1->GetChart();
var_Chart->PutAllowUndoRedo(VARIANT_TRUE);
var_Chart->PutFirstVisibleDate("6/20/2005");
var_Chart->PutAllowLinkBars(VARIANT_TRUE);
var_Chart->PutLevelCount(2);
var_Chart->PutPaneWidth(VARIANT_FALSE,48);
EXG2ANTTLib::IItemsPtr var_Items = spG2antt1->GetItems();
var_Items->AddBar(var_Items->AddItem("Task 1"),"Task","6/21/2005","6/25/2005","",vtMissing);
var_Items->AddBar(var_Items->AddItem("Task 2"),"Task","6/28/2005","7/2/2005","",vtMissing);
spG2antt1->EndUpdate();
C#
// AddLink event - Occurs when the user links two bars using the mouse.
private void exg2antt1_AddLink(object sender,string LinkKey)
{
exg2antt1.Items.RemoveLink(LinkKey);
exg2antt1.Chart.UndoRemoveAction(7,1);
exg2antt1.Chart.UndoRemoveAction(8,1);
System.Diagnostics.Debug.Print(exg2antt1.Chart.get_UndoListAction(null,null));
}
//this.exg2antt1.AddLink += new exontrol.EXG2ANTTLib.exg2antt.AddLinkEventHandler(this.exg2antt1_AddLink);
// ChartEndChanging event - Occurs after the chart has been changed.
private void exg2antt1_ChartEndChanging(object sender,exontrol.EXG2ANTTLib.BarOperationEnum Operation)
{
System.Diagnostics.Debug.Print(exg2antt1.Chart.get_UndoListAction(null,null));
}
//this.exg2antt1.ChartEndChanging += new exontrol.EXG2ANTTLib.exg2antt.ChartEndChangingEventHandler(this.exg2antt1_ChartEndChanging);
exg2antt1.BeginUpdate();
exg2antt1.Columns.Add("Tasks");
exontrol.EXG2ANTTLib.Chart var_Chart = exg2antt1.Chart;
var_Chart.AllowUndoRedo = true;
var_Chart.FirstVisibleDate = Convert.ToDateTime("6/20/2005");
var_Chart.AllowLinkBars = true;
var_Chart.LevelCount = 2;
var_Chart.set_PaneWidth(false,48);
exontrol.EXG2ANTTLib.Items var_Items = exg2antt1.Items;
var_Items.AddBar(var_Items.AddItem("Task 1"),"Task",Convert.ToDateTime("6/21/2005"),Convert.ToDateTime("6/25/2005"),"",null);
var_Items.AddBar(var_Items.AddItem("Task 2"),"Task",Convert.ToDateTime("6/28/2005"),Convert.ToDateTime("7/2/2005"),"",null);
exg2antt1.EndUpdate();
C# for /COM
// AddLink event - Occurs when the user links two bars using the mouse.
private void axG2antt1_AddLink(object sender, AxEXG2ANTTLib._IG2anttEvents_AddLinkEvent e)
{
axG2antt1.Items.RemoveLink(e.linkKey);
axG2antt1.Chart.UndoRemoveAction(7,1);
axG2antt1.Chart.UndoRemoveAction(8,1);
System.Diagnostics.Debug.Print(axG2antt1.Chart.get_UndoListAction(null,null));
}
//this.axG2antt1.AddLink += new AxEXG2ANTTLib._IG2anttEvents_AddLinkEventHandler(this.axG2antt1_AddLink);
// ChartEndChanging event - Occurs after the chart has been changed.
private void axG2antt1_ChartEndChanging(object sender, AxEXG2ANTTLib._IG2anttEvents_ChartEndChangingEvent e)
{
System.Diagnostics.Debug.Print(axG2antt1.Chart.get_UndoListAction(null,null));
}
//this.axG2antt1.ChartEndChanging += new AxEXG2ANTTLib._IG2anttEvents_ChartEndChangingEventHandler(this.axG2antt1_ChartEndChanging);
axG2antt1.BeginUpdate();
axG2antt1.Columns.Add("Tasks");
EXG2ANTTLib.Chart var_Chart = axG2antt1.Chart;
var_Chart.AllowUndoRedo = true;
var_Chart.FirstVisibleDate = Convert.ToDateTime("6/20/2005");
var_Chart.AllowLinkBars = true;
var_Chart.LevelCount = 2;
var_Chart.set_PaneWidth(false,48);
EXG2ANTTLib.Items var_Items = axG2antt1.Items;
var_Items.AddBar(var_Items.AddItem("Task 1"),"Task",Convert.ToDateTime("6/21/2005"),Convert.ToDateTime("6/25/2005"),"",null);
var_Items.AddBar(var_Items.AddItem("Task 2"),"Task",Convert.ToDateTime("6/28/2005"),Convert.ToDateTime("7/2/2005"),"",null);
axG2antt1.EndUpdate();
Delphi 8 (.NET only)
// AddLink event - Occurs when the user links two bars using the mouse.
procedure TWinForm1.AxG2antt1_AddLink(sender: System.Object; e: AxEXG2ANTTLib._IG2anttEvents_AddLinkEvent);
begin
with AxG2antt1 do
begin
Items.RemoveLink(TObject(e.linkKey));
Chart.UndoRemoveAction(TObject(7),TObject(1));
Chart.UndoRemoveAction(TObject(8),TObject(1));
OutputDebugString(Chart.UndoListAction[Nil,Nil]);
end
end;
// ChartEndChanging event - Occurs after the chart has been changed.
procedure TWinForm1.AxG2antt1_ChartEndChanging(sender: System.Object; e: AxEXG2ANTTLib._IG2anttEvents_ChartEndChangingEvent);
begin
with AxG2antt1 do
begin
OutputDebugString(Chart.UndoListAction[Nil,Nil]);
end
end;
with AxG2antt1 do
begin
BeginUpdate();
Columns.Add('Tasks');
with Chart do
begin
AllowUndoRedo := True;
FirstVisibleDate := '6/20/2005';
AllowLinkBars := True;
LevelCount := 2;
PaneWidth[False] := 48;
end;
with Items do
begin
AddBar(AddItem('Task 1'),'Task','6/21/2005','6/25/2005','',Nil);
AddBar(AddItem('Task 2'),'Task','6/28/2005','7/2/2005','',Nil);
end;
EndUpdate();
end
Delphi (standard)
// AddLink event - Occurs when the user links two bars using the mouse.
procedure TForm1.G2antt1AddLink(ASender: TObject; LinkKey : WideString);
begin
with G2antt1 do
begin
Items.RemoveLink(OleVariant(LinkKey));
Chart.UndoRemoveAction(OleVariant(7),OleVariant(1));
Chart.UndoRemoveAction(OleVariant(8),OleVariant(1));
OutputDebugString(Chart.UndoListAction[Null,Null]);
end
end;
// ChartEndChanging event - Occurs after the chart has been changed.
procedure TForm1.G2antt1ChartEndChanging(ASender: TObject; Operation : BarOperationEnum);
begin
with G2antt1 do
begin
OutputDebugString(Chart.UndoListAction[Null,Null]);
end
end;
with G2antt1 do
begin
BeginUpdate();
Columns.Add('Tasks');
with Chart do
begin
AllowUndoRedo := True;
FirstVisibleDate := '6/20/2005';
AllowLinkBars := True;
LevelCount := 2;
PaneWidth[False] := 48;
end;
with Items do
begin
AddBar(AddItem('Task 1'),'Task','6/21/2005','6/25/2005','',Null);
AddBar(AddItem('Task 2'),'Task','6/28/2005','7/2/2005','',Null);
end;
EndUpdate();
end
VFP
*** AddLink event - Occurs when the user links two bars using the mouse. ***
LPARAMETERS LinkKey
with thisform.G2antt1
.Items.RemoveLink(LinkKey)
.Chart.UndoRemoveAction(7,1)
.Chart.UndoRemoveAction(8,1)
DEBUGOUT(.Chart.UndoListAction())
endwith
*** ChartEndChanging event - Occurs after the chart has been changed. ***
LPARAMETERS Operation
with thisform.G2antt1
DEBUGOUT(.Chart.UndoListAction())
endwith
with thisform.G2antt1
.BeginUpdate
.Columns.Add("Tasks")
with .Chart
.AllowUndoRedo = .T.
.FirstVisibleDate = {^2005-6-20}
.AllowLinkBars = .T.
.LevelCount = 2
.PaneWidth(0) = 48
endwith
with .Items
.AddBar(.AddItem("Task 1"),"Task",{^2005-6-21},{^2005-6-25},"")
.AddBar(.AddItem("Task 2"),"Task",{^2005-6-28},{^2005-7-2},"")
endwith
.EndUpdate
endwith