Bonjour à tous,
je souhaiterai écrire dans une ficher texte qui est dans Writer en utilisant les possibilités qui sont offertes pas l’automation OLE.
J’utilise le langage delphi.
J’arrive à ouvrir un document type .odt
ensuite j’utilise oTable := oDocument.createInstance(‘com.sun.star.text.TextTable’)
oTable.initialize(1,4);
oTable.setPropertyValue('HoriOrient', 7); // LEFT_AND_WIDTH
oTable.setPropertyValue('IsWidthRelative', true);
oTable.setPropertyValue('RelativeWidth', 50);
oTable.setPropertyValue('BackColor', $80); // fond bleu
oDocument.getText.insertTextContent(oDocument.getText.CreateTextCursor, oTable, False);
oTable.getCellByPosition(0, 0).CreateTextCursor.setString(OleVariant('First'));
oTable.getCellByPosition(1, 0).CreateTextCursor.setString(OleVariant('2'));
oTable.getCellByPosition(2, 0).CreateTextCursor.setString(OleVariant('3'));
oTable.getCellByPosition(3, 0).CreateTextCursor.setString(OleVariant('4'));
Je ne vois que la première colonne s’afficher contenant le texte “First”
Plusieurs questions se posent:
- Comment modifier la largeur des colonnes ?
- Comment modifier la position du tableau dans la page ? car le tableau s’affiche en début de document.
Merci
