This commit is contained in:
SchreiberM
2017-03-13 16:05:46 +01:00
parent 701f303176
commit f4db45d3aa
12 changed files with 3387 additions and 1861 deletions

View File

@@ -18,7 +18,7 @@
Return _Instance
End Function
Public Sub SetFormTitle(title As String)
Me.Text = "Formdesigner: " & title
Me.Text = "Form Designer: " & title
End Sub
Public Sub SetFormName(name As String)
Me.lblFormName.Text = "Name: " & name & " - Form-ID: " & CURRENT_ENTITY_ID