OLE OLEAutomation mit VFP Einsatz von Active X

OLE/ OLE-Automation mit VFP Einsatz von Active. X Controls

Allgemeines zu OLE/Active. X n n OLE = „Object Linking and Embedding“ Nutzung in VFP über verschiedene Wege – – – n Objektfelder in Tabellen Olebound-Control-Steuerelemente Olecontrol Active-X Steuerelemente OLE-Automatisierung (programmatisch) © 1999 TMN-Systemberatung Gmb. H

Verknüpfen bzw. Einbetten von Objektfeldern n Objektfelder aus Tabellen können über das Steuerelement OLEBOUNDCONTROL (gebundenes Active. X-Steuerelement) auf einer Form plaziert werden n WICHTIG: Objekte (z. B. WAVE-Datei) können - eingebettet (Kopie der Datei im Objektfeld) - verknüpft werden (Link zur Originaldatei) © 1999 TMN-Systemberatung Gmb. H

Unterschiede verknüpft / eingebettete Objektdaten n Verknüpfte Objektdateien – – n Änderungen an der Originaldatei sind auch in der Form zu sehen. Doppelclick auf das Steuerelement erlaubt keine direkte Bearbeitung des Objekts auf der Form. eingebettete Objektdateien – – Objekt komplett im Objektfeld der Tabelle. Doppelclick erlaubt direkte Bearbeitung, Menü wird automatisch umgestellt. © 1999 TMN-Systemberatung Gmb. H

Hinzufügen von OLE-Objekten zu Tabellen n n Tabelle erstellen mit einem Feld o. Feld, Typ „OBJEKT“ Einfügen von Daten über - Menüpunkt „Bearbeiten“-“Objekt Einfügen“ - Befehle APPEND GENERAL bzw. MODIFY GENERAL Bsp. : APPEND GENERAL o. Feld from brief 1. doc LINK © 1999 TMN-Systemberatung Gmb. H

Hinzufügen von OLE-Objekten zu Formularen n Im Formular-Designer über - „gebundenes Ole-Steuerelement“ (OLEBOUNDCONTROL) n in einer Methode thisform. addobject(„octrl“, “oleboundcontrol“) thisform. octrl. controlsource = o. Feld Thisform. octrl. visible =. t. © 1999 TMN-Systemberatung Gmb. H

Bearbeiten von Objekten durch OLE-Automatisierung n Automatisierung von Microsoft Word ab Version 8. 0 sinnvoll möglich. Vorsicht bei alten Word Versionen: – – – Versionen vor Word 97 haben kein durchgängiges Objektmodell Bei diesen Versionen sollten Sie lieber DDE statt OLE Automation verwenden ! Länderversionen führen teilweise zu übersetzten Befehlsaufrufen insbesondere bei DDE-Funktionen z. B. „Speichern“ statt „Save“ Ausweg: sys(3004), SYS(3005, 1033), sys(3006) © 1999 TMN-Systemberatung Gmb. H

WORD Automatisieren o. Doc = createobject(„word. application“) sys(3005, 1033) && englisch!!!!! o. Doc. documents. open(„brief 1. doc“) o. Doc. activedocument. saveas(„neuerbrief. doc“) o. Doc. visible = „true“ o. Doc. activate() Achtung: - createobject erzeugt jedesmal eine neue Instanz von Word Getobject gibt ein neues Objekt zurück, wenn Word bereits gestartet war - sonst erzeugt der Aufruf einen Fehler - benannte Parameter können den Methoden des Objekts nur übergeben werden, wenn Sie die Headerdateien einbinden. In der Regel Übergabe von VFP als Wert. © 1999 TMN-Systemberatung Gmb. H

WORD-Objektmodell © 1999 TMN-Systemberatung Gmb. H

Informationen zur WORD-OLE n n n Datei POSITION. HLP s. Unterlagen Datei POSIT 32. TXT s. Unterlagen Datei WINWORD 8. H s. Unterlagen MSDN Hilfedatei VBAWRD 8. HLP Office-Professional Dokumentation (CD Durchsuchen!! Infos werden normalerweise nicht mit installiert. ) © 1999 TMN-Systemberatung Gmb. H

