Einzelnen Beitrag anzeigen

Poelser

Registriert seit: 21. Apr 2008
Ort: Europa
145 Beiträge
 
Delphi 10.4 Sydney
 
#1

D7 Interaktion mit LibreOffice Calc

  Alt 12. Apr 2021, 13:10
Moin zusammen!

ich habe auf der Grundlage von https://www.delphipraxis.net/6812-op...d-ole-wie.html ein Objekt erstellt, mit dem ich eine Instanz von LibreOffice öffnen und verschiedene Aktionen im Calc an den Zellen/Sheets durchführen kann.
Aber an simplen Schriftattributen wie [bold] scheitere ich.

Die Infos im Netz laufen immer auf so etwas wie com.sun.star.awt.FontWeight.BOLD hinaus. Gegenüber CharHeight, CellBackColor u.ä. finde ich keinen Ansatz. Der Source sieht grob so aus:
Delphi-Quellcode:
function TOLE_Office.MachBunt(Sheet: string; xpos, ypos: Integer; Inhalt: string: Boolean
var
  sh, bm: Variant;
begin
...
  bm.SetString(Inhalt); // OK
  bm.CellBackColor := RGB(255,0,0); //OK
  bm.CharHeight := 18; // OK
  bm.CharWeight := com.sun.star.awt.FontWeight.BOLD; // <- Und das ist mein Problem
...
end;
Wäre nett, wenn mich einer drauf stoßen könnte!
LG aus dem hohen Norden, Edmund
  Mit Zitat antworten Zitat