1 Тема от The gray Cardinal

  • The gray Cardinal
  • Разработчик
  • Неактивен

Тема: OOo Basic: отмена изменений (команда undo)

Выполнение команды undo программно, в макросе:

Sub Undo()
    Dim oDisp, oFrame
    oFrame = ThisComponent.CurrentController.Frame
    oDisp = createUnoService("com.sun.star.frame.DispatchHelper")
    oDisp.executeDispatch(oFrame,".uno:Undo", "", 0, Array())
End Sub
Предложения в русском языке начинаются с большой буквы и заканчиваются точкой.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.