Calc vertauscht Rot und Blauwert?
Verfasst: Di, 23.03.2010 15:08
Also entweder ich hab was falsch eingestellt oder kein Mensch steuert OpenOffice via OLE von Delphi aus. Vielleicht steh ich aber auch einfach auf dem Schlauch.
Also ich habe nun folgende Funktion
Diese setzt mir die Schriftfarbe einer Zelle. Verwunderlich finde ich folgende Zeile:
denn wie man sieht, muss ich Rot und Blau vertauscht übergeben, damit mir Calc die Farbe richtig ausgibt. Aufgefallen war mir das als ich clNavy übergab und die Zelle Rot wurde.
Am seltsamsten finde ich nun allerdings, dass man im Internet dazu praktisch nix findet, das muss doch auffallen
Also scheints ja doch eher an einer Einstellung bei mir zu liegen? Oder kann das jemand nachvollziehen?
Code mit Delphi 2007 erstellt, auf XP. Getestet mit OO 3.2 und OO 2.0, beide geben das gleiche Resultat zurück.
Also ich habe nun folgende Funktion
Code: Alles auswählen
procedure TOLE_OpenOffice.CharColor(sheet,ro,ru,sl,sr:Integer;color:TColor);
var ra : Variant;
r,g,b : Byte;
begin
r := GetRValue(color);
g := GetGValue(color);
b := GetBValue(color);
ra := Document.sheets.getbyindex(sheet).getCellRangebyName(CellIndexToCellName(sl,ro)+':'+CellIndexToCellName(sr,ru));
ra.CharColor := RGB(b,g,r);
end;
Code: Alles auswählen
ra.CharColor := RGB(b,g,r);
Am seltsamsten finde ich nun allerdings, dass man im Internet dazu praktisch nix findet, das muss doch auffallen
Also scheints ja doch eher an einer Einstellung bei mir zu liegen? Oder kann das jemand nachvollziehen?Code mit Delphi 2007 erstellt, auf XP. Getestet mit OO 3.2 und OO 2.0, beide geben das gleiche Resultat zurück.