Freigeben über

VFPXMLProgID-Eigenschaft

  • Artikel

Verweist auf eine COM-Komponente, die verwendet werden kann, um die Funktionalität der internen XML-Funktionen außer Kraft zu setzen.

_VFP.VFPXMLProgID [=cValue]

Parameter

  • cValue
    Gibt die ProgID der COM-Komponentenklasse an, deren Funktionen die Funktionalität der internen Visual FoxPro XML-Funktionen (CURSORTOXML( ), XMLTOCURSOR( ) oder XMLUPDATEGRAM( )) überschreiben. Wird für cValue die leere Zeichenfolge ("") festgelegt, wird die Eigenschaft auf die internen XML-Funktionen zurückgesetzt.

Hinweise

Die Klasse muss die IVFPXML-Schnittstelle von Visual FoxPro implementieren. Die COM-Komponente kann in Visual FoxPro, Visual C/C++, Visual Basic oder einen beliebigen Entwicklungstool erstellt werden, das COM-Komponenten mit der Fähigkeit zur Implementierung von Schnittstellen erstellt. Der Standardwert ist "", was bedeutet, dass die internen Implementierungen dieser Funktionen verwendet werden.

Um Methoden zum Überschreiben zur Verfügung zu stellen, führen Sie den Objektkatalog aus und ziehen Sie in der Typbibliothek von Microsoft Visual FoxPro 7.0 die IVFPXML-Schnittstelle auf ein Programm.

Beispiel

Erstellen Sie in einem Projekt mit dem Namen MyXMLproj eine Klasse, die folgende Elemente enthält:

DEFINE CLASS MyXMLclass AS session OLEPUBLIC
   
   IMPLEMENTS IVFPXML IN "VisualFoxPro.Application.7"
   
   PROCEDURE IVFPXML_CursorToXML(bstrAlias AS STRING, ;
      nOutputFormat AS Number, nFlags AS Number, ;
      nRecords AS Number, bstrOutputFile AS STRING, ;
      bstrSchema AS STRING, bstrSchemaLocation AS STRING, ;
      bstrNameSpace AS STRING, pVFP AS VARIANT) AS VARIANT ;
      HELPSTRING "Converts from a Cursor to XML"
       * add user code here
   ENDPROC

   PROCEDURE IVFPXML_XMLToCursor(pvarXMLSource AS VARIANT, ;
      bstrCursorName AS STRING, nFlags AS Number, pVFP AS VARIANT) ;
      AS Number HELPSTRING "Converts from XML to a Cursor"
       * add user code here
   ENDPROC
   
   PROCEDURE IVFPXML_XMLUpdateGram(nFlags AS Number, ;
      bstrCursorList AS STRING, pVFP AS VARIANT) AS VARIANT;
      HELPSTRING "Generates an XML UpdateGram"
       * add user code here
   ENDPROC
ENDDEFINE

Fügen Sie den drei Methoden Ihren benutzerspezifischen Funktionshandler hinzu, und setzen Sie die VFPXMLProgID-Eigenschaft auf Ihre ProgID.

Siehe auch

_VFP-Systemvariable | Anzeigen der Informationen einer Typbibliothek | XML-Funktionen | Visual FoxPro und XML | CursorToXML( )-Funktion | XMLToCursor( )-Funktion | XMLUpdateGram( )-Funktion