OpenOffice.info

procedure OOMerge(tableIndex, xpos, ypos);
var
  tables, aktTable, cursor, range: Variant;
begin
  tables := Document.getTexttables;
  aktTable := tables.getByIndex(tableIndex);
  //range := aktTable.getCellRangeByPosition(xpos, ypos, xpos, ypos);
  //cursor := aktTable.createCursorByCellRange(range); //Fehlermeldung
  cursor := aktTable.createCursorByCellName('A1');
  cursor.goDown(1, True);
  cursor.mergeRange; 
end;

Hallo,

ich habe noch eine kleine Ungereimtheit beim Verbinden 2er Zellen in einer Texttabelle eines sWriter-Dokumentes. Nach längerer zeit habe ich es endlich hinbekommen, das sich 2 Zellen verbinden lassen. Allerdings bekomme ich es nur hin, wenn ich den tableCursor über den Namen setzte, mit der Range wäre mir es lieber. Ich habe schon alles mögliche versucht, aber es will mir nicht gelingen, den TableCursor über die Range zu setzen. Xray ist mir leider keine große Hilfe, damit komme ich nur sehr schlecht zurecht :(.

Hier mal mein Quelltext (Delphi):
[code]
procedure OOMerge(tableIndex, xpos, ypos);
var
tables, aktTable, cursor, range: Variant;
begin
tables := Document.getTexttables;
aktTable := tables.getByIndex(tableIndex);
//range := aktTable.getCellRangeByPosition(xpos, ypos, xpos, ypos);
//cursor := aktTable.createCursorByCellRange(range); //Fehlermeldung
cursor := aktTable.createCursorByCellName('A1');
cursor.goDown(1, True);
cursor.mergeRange;
end;
[/code]

Gibt es eine Möglichkeit, den Cursor auch über die Range zu setzen?