Balkendiagramm erstellen

[karolus]

Wenn ich Deinen kompletten Lösungsvorschlag teste erhalte ich in der Zeile

Code: Alles auswählen

bar1, bar2 = bars(0,0), bars(1,0)

die Fehlermeldung:
BASIC-Syntaxfehler.
Unerwartetes Symbol: ,.

Das hat der BASIC-Intepreter gut erkannt, das ist kein BASIC … das ist python… und zwar mit Absicht.
Entweder du lernst das zu übersetzen, oder du nimmst gleich python!

zu mri:
in Basic klicke ich hier:

mrilib.png (38.39 KiB) 6476 mal betrachtet

und kann dann irgendwo:

Code: Alles auswählen

mri dingsbums

verwenden.

[Ich Bins]

und kann dann irgendwo:
Code: Alles auswählen
mri dingsbums
verwenden.

Wie schön für Dich. Bei mir funzt das leider nicht, möglicherweise habe ich bei der Installation etwas "verbogen".
Kannst Du mir eine aktuelle MRI-Anleitung empfehlen?

Für die Entwicklung von Python-Skripten für LO muss eine externe IDE konfiguriert werden.
Nach Arduino-Basteleien befindet sich Python auf meinem PC, ich habe jedoch noch keine Ahnung ob diese Phython IDE für LO genutzt werden kann. Kannst Du mir auch eine LO/Python Anleitung empfehlen?

[mikele]

Hallo,
um MRI im Code zu nutzen, muss die Bibliothek zunächst geladen werden (so mach ich es).
Irgendwo am Anfang des Codes.

Code: Alles auswählen

GlobalScope.BasicLibraries.LoadLibrary("MRILib")

Dann kann die Inspektion erfolgen

Code: Alles auswählen

mri ThisComponent

[Ich Bins]

Hallo mikele,
wenn ich das ebenso

Code: Alles auswählen

Sub Diagramm
Globalscope.BasicLibraries.LoadLibrary("MRILib")
mri ThisComponent
'oMRI.inspect( oChart )

Dim Rect As New com.sun.star.awt.Rectangle
oDoc = ThisComponent
oSheets = oDoc.Sheets

mache und mit F8 durch den Code tippe wird die Sub Mri( ByVal Optional MriTargetObject )
ausgeführt und das MRI-Fenster (mit Inhalt) geöffnet, aber danach steigt Basic oder MRI bei der Zeile

Code: Alles auswählen

oSheets = oDoc.Sheets

mit dem
BASIC-Laufzeitfehler.
Eigenschaft oder Methode nicht gefunden: Sheets.
aus.

[mikele]

Hallo,
ist ThisComponent auch eine Calc-Tabelle?

[karolus]

Hallo
Natürlich steigt basic aus, weil an der Stelle hat die globale Funktion »thisComponent« auf den mri-dialog gezeigt, und der hat eben kein Property Sheets

Code: Alles auswählen

Sub Diagramm
Globalscope.BasicLibraries.LoadLibrary("MRILib")
mri ThisComponent 'hier ist »thisComponent« das aktuelle Document'

Dim Rect As New com.sun.star.awt.Rectangle
oDoc = ThisComponent 'hier ist »thisComponent« der aktuelle mri-dialog'
oSheets = oDoc.Sheets  '### PENG ###'

daher musst du das ändern:

Code: Alles auswählen

Sub Diagramm
Globalscope.BasicLibraries.LoadLibrary("MRILib")
doc = ThisComponent
mri doc 

Dim Rect As New com.sun.star.awt.Rectangle
sheets = doc.Sheets

[Ich Bins]

ist ThisComponent auch eine Calc-Tabelle?

Es ist eine Calc-Tabelle.

Nach dem ich die Korrektur von Karolus übernommen haben ist Basic und MRI keine Einwände mehr.

Die Tage suchte ich nach der Möglichkeit die Größe der Beschriftung der Diagramm-Datenpunkte zu ändern.
Die Basic-Lösung war CharHeight

Code: Alles auswählen

oChart.Diagram.getDataPointProperties(0,0).CharHeight = 8

Wie kann man jetzt MRI unterstützend einsetzen um solche Eigenschaften zu finden?

[karolus]

Die Tage suchte ich nach der Möglichkeit die Größe der Beschriftung der Diagramm-Datenpunkte zu ändern.
Die Basic-Lösung war CharHeight

Code: Alles auswählen

oChart.Diagram.getDataPointProperties(0,0).CharHeight = 8

Wie kann man jetzt MRI unterstützend einsetzen um solche Eigenschaften zu finden?

Code: Alles auswählen

…
mri oChart.Diagram

dann öffnet sich der mri-dialog: doppelklick auf die Methode »…getDataPointProperties« … die beiden Nullen eingeben, und dann weiterhangeln zur Property »…CharHeight«

[Ich Bins]

Besten Dank Karolus.
Zuvor suchte ich die Methode getDataPointProperties in MRI vergeblich.