Probleme mit dem Drucken von XML

  • VB.NET
  • .NET (FX) 4.5–4.8

Es gibt 15 Antworten in diesem Thema. Der letzte Beitrag () ist von VaporiZed.

    Probleme mit dem Drucken von XML

    Moin moin

    Ich bekomme das hier mit dem Ausdruck von XML-Dateien nicht hin. Die Druckvorschau klappt nicht.
    Beim Drucken; Entweder wird nur eine Seite gedruckt, oder so wie jetzt alles übereinander...
    Das ganze Thema "drucken" ist echt kompliziert. ;(

    Spoiler anzeigen


    Der VB - Code nicht mehr gültig. neuer aktl. Code unten.

    Aufbau der XML-Datei

    XML-Quellcode

    1. <Notizen>
    2. <IDPerson>4</IDPerson>
    3. <Datum>16.06.2024</Datum>
    4. <HeadLine>Lorem Ipsum</HeadLine>
    5. <Message>Lorem ipsum dolor sit amet, consetetur sadipscing elitr</Message>
    6. </Notizen>

    Bilder

    • druck-1.jpg

      216,95 kB, 1.286×337, 207 mal angesehen
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Amelie“ ()

    Amelie schrieb:

    Das ganze Thema "drucken" ist echt kompliziert.
    Hast Du mal hier reingeschaut:
    Drucken mehrseitiger Dokumente
    Was ist EnvAeraInstance?
    Was ist LoSaInstance?
    ====
    Wieso verwendest Du nicht die in den Designer-Tools angebotenen Objekte?
    Wieso erstellst Du in jeder Click-Routine eine separate PrintDocument-Instanz?
    Dialoge werden in einer Using-Anweisung instanziiert und zerstört.
    ...
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „RodFromGermany“ ()

    Hallo
    Ja da habe ich schon öfters reingeschaut, hat auch für das drucken von DGV und Chart geholfen.
    Das andere sind 2 Instanzen von Singelton Klassen wo nur ein Wert geholt wird. Pfad wo die XML liegt usw...

    EDIT: 15:45 Uhr ... Ich glaube ich habs .... :S Mal ausgibig Testen.


    Es will einfach nicht mit dem Seitenumbruch funktionieren. :(
    Entweder kommt nur eine Seite wo dann Text fehlt ODER es werden 2 Seiten erstellt aber auf Seite 1 wird der Text abgeschnitten und Seite 2 bleibt bis auf die Seitenüberschrift leer!


    Code geändert!
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Public Class PrintNotizen
    2. Private ReadOnly EnvAeraInstance As EnvironmentArea = EnvironmentArea.Instance
    3. Private WithEvents LoSaInstance As LoadSaveNotice = LoadSaveNotice.Instance
    4. Public Font As New Font("Segoe UI", 10, FontStyle.Regular)
    6. Private entries As New List(Of String)
    7. Private Const entriesPerPage As Integer = 10 ' Anzahl der Einträge pro Seite
    8. Private currentPageIndex As Integer = 0 ' Aktuelle Seitenzahl
    9. Private currentEntryIndex As Integer = 0 ' Aktueller Index für die Einträge
    11. Public Sub PrintNotiz()
    12. ' Pfad zur XML-Datei
    13. Dim xmlFilePath As String = Path.Combine(EnvAeraInstance.AppDataDirectory, LoSaInstance.Filename)
    14. Debug.WriteLine($"Datei: {xmlFilePath}")
    16. ' Prüfen, ob die Datei existiert
    17. If Not File.Exists(xmlFilePath) Then
    18. MessageBox.Show("XML-Datei nicht gefunden.", "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Error)
    19. Return
    20. End If
    22. ' XML-Datei laden
    23. Dim xmlDoc As New XmlDocument()
    24. xmlDoc.Load(xmlFilePath)
    26. ' Daten aus der XML-Datei lesen und formatieren
    27. Dim stringBuilder As New StringBuilder()
    29. Dim root As XmlNode = xmlDoc.DocumentElement
    31. ' Die einzelnen Einträge sammeln
    32. For Each notiz As XmlNode In root.SelectNodes("Notizen")
    33. Dim idPerson As String = $"{notiz.SelectSingleNode("IDPerson").InnerText} {Environment.UserName}"
    34. Dim datum As String = notiz.SelectSingleNode("Datum").InnerText
    35. Dim headLine As String = notiz.SelectSingleNode("HeadLine").InnerText
    36. Dim message As String = notiz.SelectSingleNode("Message").InnerText
    38. stringBuilder.AppendLine($"ID: {idPerson} Datum: {datum}")
    39. stringBuilder.AppendLine($"Betreff: {headLine}")
    40. stringBuilder.AppendLine(message)
    41. stringBuilder.AppendLine($" ")
    43. ' Eintrag zur Liste hinzufügen
    44. 'entries.Add(stringBuilder.ToString().Trim())
    45. entries.Add(stringBuilder.ToString())
    46. stringBuilder.Clear()
    47. Next
    49. ' Druckvorgang initialisieren
    50. Dim printDoc As New PrintDocument()
    51. ' Seitenränder festlegen (in Hundertstel Zoll)
    52. printDoc.DefaultPageSettings.Margins.Left = 50
    53. printDoc.DefaultPageSettings.Margins.Right = 30
    54. printDoc.DefaultPageSettings.Margins.Top = 30
    55. printDoc.DefaultPageSettings.Margins.Bottom = 20
    57. AddHandler printDoc.PrintPage, AddressOf Me.PrintPageHandler
    59. ' Druckdialog anzeigen
    60. Dim printDialog As New PrintDialog()
    61. printDoc.DocumentName = LoSaInstance.Filename
    62. printDialog.Document = printDoc
    64. If printDialog.ShowDialog() = DialogResult.OK Then
    65. currentPageIndex = 0 ' Zurücksetzen der Seitenzählung
    66. currentEntryIndex = 0 ' Zurücksetzen des Eintragsindex
    67. printDoc.Print() ' Drucken initiieren
    68. End If
    69. End Sub
    71. Private Sub PrintPageHandler(sender As Object, e As PrintPageEventArgs)
    72. Dim startX As Single = e.MarginBounds.Left
    73. Dim startY As Single = e.MarginBounds.Top
    74. Dim lineHeight As Single = Me.Font.GetHeight(e.Graphics)
    75. Dim currentY As Single = startY
    77. ' Seitenüberschrift
    78. Dim headerText As String = $"Seitenüberschrift - Seite {currentPageIndex + 1}"
    79. Dim headerFont As New Font(Me.Font.FontFamily, 12, FontStyle.Bold)
    80. Dim headerBrush As New SolidBrush(Color.Gray)
    82. ' Zeichnen der Seitenüberschrift
    83. Dim headerSize As SizeF = e.Graphics.MeasureString(headerText, headerFont)
    84. Dim headerX As Single = startX + (e.MarginBounds.Width - headerSize.Width) / 2
    85. e.Graphics.DrawString(headerText, headerFont, headerBrush, headerX, currentY)
    86. currentY += headerSize.Height + lineHeight
    88. ' Text für diese Seite drucken
    89. Dim remainingLines As Integer = e.MarginBounds.Height \ CInt(lineHeight)
    90. Dim linesPrinted As Integer = 0
    92. While currentEntryIndex < entries.Count AndAlso linesPrinted < remainingLines
    93. Dim currentPageText As String = entries(currentEntryIndex)
    94. Dim lines() As String = SplitTextIntoLines(currentPageText, e.Graphics, e.MarginBounds.Width)
    96. For Each line As String In lines
    97. If linesPrinted < remainingLines Then
    98. Dim textSize As SizeF = e.Graphics.MeasureString(line, Me.Font)
    99. If currentY + textSize.Height <= e.MarginBounds.Bottom Then
    100. e.Graphics.DrawString(line, Me.Font, Brushes.Black, startX, currentY)
    101. currentY += textSize.Height
    102. linesPrinted += 1
    103. Else
    104. e.HasMorePages = True
    105. currentPageIndex += 1
    106. Return
    107. End If
    108. Else
    109. e.HasMorePages = True
    110. Return
    111. End If
    112. Next
    114. currentEntryIndex += 1
    115. End While
    117. ' Wenn alle Einträge gedruckt wurden
    118. If currentEntryIndex >= entries.Count Then
    119. e.HasMorePages = False
    120. End If
    121. End Sub
    123. Private Function SplitTextIntoLines(text As String, graphics As Graphics, maxWidth As Single) As String()
    124. Dim lines As New List(Of String)()
    125. Dim words() As String = text.Split(" "c)
    127. Dim currentLine As String = ""
    128. For Each word As String In words
    129. Dim testString As String = If(currentLine.Length = 0, word, $"{currentLine} {word}")
    130. Dim size As SizeF = graphics.MeasureString(testString, Me.Font)
    132. If size.Width <= maxWidth Then
    133. If currentLine.Length = 0 Then
    134. currentLine = word
    135. Else
    136. currentLine += " " & word
    137. End If
    138. Else
    139. lines.Add(currentLine)
    140. currentLine = word
    141. End If
    142. Next
    144. If currentLine.Length > 0 Then
    145. lines.Add(currentLine)
    146. End If
    148. Return lines.ToArray()
    149. End Function
    150. End Class

    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    @Amelie Poste so viel Code AndAlso Daten, dass ich Dein Druckbild reproduzieren kann.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    @Amelie Ich vermisse die Daten, die ich auf Deinem Print erkenne.
    Was ist

    VB.NET-Quellcode

    1. Private ReadOnly EnvAeraInstance As EnvironmentArea = EnvironmentArea.Instance
    2. Private WithEvents LoSaInstance As LoadSaveNotice = LoadSaveNotice.Instance
    ?
    Schreib da doch einfach Namen und Pfad hin, damit diejenigen, die Dir helfen wollen, es nicht so schwer haben.
    Was muss ich tun, dass ich Dein Druckbild reproduzieren kann?

    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Ich hoffe das Ihr nun etwas damit anfangen könnt.
    Der Screenshoot zeigt das die Seitenumbrüche manchmal nicht so klappen wie es eigentlich sein soll.


    Vom Form rufe ich einfach mit einem Button das hier Public Sub PrintNotiz() in der Klasse auf, zum Drucken.

    Der Pfad zu den XML-Dateien ist eigentlich völlig egal.
    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. ' Ausgewähltes Datum für den Dateinamen der XML / Beispiel: 06-2024notizen.xml
    3. Public SelectedDate As DateTime = New DateTime(DateTime.Now.Year, DateTime.Now.Month, 1)
    4. ' Dateiname, der auf dem ausgewählten Datum basiert
    5. Public ReadOnly Filename As String = SelectedDate.ToString("MM-yyyy") & "notizen.xml"
    7. ' Verzeichnis für App-Daten wo die ganzen XML-Dateien bei mir liegen
    8. AppDataDirectory = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData), DataFolder)
    9. ' Basisverzeichnis für die XML-Datei
    10. Public Xmlfilepath As String = Path.Combine(EnvAeraInstance.AppDataDirectory)


    Das XML File mit zur Zeit 20 Test Einträgen

    XML-Quellcode

    1. ​
    2. <?xml version="1.0" standalone="yes"?>
    3. <dsHealth>
    4. <Notizen>
    5. <IDPerson>1</IDPerson>
    6. <Datum>16.06.2024</Datum>
    7. <HeadLine>Löschen Ja/Nein</HeadLine>
    8. <Message>Mit dieser Änderung wird eine MessageBox angezeigt, die den Benutzer fragt, ob er den aktuellen Eintrag wirklich löschen möchte. Wenn der Benutzer auf "Ja" klickt, wird der Eintrag gelöscht, andernfalls bleibt der Eintrag bestehen.</Message>
    9. </Notizen>
    10. ...
    11. .....
    12. <Notizen>
    13. <IDPerson>19</IDPerson>
    14. <Datum>16.06.2024</Datum>
    15. <HeadLine>Eintrag 19</HeadLine>
    16. <Message>On the other hand, we denounce with righteous indignation and dislike men who are so beguiled and demoralized by the charms of pleasure of the moment, so blinded by desire, that they cannot foresee the pain and trouble that are bound to ensue; and equal blame belongs to those who fail in their duty </Message>
    17. </Notizen>
    18. <Notizen>
    19. <IDPerson>20</IDPerson>
    20. <Datum>16.06.2024</Datum>
    21. <HeadLine>Eintrag 20</HeadLine>
    22. <Message>On the other hand, we denounce with righteous indignation and dislike men who are so beguiled and demoralized by the charms of pleasure of the moment, so blinded by desire, that they cannot foresee the pain and trouble that are bound to ensue; and equal blame belongs to those who fail in their duty </Message>
    23. </Notizen>
    24. </dsHealth>

    Bilder

    • druck-1.jpg

      453,44 kB, 893×721, 118 mal angesehen
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Amelie schrieb:

    Der Screenshoot zeigt das die Seitenumbrüche manchmal nicht so klappen wie es eigentlich sein soll.
    Ich nehme mal an, dass Du möchtest, dass beim Seitenumbruch der erste Teil auf der vorigen, der zweite Teil auf der nächsten Seite erscheint, dass es also keinen Doppeldruck gibt.
    Füge Deiner List(Of String) entries keinen StringBuilder.ToString() hinzu, sondern die Zeilen selbst, denn
    StringBuilder.ToString() ist ein Mehrzeiler!
    Eventuell musst Du an dieser Stelle

    VB.NET-Quellcode

    1. Dim message As String = notiz.SelectSingleNode("Message").InnerText
    noch zerlegen, das musst Du ausprobieren.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    @RodFromGermany

    Irgendwie will das mit der Druckvorschau nicht funktionieren.
    TestDrucken.zip ist ohne "bin/obj" ;)

    Folgendes Problem:

    Ich rufe die Druckvorschau auf und klicke dort auf das "Druckersymbol" (siehe Bild). Dann wird zwar gedruckt ABER die Druckvorschau schlisst sich nicht.

    Habe es schon mit ​PrintDocDgv_EndPrint aber ohne Erfolg.


    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. Imports System.Drawing.Printing
    4. Public Class FrmTestPrint
    5. Private rowIndex As Integer = 0
    7. Public Sub New()
    8. InitializeComponent()
    9. End Sub
    11. Private Sub FrmTestPrint_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    12. ' Beispiel-Daten für das DataGridView laden
    13. DataGridView1.Rows.Add("Produkt 1", 10, 100)
    14. DataGridView1.Rows.Add("Produkt 2", 5, 50)
    15. DataGridView1.Rows.Add("Produkt 3", 8, 80)
    16. End Sub
    18. Private Sub BtnPrintPreview_Click(sender As Object, e As EventArgs) Handles BtnPrintPreview.Click
    19. ShowPrintPreview()
    20. End Sub
    22. Private Sub BtnPrint_Click(sender As Object, e As EventArgs) Handles BtnPrint.Click
    23. PrintDataGrid()
    24. End Sub
    26. Private Sub PrintDocDgv_PrintPage(sender As Object, e As PrintPageEventArgs) Handles PrintDocDgv.PrintPage
    27. ' Logik zum Zeichnen des DataGridView-Inhalts auf die Druckseite
    28. Dim dgv As DataGridView = DataGridView1
    29. Dim g As Graphics = e.Graphics
    30. Dim rect As RectangleF
    31. Dim startX As Single = e.MarginBounds.Left
    32. Dim startY As Single = e.MarginBounds.Top
    33. Dim cellHeight As Integer = 0
    34. Dim columnIndex As Integer = 0
    36. ' Zeichne die Kopfzeile des DataGridViews
    37. For Each column As DataGridViewColumn In dgv.Columns
    38. rect = New RectangleF(startX, startY, column.Width, dgv.ColumnHeadersHeight)
    39. g.FillRectangle(Brushes.LightGray, rect)
    40. g.DrawRectangle(Pens.Black, rect.X, rect.Y, rect.Width, rect.Height)
    41. g.DrawString(column.HeaderText, dgv.Font, Brushes.Black, rect, New StringFormat())
    42. startX += rect.Width
    43. Next
    45. startY += dgv.ColumnHeadersHeight
    47. ' Zeichne die Zeilen des DataGridViews
    48. While rowIndex < dgv.Rows.Count
    49. Dim row As DataGridViewRow = dgv.Rows(rowIndex)
    50. startX = e.MarginBounds.Left
    52. For Each cell As DataGridViewCell In row.Cells
    53. rect = New RectangleF(startX, startY, cell.OwningColumn.Width, cell.Size.Height)
    54. g.DrawRectangle(Pens.Black, rect.X, rect.Y, rect.Width, rect.Height)
    55. g.DrawString(cell.FormattedValue.ToString(), dgv.Font, Brushes.Black, rect, New StringFormat())
    56. startX += rect.Width
    57. Next
    59. cellHeight = row.Height
    60. startY += cellHeight
    62. If startY + cellHeight > e.MarginBounds.Bottom Then
    63. e.HasMorePages = True
    64. rowIndex += 1
    65. Return
    66. End If
    68. rowIndex += 1
    69. End While
    71. rowIndex = 0
    72. e.HasMorePages = False
    73. End Sub
    75. Private Sub PrintDataGrid()
    76. PrintDialogDGV.Document = PrintDocDgv
    78. If PrintDialogDGV.ShowDialog() = DialogResult.OK Then
    79. PrintDocDgv.Print()
    80. End If
    81. End Sub
    83. Private Sub ShowPrintPreview()
    84. PrintDocDgv.DocumentName = "TestDGV"
    85. AddHandler PrintDocDgv.PrintPage, AddressOf PrintDocDgv_PrintPage
    87. PrintPreviewDialog.Document = PrintDocDgv
    89. If PrintPreviewDialog.ShowDialog() = DialogResult.OK Then
    90. PrintPreviewDialog.Close()
    91. End If
    92. End Sub
    94. Private Sub PrintDocDgv_EndPrint(sender As Object, e As PrintEventArgs) Handles PrintDocDgv.EndPrint
    95. Debug.WriteLine($"Im EndPrint")
    96. PrintPreviewDialog.Close()
    97. End Sub
    98. End Class

    Bilder

    • druck-2.jpg

      84,06 kB, 605×316, 35 mal angesehen
    Dateien

    • TestDrucken.zip

      (428,38 kB, 52 mal heruntergeladen, zuletzt: )
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Ich glaube, dass Du den PrintPreviewDialog (PPD) nicht verstanden hast. Der Standardablauf ist: Zuweisung des PrintDocuments an den PPD, bevorzugt über den Designer, nicht über den Code und dann einfach PPD.ShowDialog(Me). Sonst nichts mehr! Kein PrintDocument.Print, kein AddHandler oder sonstewas. Der PPD kümmert sich um das Drucken, sobald Du dort den Druck-Button anklickst. Der PPD ruft automatisch PrintDocument.Print auf. Und er schließt sich nicht automatisch, wenn gedruckt wurde, weil man als User das PrintDocument ggf. noch anders drucken will. Wenn man das alles nicht will, sondern einen automatischen Druck will, mach ich es während der Entwicklung des Programms so, dass ich den PPD verwende und den Druck anpasse und wenn die Druckcodeanweisungen im PrintDocument-PrintPage-EventHandler so sind, wie gewünscht, werfe ich den PPD weg und nutze für den Sofortdruck per PrintDialog.Print
    Im EndPrint-EventHandler darfst Du den PPD nicht schließen, weil der PPD die Druckdaten durch Aufruf von PrintDocument.Print nutzt, um die Vorschau zu erstellen. Und da durch PrintDocument.Print das PrintDocument seine Events wie BeginPrint, PrintPage und EndPrint auslöst, …
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VaporiZed“ ()

    @VaporiZed

    Ich glaube Du hast Recht. Habe das mit der "Druckvorschau" wohl falsch verstanden / interpretiert.
    Dann kann ich ja den Druckbereich in dem eigentlichen Programm so lassen wie ich ihn habe. :)

    Aber dazu noch eine Frage:
    Im Moment ist es so, wenn ich das Form mit dem DGV (DocStyle:Fill) größer ziehe wird es später im Druck auch größer.
    Muss ich da echt erst alles von Hand berechnen, damit das keine Auswirkungen auf den Druck hat :?: :S
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Warum sollte überhaupt das DGV so gedruckt werden, wie es aussieht? Bei mir das das GUI nichts mit dem Druck zu tun. Die Daten werden bei mir zwar in GUI und Druck dargestellt. Aber Monitor und Drucker/Papier sind zwei unterschiedliche Ausgabemedien, die unabhängig voneinander sein sollten. Das ist auch der Punkt mit der temporären PPD-Einbindung bei mir. Damit kann ich den Druckcode solange anpassen, bis die Vorschau meinen Wünschen entspricht. Aber die DGV/Tabellendarstellung in der App hat bei mir damit nix zu tun, weil oft Infos oder grafische Besonderheiten dabei sind, die ich entweder auf dem Monitor oder auf dem Druck nicht haben will.
    Wenn Du aber das DGV drucken willst, hast Du mehrere undschöne Möglichkeiten:
    • DockStyle.Fill rausnehmen
    • Screenshot machen und das Bild skalieren
    • alles selber berechnen und malen
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    @DTF
    Das [tt]​DrawToBitmap[/tt hatte ich in der Tat schon mal kurz ausprobiert aber dann verworfen, weil mir das noch zu viel war.
    Wenn das Projekt hier erstamlö soweit fertig ist, werde ich mich damit nochmal befassen.

    @VaporiZed
    Blöde Frage: Wie kommst du dann an die Daten?
    Aus einer Datenbank, Bindinsource oder???
    Ich habe einige Daten ja ohne sowas, einfach nur simple XML-Dateien.
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Amelie schrieb:

    Wie kommst du dann an die Daten? […] Ich habe einige Daten […], einfach nur simple XML-Dateien.
    Ja gut, aber die XML-Datei muss ja auch irgendwie verarbeitet werden, bevor es weitergeht. Ich packe Rohdaten immer erst in geeignete Daten-Klasseninstanzen, nie in Controls direkt. Einfach weil ich weiß, dass irgendwann der Zeitpunkt kommt, an dem ich die Daten anderweitig brauche.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.