Interface der KarteiBL

Home  Zurück  Weiter

Die Karteikarten-Betriebslogik (KarteiBL) stellt eine Reihe von Methoden und Ereignissen bereit, auf die mit einer Zusatzprogrammierung reagiert werden kann.

Die folgende Tabelle zeigt, welche bisherigen Multiapplication-Prozeduren in etwa welchen Developer-Ereignissen entsprechen:

Interface

Auf die folgenden Eigenschaften, Methoden und Ereignisse der Schnittstelle IKarteiBL kann mit den Zusatzprogrammierungen zugegriffen werden:

'Aktuelle Datensatzposition:

ReadOnly Property DataPosition() As Integer

'Anzahl der ausgewählten Datensätze:

ReadOnly Property DataCount() As Integer

 

'Gibt das aktuelle GIS Objekt zurück:

Function GetGis() As Gis.IGisData

'Gibt die DialogID aus der GCF-Datei zurück:

Function GetDialogID() As Long

'Gibt die Tabelle der Karteikarte zurück:

Function GetDialogTableName() As String

 

'Hauptselektion (Alle ausgewählten Datensätze

Function GetSelectionNameMain() As String

'Aktueller Datensatz

Function GetSelectionNameCurrent() As String

'Aktueller Datensatz aus der optionalen Grafiktabelle

Function GetSelectionNameCurrentGrafik() As String

'Gibt den Selektionsnamen zu einem Control z.B. DialogBox

Function GetSelectionNameControl(ByVal ctlID As Long) As String

'Gibt die Selektion zu einer Basistabelle. Für z.B. Altlasten_Bilder wird die zugehörige Controlselection zurückgegeben

Function GetSelectionNameFromBaseTable(ByVal baseTableName As String) As String

 

'Falls der Dialog schon aufgebaut ist, kann man über diese Funktion Werte in Controls ändern.

Sub SetControlValue(ByVal ctlID As Long, ByVal value As String, ByRef exMsg As String)

'Falls der Dialog schon aufgebaut ist, kann man über diese Funktion Werte aus Controls auslesen.

Function GetControlValue(ByVal ctlID As Long) As String

'Falls der Dialog schon aufgebaut ist, kann man über diese Funktion Controls sichtbar oder unsichtbar schalten.

Sub SetControlVisible(ByVal ctlID As Long, ByVal visible As Boolean)

'Diese Funktion wirkt wie der Übernehmen Button auf der Kartei

Sub ApplyData()

'Diese Funktion schließt alle Dialoge und ruft die Autokartei von GeoAS auf

Sub ShowMapBasicAutokartei()

 

'Sind die Updatefunktionen deaktiviert wird dieses Ereignis geworfen und man kann disable auf true setzen --> Funktionen werden doch ausgeführt!

Event DisableNoDialogOpenUpdate(ByRef disable As Boolean)

'Benutzer ändert Wert einer Checkbox

Event CheckBoxExecute(ByVal ctlID As Long, ByVal value As Boolean)

'Benutzer klickt auf OK

Event DialogOK(ByRef cancel As Boolean)

'Die Liste einer DialogBox wurde aktualisiert.

Event AfterDialogDataRefreshed()

'Vor dem Öffnen der Kartei (optional Abbruch möglich)

Event BeforeDialogOpen(ByRef cancel As Boolean)

'Nach dem Öffnen der Kartei (kein Abbruch möglich)

Event AfterDialogOpen()

'Vor dem Füllen der Daten in die Steuerelemente

Event BeforeDialogSet()

'Nach dem Füllen der Daten in die Steuerelemente

Event AfterDialogSet()

'Neuer Primärschlüssel wurde vergeben      

Event NewAutoKeyValueSet()

'Ein neuer Unterdatensatz wurde angelegt

Event NewSubObjectExecute() '

 

'Event DialogBoxRefresh(ByVal ctlInfo As CFGControlInfo)

 

'Event AfterUpdateExecute()

'Event ObjectDelete()

 

'ALK Intern

Event SpecialSelectExecute(ByVal specialLink As String, ByVal selectionName As String)

Event SpecialSelectGetVonTab(ByVal specialLink As String, ByRef vonTabName As String)

Event SpecialSelectGetNachTab(ByVal specialLink As String, ByRef nachTabName As String)

 

'Frage ob Button aktiviert ist

Event SpecialButtonGetEnabled(ByVal ctlID As Long, ByVal specialAction As String, ByRef enabled As Boolean)

'Eventuell Beschriftung dynamisch erzeugen (z.B. Kanal)

Event SpecialButtonGetCaption(ByVal ctlID As Long, ByVal specialAction As String, ByRef caption As String)

'Ereignis wenn auf Button geklickt wird

Event SpecialButtonExecute(ByVal ctlID As Long, ByVal specialAction As String)