Undo и Rego (оноже назад и вперед)

[BOO]

Поможите лишь идеей программы добрые
Не могу даже принцип понять как сделать отмену пары действи и их возвращения

[hCORe]

Без знания какая программа, невозможно дать точные рекомендации.

Но вообще можно при каждом изменении сохранять данные в неком хранилище (массив или что-то еще?). При нажатии "отмены" возвращаться к предыдущему варианту, при нажатии "повтора" - переходить к следующему. Если после восстановления предыдущего состояния данные изменились, то надо затирать оставшиеся данные в хранилище. Только памяти будет жрать... как любое "офисное" приложение - MS Office ведь тоже хранит все действия пользователя в памяти. Альтернативный вариант: сохранять в хранилище только изменения. Почти беспереспективен из-за своей сложности. Вот так.

[A.A.Z.]

Насчёт Ctrl+Z

Код: Выделить всё

'на форме TextBox "Text1"

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Any) As Long
Const EM_UNDO = &HC7

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyControl + vbKeyZ Then SendMessage Text1.hwnd, EM_UNDO, 0&, 0&
End Sub

Private Sub Form_Load()
KeyPreview = True
End Sub