EXCEL Automatisieren o. Doc = createobject(„excel. application“) sys(3005, 1033) && englisch !! o. Doc. workbooks. open(getfile("XLS")) o. Doc. activeworkbook. saveas("neu. XLS") o. Doc. visible = "true" o. Doc. activate() Achtung: -createobject erzeugt jedesmal eine neue Instanz von EXCEL getobject gibt ein neues Objekt zurück, wenn EXCEL bereits gestartet war - sonst erzeugt der Aufruf einen Fehler. - benannte Parameter können den Methoden des Objekts nur übergeben werden, wenn Sie die Headerdateien einbinden. In der Regel Übergabe von VFP als Wert. © 1999 TMN-Systemberatung Gmb. H

EXCEL Objektmodell © 1999 TMN-Systemberatung Gmb. H

Informationen zur EXECL-OLE n n n MSDN Hilfe-Datei VBAXL 8. hlp Office-Professional Dokumentation (CD Durchsuchen!! Infos werden normalerweise nicht mit installiert © 1999 TMN-Systemberatung Gmb. H

Objektmodelle der OLE-Server n n Zentrales Problem bei der OLE-Automatisierung ist die Beschaffung des Objektmodells d. h. Die Dokumentation über die Eigenschaften und Methoden des verwendeten OLE-Objekts. Ansonsten: MSDN, Knowledgebase, Hersteller. . . © 1999 TMN-Systemberatung Gmb. H

Active. X n n n Active. X Controls können Sie direkt über die Form/Class Designer Steuerelemente Toolbar hinzufügen. (angezeigt werden nur die Active. XKomponenten die unter EXTRAS-OPTIONEN aktiviert wurden). Active. X werden als Ole. Control eingefügt. Häufig liegt die Dokumentation der Active. XKomponenten auf der rechten Maustaste im Form-Designer. Hiermit kann man auch die wichtigsten Eigenschaften gezielt einstellen. © 1999 TMN-Systemberatung Gmb. H

Active. X n _VFP. Auto. Yield =. F. – n n Active. X Waitstate, On. Key. Label/Mouse Queue, SET ESCAPE OFF, Queries ohne Pause, kein Switch-Back zu VFP Verschiedene Eigenschaften von Active. X Controls sind nur über „Object“ erreichbar. Bsp. : ole. Kalender. Object. value Sie können Active. X Elemente vererben, indem Sie diese in VFP Klassen packen. © 1999 TMN-Systemberatung Gmb. H

Active. X n SYS(2333) – n SYS(3004 / 3005) – – n VTABLE-Binding bzw. Dual. Interface-Support Return / Set Locale ID 1029 Czech, 1031 Deutsch, 1033 Englisch, 1034 Spanisch, 1036 Franz. , 1040 Ital. , 1045 Polnisch, 1046 Brasilianisch, 2070 Portugiesisch (Def) OLECID setzt nur Interface © 1999 TMN-Systemberatung Gmb. H

Active. X n n n Active. X Controls können mit dem VFP Debugger problemlos debugged werden. Sie können in VFP eigentlich fast alle verfügbaren Active. X Controls einsetzen Der Active. X-Markt boomt Erheblicher Zeitbedarf für Sichtung und Test Sie müssen sich bei jedem Control in dessen Objektmodell einarbeiten und sind daher auf eine gute Hilfe/Dokumentation angewiesen. © 1999 TMN-Systemberatung Gmb. H

Zusammenfassung n n n OLE in VFP Word und Excel OLE Automation Active. X Controls einsetzen © 1999 TMN-Systemberatung Gmb. H

Anregungen und Fragen TMN-Systemberatung Gmb. H Allee 62 74072 Heilbronn http: //www. tmn-systemberatung. de info@tmn-systemberatung. de © 1999 TMN-Systemberatung Gmb. H