TSynEditUndoList

type TSynEditUndoList = class(TObject)

public

  constructor Create;

  destructor Destroy; override;

  procedure AddChange();

  procedure AppendToLastChange();

  function GetLastChange;

  function PopLastChange;

  procedure BeginBlock;

  procedure EndBlock;

  procedure Clear;

  procedure Lock;

  function PopItem;

  function PeekItem;

  procedure Unlock;

  function IsLocked;

  procedure MarkTopAsUnmodified;

  procedure MarkTopAsSaved;

  procedure ForceGroupEnd;

  function RealCount;

  function IsTopMarkedAsUnmodified;

  function UnModifiedMarkerExists;

  function IsTopMarkedAsSaved;

  function SavedMarkerExists;

  procedure RegisterUpdateCaretUndo();

  procedure UnregisterUpdateCaretUndo();

  property CanUndo: Boolean; [r]

  property FullUndoImpossible: Boolean; [r]

  property ItemCount: Integer; [r]

  property MaxUndoActions: Integer; [rw]

  property IsInsideRedo: Boolean; [rw]

  property OnAddedUndo: TNotifyEvent; [rw]

  property OnNeedCaretUndo: TSynGetCaretUndoProc; [rw]

  property GroupUndo: Boolean; [rw]

  property CurrentGroup: TSynEditUndoGroup; [r]

  property CurrentReason: TSynEditorCommand; [rw]

end;

TSynEditUndoList

TObject