Ich bastel grad an einem Programm zum erstellen von KLimadiagrammen mit Hilfe von Excel. Ich hab über die Typelibs von MS Office die ganzen TExcel*-KOmponenten importiert, und schaffe es auch schon, ein Diagramm mit den im Programm eingegebenen Daten zu erstellen. Nur muss es bei einem Klimadiagramm halt so sein, dass die Werteskala für den Niederschlag an der rechten Seite steht, und die für die Temperatur links. Bei mir teilen sich beide die linke Werteskala. Wenn man in Excel manuell eine Datenreihe auf die rechte Größenachse legt (Datenreihe markieren, Eigenschaften, Reiter Achsen, Datenreihe zeichnen auf Sekundärachse, OK), wird m it dem Makrorecorder folgender Code erstellt:



Die Portierung nach Delphi müsste dann so aussehen:


(flcid ist dabei =GetUserDefaultLCID)

Nur geht das leider nicht, da ActiveChart.SeriesCollection(bla, bla) vom Typ IDispatch ist, und folglich die Eigenschaft AxisGroup nicht kennt. Also dachte ich, dass man SeriesCollection mit dem as-Operator in ein anderes Objekt konvertieren muss. Ich schaute also in der automatisch erzeugten Unit nach, welche Objekte diese Eigenschaft, oder Get-/Set-Methoden, um sie zu verändern. Da gab es ISeries, ISeriesCollection und Axis, aber wenn ich den Code



ausführe, bekomme ich einen nichtssagenden "Ole-Fehler 800401A8".

Wie kann ich korrekt auf SeriesCollection zugreifen?

*push*

Hast du es

1.) mit der Zwischenspeicherung in einem Objekt also



2.) mit Später Bindung

versucht?

mkinzler hat folgendes geschrieben:

1.) mit der Zwischenspeicherung in einem Objekt also markieren Delphi-Quelltext     1: 2: serien := ExcelApplication1.ActiveWorkbook.ActiveChart.SeriesCollection(2,flcid); serien..AxisGroup:=2;

Hätte ich, wenn ich wüsste, von welchem Typ serien dann sein muss

mkinzler hat folgendes geschrieben:

2.) mit Später Bindung

Wie geht das?

Zitat:

Hätte ich, wenn ich wüsste, von welchem Typ serien dann sein muss

ISeries

Zitat:

Wie geht das?

Späte Bindung:

mkinzler hat folgendes geschrieben:

Zitat: Hätte ich, wenn ich wüsste, von welchem Typ serien dann sein muss ISeries

Dann krieg ich beim Casten nen Ole-Error 800401A8 in der Zeile:

Wobei Series vom Typ ISeries ist.

mkinzler hat folgendes geschrieben:

Zitat: Wie geht das? Späte Bindung: markieren Delphi-Quelltext     1: 2: 3: 4: 5: 6: 7: 8: var   excel: OleVariant;   ... begin   ...   excel := CreateOleObject( 'Excel.Application');   ...   excel.ActiveWorkbook.ActiveChart.SeriesCollection(2,flcid).AxisGroup:=2;

Wenn ich das genau so mache (mit ActiveWorkbook und ActiveChart) bekomme ich eine EAccessViolation beim lesen von Adresse 00000000, wenn ich das ein bisschen ändere, um das erste Workbook und das erste Chart nehme, bekomme ich (zur Laufzeit) den Fehler "ungültiger Index". Der geänderte Code:

Der ungültige Index ist dabei die 1 hinter Workbooks.Item. Auch mit 0 kommt da das selbe.

In meinem Code ( und auch in deinem) fehlt die Verbindung, der dynamsischen erzeugten Klasse die Verbindung zu dem Dokument, was ich durch die ... anzeigen wollte.