Moin,
ich benötige zur selben Zeit zwei Formulare.
Ziel ist es, aus dem Ursprungsformular den RtfEditor zu öffnen und daneben das Formular mit den Rezept Zutaten.
Bei Variante 1 bockiert das RtfEditor Formular die Rezept Zutaten, bei Variante 2 wird RtfEditor Formular kurz angezeigt und gleich wieder geschlossen. (Variante 1 oder 2 sind aktiv, nicht beide zusammen)
RtfEditor muss mit ShowDialog geöffnet werden, da ich beim Schließen des Formulars den Rückgabewert auf Änderungen überprüfen und speichern muss.
Grüße
ich benötige zur selben Zeit zwei Formulare.
Ziel ist es, aus dem Ursprungsformular den RtfEditor zu öffnen und daneben das Formular mit den Rezept Zutaten.
Bei Variante 1 bockiert das RtfEditor Formular die Rezept Zutaten, bei Variante 2 wird RtfEditor Formular kurz angezeigt und gleich wieder geschlossen. (Variante 1 oder 2 sind aktiv, nicht beide zusammen)
RtfEditor muss mit ShowDialog geöffnet werden, da ich beim Schließen des Formulars den Rückgabewert auf Änderungen überprüfen und speichern muss.
VB.NET-Quellcode
- Dim Cell = .Rows(e.RowIndex).Cells(Tables.tbl_Recipes.Columns.RecipeText)
- Dim Value = If(Cell Is Nothing OrElse Cell.Value Is Nothing, String.Empty, Cell.Value.ToString)
- Dim Frm_Ingredients As New frm_Data_Food_RecipeIngredients(Me.Connection, ID, Nothing, Control.ModifierKeys = Keys.Control)
- Frm_Ingredients.Show(Me) 'Variante 1, Owner ist Ursprungsformular
- Using Frm As New frm_RtfEditor(Var,
- New frm_RtfEditor.Configuration.Data(Value),
- frm_RtfEditor.Configuration.EditMode.Values.RtfOnly,
- frm_RtfEditor.Configuration.TextMode.Values.AsRtf)
- Frm_Ingredients.Show(Frm) 'Variante 2, Owner = aufgerufenes Formular
- Frm.ShowDialog(Me)
- Cell.Value = If(Frm.Data.RealTextLenght = 0, String.Empty, Frm.Data.Text)
- If Not Value.Equals(Frm.Data.Text) Then tsb_Save.PerformClick()
- End Using
- 'With Frm_Ingredients
- ' .Close()
- ' .Dispose()
- 'End With
Grüße