Проект chess

[Massaraksh7]

что Вы просто проигнорировали мой ответ #10.

Значит, я не понял его. Поясните.

[Massaraksh7]

В Вашем случае единственный аргумент - это объект "ячейка" / "диапазон" / "набор диапазонов". И всегда передаётся конечное выделение - то есть нет события "вот с этого диапазона снято выделение".

Это правда.

Поэтому да, здесь нужно, чтобы вызов был однократный.

Без сомнения.

Но без бага нет проблемы.

А с багом есть. И?

[mikekaganski]

В Вашем случае единственный аргумент - это объект "ячейка" / "диапазон" / "набор диапазонов". И всегда передаётся конечное выделение - то есть нет события "вот с этого диапазона снято выделение". Поэтому да, здесь нужно, чтобы вызов был однократный.

Поясняю: В функцию передаётся единственный аргумент - объект XCellRange либо XEnumerationAccess, содержащий несколько XCellRange. Это просто диапазоны ячеек. Больше ничего в обработчик не передаётся. Раз ничего другого в обработчик не передаётся, то никакой другой информации в обработчике нет.

[mikekaganski]

А с багом есть. И?

Если Вы знаете номер бага, то Вы можете отследить его состояние / исправление.

[Massaraksh7]

Если Вы знаете номер бага, то Вы можете отследить его состояние / исправление.

Хорошо, напишу попозже баг.

[sokol92]

Я имею в виду не костыли, типа глобальных переменных (каких, например, кстати?),

Код Выделить Развернуть

Global LastSelected As String

Sub OnSelected(oSel)
  Dim s As String
  s=oSel.AbsoluteName
  If s<>LastSelected Then
    LastSelected=s
    'Msgbox LastSelected
  End If 
End Sub

[Massaraksh7]

...

Спасибо! А то по запросу "starbasic глобальная переменная" выходит всё, что угодно, кроме этого.

[mikekaganski]

то по запросу "starbasic глобальная переменная" выходит всё, что угодно, кроме этого

Зато запрос "starbasic global variables" даёт очень хорошие результаты. Русский язык в поиске для программиста - чаще всего убийца эффективности.

[sokol92]

Объяснение, почему в данном случае нужно писать именно Global, а не Dim, как бы мы написали в VBA, дано здесь.

A public domain variable is only available so long as the associated macro is executing and then the variable is reset.

Вообще, "LibreOffice BASIC Programming Guide" и другие главы документации являются отличным дополнением к книгам Питояньяка при изучении LO.

[Massaraksh7]

https://bugs.documentfoundation.org/show_bug.cgi?id=161466

[Massaraksh7]

Короче говоря, лучше пользоваться обычными событиями мыши press и release. По крайней мере, фокусов, подобных вышеописанным, там не заметил.

Код Выделить Развернуть

Global iii as integer
Global oDocView As Object
Global oMouseClickHandler As Object

Sub RegisterMouseClickHandler
 oDocView = ThisComponent.currentController
 oMouseClickHandler = createUnoListener("Chess_", "com.sun.star.awt.XMouseClickHandler")
 oDocView.addMouseClickHandler(oMouseClickHandler)
End Sub

Sub UnregisterMouseClickHandler
 on error resume next
 oDocView.removeMouseClickHandler(oMouseClickHandler)
 on error goto 0
End Sub

Function Chess_mousePressed(oEvt) As Boolean
 Chess_mousePressed = False
End Function

Function Chess_mouseReleased(oEvt) As Boolean
myController = ThisComponent.getCurrentController()
rng = myController.getSelection()
row = rng.RangeAddress.StartRow
col = rng.RangeAddress.StartColumn

sheets = ThisComponent.getSheets()
sheet = sheets.getByIndex(0)
sheet.getCellByPosition(0,iii).setString(Trim(CStr(row))+"/"+Trim(CStr(col)))
iii = iii + 1
Chess_mouseReleased = False
End Function

[sokol92]

Для контроллеров электронных таблиц реализован также интерфейс XEnhancedMouseClickBroadcaster. Слушателю передается в качестве параметра событие EnhancedMouseEvent, которое содержит дополнительный атрибут Target - по какому объекту мы щелкнули мышью (ячейка, графический объект).

P.S. Думаю, мы облегчим поиск для будущих читателей этого замечательного форума, если вопросы / ответы будут хотя бы отдаленно относиться к заявленной теме. 

[Massaraksh7]

которое содержит дополнительный атрибут Target - по какому объекту мы щелкнули мышью (ячейка, графический объект).

Да, это удобно, спасибо. Хотя, и в случае XMouseClickHandler можно, наверное, проанализировать событие, и найти тип объекта с помощью supportsService.