From cf8469da9786a80400c11b688f6cda06e017ad3a Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 4 May 2021 16:30:47 +0200 Subject: [PATCH] ZooFLow: remove SaveData implements --- GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.vb | 2 +- GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb | 6 ++---- 2 files changed, 3 insertions(+), 5 deletions(-) diff --git a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.vb b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.vb index 037dae24..59374466 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_IDBEntity.vb @@ -49,7 +49,7 @@ Public Class frmAdmin_IDBEntity End If End Sub - Public Function SaveData() As Boolean Implements IAdminForm.SaveData + Public Function SaveData() As Boolean Try TBIDB_BUSINESS_ENTITYBindingSource.EndEdit() diff --git a/GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb b/GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb index 6769f1d6..78a9fe59 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.vb @@ -69,10 +69,8 @@ Public Class frmAdmin_SourceSQL Return oControlList End Function - Public Function SaveData() As Boolean Implements IAdminForm.SaveData + Public Function SaveData() As Boolean Try - - TBZF_ADMIN_SOURCE_SQLBindingSource.EndEdit() If DSIDB_Stammdaten.TBZF_ADMIN_SOURCE_SQL.GetChanges() IsNot Nothing Then @@ -91,7 +89,7 @@ Public Class frmAdmin_SourceSQL Return True Catch ex As Exception ShowErrorMessage(ex) - Return False + Return False End Try End Function