Imports C1.Win.C1TrueDBGrid

Public Class frmDomainEditorPhase
    Inherits frmDomainEditor

    Sub New()
        MyBase.New("lc_phase")
        ' Dieser Aufruf ist für den Designer erforderlich.
        InitializeComponent()

        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.

    End Sub

    Private Sub frmDomainEditorPhase_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        conn.CloseConnection(True)
    End Sub

    Private Sub frmDomainEditorPhase_Load(sender As Object, e As EventArgs) Handles Me.Load

    End Sub

    Private Sub C1Phasen_DoubleClick(sender As Object, e As EventArgs) Handles C1Daten.DoubleClick
        Dim f As New frmPhaseStammDetail
        f.txtphase.Text = C1Daten.Columns("Bezeichnung").Value
        f.txtBeschreibung.Text = C1Daten.Columns("Beschreibung").Value.ToString
        f.ShowDialog()
        If f.DialogResult = Windows.Forms.DialogResult.OK Then
            Me.C1Daten.Columns("Bezeichnung").Value = f.txtphase.Text
            Me.C1Daten.Columns("Beschreibung").Value = f.txtBeschreibung.Text
        End If
    End Sub

End Class