Miss Очепятка
Вот так бы:
THistoryItem=class(TInterfacedObject)
public
name:String; // Имя груповой команды к примеру "backspace" или "refactoring.rename"
Command:(hcInsert,hcDelete, hcAdd, hcMoveCaret, hcGroup);
Chank:String; // Порция вставленных либо добавленных данных
pos:Integer; // Позиция вставки или удаления, а так же для перемещения курсора
Count:Integer; // Колличесо удаленых элементов.
//IsVisual:Boolean; // Для backspace требуется перемещенее курсора прежде чем сделать удаление
// GoF предлогает делать признак визуализации, но я счиаю лучше сделать группировку
Group: TListHistoryItem;
procedure Redo
procedure Undo;
constructor Create; override;
destructor Destroy; override;
end;
Если у команды есть , например, два "атрибута": "имя команды" и её "функция"...
Это, как я понимаю, два списка/массива , так?
А мы захотим потом добавить ещё, например, признак "неотменяемая" или что-то вроде того, нам надо будет завести новый список/массив этого атрибута? Так?