Ole Error in TurboC++ Explorer
-
Hallo zusammen,
in TurboC++ möchte ich eine externe Bibliothek (ActiveX) nutzen. Dazu habe ich -ganz nach Hersteller Anweisung- die Bibliothek installiert. Ich habe dann ein Beispiel des Herstellers in ein VCL Projekt kopiert.
Hier der Code#include <vcl.h> #pragma hdrstop #include "Unit1.h" #include "utilcls.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { // Clear the list box ListBox1->Clear(); // Create the FUNCky Server Browsing object Variant Servers = Variant::CreateObject("FUNCkyFindServer"); // Find the first server Servers.OleFunction("FindFirst", ""); // While there are servers to be found while( Servers.OlePropertyGet("Found")) { // Add them to the list box ListBox1->Items->Add( Servers.OlePropertyGet("Name") + String(" ") + Servers.OlePropertyGet("Comment")); Servers.OleFunction("FindNext"); } // Destroy FUNCky Server object Servers = Unassigned; } //-----------------------------------------
Das Projekt compiliert und startet ordnungsgemäss. Wenn ich auf Button1 clicke bekomme ich fogende Fehlermeldung:"Im Projekt Funkb ist eine Exception der Klasse EOleSysError mit der Meldung 'Ungültige Klassenzeichreihenfolge' aufgetreten." Wenn ich dann Anhalten anklicke wird mir die Zeile
Variant Servers = Variant::CreateObject("FUNCkyFindServer");
farbig unterlegt angezeigt.
Weiss jemand, was das bedeutet ?
Chris