C++ Builder 5 und Excel

Computer: Software & Programmierung C/C++
#1

Liebe/-r wer-weiss-was Experte/-in,

ich programmiere gerade mit Borland C++ Builder 5 und möchte eine Excel-Datei öffnen und beschreiben. Ich hab schon einige Seiten im Internet durchsucht und Beispiele ausprobiert. Das Öffnen und Schließen von Excel funktioniert, der Zugriff auf die Arbeitsmappe jedoch nicht.
Ich arbeite mit den Komponenten TExcelApplication, TExcelWorkbook und TExcelWorksheet. Mein Code sieht folgendermaßen aus:

//Öffnen-Schaltfläche wurde gedrückt
void __fastcall TForm1::open_mouth:penClick(TObject *Sender)
{
ExcelApplication1->Connect();
ExcelApplication1->Visible[0]=true;
}

//Schließen-Schaltfläche wurde gedrückt
void __fastcall TForm1::CloseClick(TObject *Sender)
{
ExcelApplication1->Quit();
ExcelApplication1->Disconnect();
}

// Bearbeiten-Schaltfläche wurde gedrückt
void __fastcall TForm1::editClick(TObject *Sender)
{
TVariantInParam sFile;
const long wbID = 0;

sFile = „C:\Mappe1.xls“;

ExcelApplication1->Workbooks->Add(sFile,wbID);
…
…
}

Wenn ich Bearbeiten-Schaltfläche anklicke, bekomme ich eine Fehlermeldung.

Danke.

#2

Hallo.

ich programmiere gerade mit Borland C++ Builder 5 und möchte
eine Excel-Datei öffnen und beschreiben. Ich hab schon einige
Seiten im Internet durchsucht und Beispiele ausprobiert.

Diese auch: http://www.codeproject.com/info/search.asp?cats=2&se… ?

Das
Öffnen und Schließen von Excel funktioniert, der Zugriff auf
die Arbeitsmappe jedoch nicht.
void __fastcall TForm1::editClick(TObject *Sender)
{
TVariantInParam sFile;
const long wbID = 0;

sFile = „C:\Mappe1.xls“;

–> stimmt der Pfad ?

ExcelApplication1->Workbooks->Add(sFile,wbID);
…
…
}

Wenn ich Bearbeiten-Schaltfläche anklicke, bekomme ich eine
Fehlermeldung.

…die da lautet ?

mfg M.L.

#3

Diese auch:
http://www.codeproject.com/info/search.asp?cats=2&se…?

Jetzt schon, jedoch gibt es da nichts zu der Klasse TExcelApplication, mit der ich den Code programmiert hab.

–> stimmt der Pfad ?

Der Pfad hat tatsächlich nicht ganz gestimmt. Ich hatte ein backslash zu wenig. Statt C:\Mappe1.xls muß man C:\Mappe1.xls schreiben.

Jetzt kann ich die Datei öffnen, aber ich kann kein Wert hineinschreiben. Und zwar versuch ich’s mit folgendem Code:

void __fastcall TForm1::editClick(TObject *Sender)
{
…
…

ExcelWorkbook1->ConnectTo(ExcelApplication1->Workbooks->
Add(sFile, wbID));
ExcelWorksheet1->ConnectTo(ExcelApplication1->Sheets->get_Item(1));
Rng = ExcelWorksheet1->Get_Range(„Probe“,„Probe“);
Rng->set_Value(„Hallo“);
}

Ich bekomme beim Compilieren eine Fehlermeldung:
E2031 Typumwandlung von ‚const TBaseVariantT‘’ nach ‚TVariant&‘ nicht zulässig.

Wenn ich die untere Zeile auskommentieren bekomme ich beim Ausführen eine Fehlermeldung:
(this->getRange(…)Error 800A03EC @ C:\Programme\Borland…\Excel_2K.h\10879

Ich habe im Internet gelesen, dass im Code von dieser Excel_2K.h ein Bug ist. Gibt es da vielleicht updates oder andere Lösungen?

MfG
Lilia