You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

88 lines
4.1 KiB

Public Class Generic_Event_Handler
Public Event Berechtigungen_TreeStruktur_Droped()
Public Event MainObject_Saved(ByVal Keyvalue As Integer, ByVal parentid As Integer)
Public Event Strucktur_Changed(ByVal keyvalue As Integer, ByVal treehandle As Integer)
Public Event MainObject_Deleted(ByVal keyvalue As Integer, ByVal keyvalueparent As Integer)
Public Event MainObject_Created(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
Public Event Export_Vorbereiten_Clicked(ByVal Type As String, ByVal Bezeichnung As String, ByVal Keyvalue As String)
Public Event Set_ToolTip(ByVal formname As String, ByVal ctlname As String)
Public Event Node_Moved(ByVal onode As Object, dnode As Object, treehandle As Object)
Public Event Object_Saved(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
Public Event Object_Deleted(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
Public Event Icon_Changed(ByVal keyvalue As Integer, ByVal Iconid As Integer)
Public Event Object_Delete(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
Public Event Node_Droppend()
Public Event Select_to_MoveCopy(ByVal move As Boolean, grid As Object, ByVal sourcekey As Integer)
Public Event Refresh_Selectednodes()
Public Event Update_TreeSearch(ByVal parentform As Object)
Public Function Fire_Berechtigungen_TreeStruktur_Droped()
RaiseEvent Berechtigungen_TreeStruktur_Droped()
End Function
Public Function Fire_MainObject_Saved(ByVal Keyvalue As Integer, ByVal Parentid As Integer)
RaiseEvent MainObject_Saved(Keyvalue, Parentid)
End Function
Public Function Fire_Struktur_Changed(Optional keyvalue As Integer = -1, Optional treehandle As Integer = 0)
RaiseEvent Strucktur_Changed(keyvalue, treehandle)
End Function
Public Function Fire_MainObjectDeleted(ByVal Keyvalue As Integer, ByVal keyvalueparent As Integer)
RaiseEvent MainObject_Deleted(Keyvalue, keyvalueparent)
End Function
Public Function Fire_MainObject_Created(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
RaiseEvent MainObject_Created(Keyvalue, Parentid, parentform)
End Function
Public Function Fire_Export_Vorbereiten_Clicked(ByVal Type As String, ByVal Bezeichnung As String, ByVal keyvalue As String)
RaiseEvent Export_Vorbereiten_Clicked(Type, Bezeichnung, keyvalue)
End Function
Public Function Edit_Tooltip(ByVal formname As String, ByVal ctlname As String)
RaiseEvent Set_ToolTip(formname, ctlname)
End Function
Public Function Fire_Node_Moved(ByVal onode As Object, ByVal dnode As Object, ByVal treehandle As Object)
RaiseEvent Node_Moved(onode, dnode, treehandle)
End Function
Public Function Fire_Object_saved(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
RaiseEvent Object_Saved(Keyvalue, Parentid, parentform)
End Function
Public Function Fire_Object_Deleted(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
RaiseEvent Object_Deleted(Keyvalue, Parentid, parentform)
End Function
Public Function Fire_Icon_Changed(ByVal Keyvalue As Integer, ByVal IconID As Integer)
RaiseEvent Icon_Changed(Keyvalue, IconID)
End Function
Public Function Fire_Object_Delete(ByVal Keyvalue As Integer, ByVal Parentid As Integer, ByVal parentform As Object)
RaiseEvent Object_Delete(Keyvalue, Parentid, parentform)
End Function
Sub Fire_Node_Droped()
RaiseEvent Node_Droppend()
End Sub
Public Function Fire_Select_to_Move_Copy(ByVal move As Boolean, grid As Object, ByVal sourcekey As Integer)
RaiseEvent Select_to_MoveCopy(move, grid, sourcekey)
End Function
Public Function Fire_Refresh_SelectedNodes()
RaiseEvent Refresh_Selectednodes()
End Function
Public Function Fire_Update_Treesearch(ByVal parentform As Object)
RaiseEvent Update_TreeSearch(parentform)
End Function
Public Datacolleation As New Collection
End Class