jj: add line in designer and constructor

2018-04-04 14:14:07 +02:00
parent fd2dc4bf99
commit 6755ce60ea
7 changed files with 164 additions and 46 deletions
--- a/app/DD-Record-Organizer/ClassControlCommandsUI.vb
+++ b/app/DD-Record-Organizer/ClassControlCommandsUI.vb
@@ -306,6 +306,19 @@ Public Class ClassControlCommandsUI
                                            dr.Item("CONTROL_COL_NAME"),
                                            parent)
                    control = "DataGridViewCheckable - " & dr.Item("CONTROL_ID")
+                Case 15 ' Line
+                    _CtrlBuilder.AddLine(dr.Item("CONTROL_ID"),
+                                         dr.Item("CONTROL_NAME"),
+                                         dr.Item("CTRLSCR_X_LOC"),
+                                         dr.Item("CTRLSCR_Y_LOC"),
+                                         dr.Item("CTRLSCR_FONT_COLOR"),
+                                         dr.Item("CTRLSCR_WIDTH"),
+                                         dr.Item("CTRLSCR_HEIGHT"),
+                                         False,
+                                         parent)
+
+                    control = "Line - " & dr.Item("CONTROL_ID")
+
            End Select