Anwenden einer benutzerdefinierten VB-Aktion auf einen Echtzeit-Layer

Voraussetzung:

Die von Tracking Analyst bereitgestellte benutzerdefinierte VB-Layer-Aktion steht zur Verfügung, wenn Sie die Software ArcGIS for Desktop VBA Resources for Developers, die im ArcGIS for Desktop-Medienpaket enthalten ist, installieren und lizenzieren. Informationen zum Installieren und Lizenzieren finden Sie im Installationshandbuch von ArcGIS for Desktop. Nach der Installation finden Sie in der Hilfe von ArcGIS for Desktop VBA Resources for Developers Anweisungen zur Verwendung des Visual Basic-Editors zur Erstellung von Makros für ArcGIS for Desktop.

Bevor Sie dieses Verfahren durchführen können, müssen Sie mit dem Visual Basic-Editor ein VB-Makro zur Verwendung mit dieser Aktion erstellt haben.

Die benutzerdefinierte VB-Layer-Aktion unterscheidet sich von den anderen Layer-Aktionen, weil sie nur auf Echtzeit-Tracking-Layer angewendet werden kann. Außerdem unterscheidet sie sich von Service-Aktionen, weil sie für einen Tracking-Layer definiert ist, nicht für einen Tracking-Service. VB-Aktionen werden auf Echtzeitereignisse angewendet, wenn sie dem Tracking-Layer hinzugefügt werden, aber sie werden nicht auf Ereignisse angewendet, die vor dem Auslösen der Aktion bereits im Layer vorhanden sind.

Weitere Informationen zu benutzerdefinierten VB-Aktionen für Echtzeit-Tracking-Layer

1. Erstellen Sie mit dem Visual Basic-Editor das VB-Makro, das Sie für den Echtzeit-Tracking-Layer verwenden möchten.
2. Klicken Sie im Fenster Inhaltsverzeichnis mit der rechten Maustaste auf den Tracking-Layer, auf den Sie die Aktion anwenden möchten, und klicken Sie im Kontextmenü auf Eigenschaften. Das Dialogfeld Layer-Eigenschaften wird geöffnet.

   Alternativ dazu können Sie im Inhaltsverzeichnis auf den Tracking-Layer doppelklicken.

3. Klicken Sie im Fenster Layer-Eigenschaften auf die Registerkarte Aktionen.
4. Klicken Sie auf die Schaltfläche Neue Aktion.

   

5. Wählen Sie im Fenster Typ der zu erstellenden Aktion die Option Visual Basic. Die Option Visual Basic ist nur aufgeführt, wenn Sie mit einem Echtzeit-Tracking-Layer arbeiten.

   

6. Klicken Sie in das Textfeld, und geben Sie einen Namen für die Aktion ein. Klicken Sie dann auf OK, um das Aktionsparameterformular zu starten.
7. Klicken Sie im Dialogfeld Visual-Basic-Aktionsparameter auf den Dropdown-Pfeil Projekt, und wählen Sie entweder Projekt oder Normal aus.

   

Ein im Ordner "Normal" gespeichertes Makro wirkt sich auf alle in ArcMap geöffneten Dokumente aus. Ein Makro, das sich im Ordner "Projekt" befindet, wirkt sich nur auf das aktuelle Kartendokument aus.

8. Klicken Sie auf den Dropdown-Pfeil der Option Modul, und wählen Sie das Modul aus, in dem das Makro enthalten ist.

Der Standardmodulname im Visual Basic-Editor ist ThisDocument.

9. Klicken Sie auf den Dropdown-Pfeil der Option Makro, und wählen Sie den Namen des zu verwendenden Makros aus.

   Falls Sie bereits ein VB-Makro erstellt und in diesem Modul gespeichert haben, wird es in der Liste angezeigt.

10. Legen Sie den Trigger für die Aktion fest. Klicken Sie unter Auslöser für Aktion auf die gewünschte der unten angegebenen Optionen, und führen Sie die weiteren Schritte zum Festlegen des Triggers aus:

    Immer	Die Aktion wird immer ausgelöst.
    Attributabfrage	Die Aktion wird basierend auf den Attributkriterien ausgelöst. Informationen zum Festlegen eines Attribut-Triggers
    Lagebezogene Abfrage	Die Aktion wird basierend auf den lagebezogenen Kriterien ausgelöst. Informationen zum Festlegen eines lagebezogenen Triggers
    Attribut- UND lagebezogene Abfrage	Die Aktion wird basierend auf einer Kombination aus attribut- und lagebezogenen Kriterien ausgelöst.

11. Klicken Sie nach dem Festlegen des Triggers für die Aktion auf OK, um die Aktion zu erstellen.
12. Die neue Aktion wird in der Liste der Layer-Aktionen angezeigt. Falls in der Liste weitere Layer-Aktionen angezeigt werden, können Sie diese mithilfe der Pfeilschaltflächen verschieben und so die Reihenfolge festlegen, in der sie auf den Tracking-Layer angewendet werden sollen. Sie können Layer-Aktionen in der Liste auch aktivieren bzw. deaktivieren, indem Sie das entsprechende Kontrollkästchen aktivieren oder deaktivieren.

    

13. Klicken Sie im Dialogfeld Layer-Eigenschaften auf Übernehmen oder auf OK, um alle Änderungen zu übernehmen.

Tipp:

Von dieser Aktion verwendete VB-Makros müssen dem Format der Echtzeit-Tracking-Daten entsprechen. Einige einfache VB-Makros als Hilfe finden Sie hier:

Dieses Makro zeigt das fünfte Feld einer eingehenden Datenmeldung auf der ArcMap-Statusleiste an. Dieses Makro wird für alle eingehenden Ereignisse ausgeführt, die die Trigger-Kriterien der Aktion erfüllen.

Public Sub StatusBarMacro(ParamArray varArgs() As Variant)
    Application.StatusBar.Message(0) = varArgs(5)
End Sub

Dieses Makro zeigt das dritte Feld einer eingehenden Datenmeldung in einem Meldungsfeld an. Dieses Makro wird für alle eingehenden Ereignisse ausgeführt, die die Trigger-Kriterien der Aktion erfüllen.

Public Sub MessageBoxMacro(ParamArray varArgs() As Variant)
    MsgBox varArgs(3)
End Sub

Achtung:

Gehen Sie beim Verwenden der benutzerdefinierten VB-Aktion mit Bedacht vor. Wenn Sie das oben als Beispiel angegebene Makro mit dem Meldungsfeld beispielsweise für einen Echtzeit-Datenfeed mit Tausenden von Datensätzen verwenden und alle Datensätze die Trigger-Kriterien für die Aktion erfüllt, müssen Sie für jedes einzelne Ereignis ein Meldungsfeld schließen.

Feedback zu diesem Thema?