AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

RegexEditor: Update with devexpress form

Browse Source
This commit is contained in:
Jonathan Jenne 2021-01-12 15:26:48 +01:00
parent 3162ec9fde
commit ae0603fb4d
3 changed files with 106 additions and 101 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
Controls.RegexEditor/RegexEditor.vbproj
View File

@ -48,6 +48,11 @@
<OptionInfer>On</OptionInfer> <OptionInfer>On</OptionInfer>
</PropertyGroup> </PropertyGroup>
<ItemGroup> <ItemGroup>
<Reference Include="DevExpress.Data.Desktop.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Data.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Printing.v20.1.Core, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Utils.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraEditors.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="System" /> <Reference Include="System" />
<Reference Include="System.Data" /> <Reference Include="System.Data" />
<Reference Include="System.Deployment" /> <Reference Include="System.Deployment" />
@ -73,13 +78,6 @@
<Import Include="System.Threading.Tasks" /> <Import Include="System.Threading.Tasks" />
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<Compile Include="frmRegexEditor.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmRegexEditor.Designer.vb">
<DependentUpon>frmRegexEditor.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" /> <Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb"> <Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen> <AutoGen>True</AutoGen>
@ -96,17 +94,23 @@
<DesignTimeSharedInput>True</DesignTimeSharedInput> <DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile> </Compile>
<Compile Include="RegexEditor.vb" /> <Compile Include="RegexEditor.vb" />
<Compile Include="frmRegexEditor.Designer.vb">
<DependentUpon>frmRegexEditor.vb</DependentUpon>
</Compile>
<Compile Include="frmRegexEditor.vb">
<SubType>Form</SubType>
</Compile>
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<EmbeddedResource Include="frmRegexEditor.resx">
<DependentUpon>frmRegexEditor.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx"> <EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator> <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput> <LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace> <CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType> <SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmRegexEditor.resx">
<DependentUpon>frmRegexEditor.vb</DependentUpon>
</EmbeddedResource>
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<None Include="My Project\Application.myapp"> <None Include="My Project\Application.myapp">

181
Controls.RegexEditor/frmRegexEditor.Designer.vb generated
View File

@ -1,106 +1,42 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmRegexEditor Partial Class frmRegexEditor
Inherits System.Windows.Forms.Form Inherits DevExpress.XtraEditors.XtraForm
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. 'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _ <System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try If disposing AndAlso components IsNot Nothing Then
If disposing AndAlso components IsNot Nothing Then components.Dispose()
components.Dispose() End If
End If MyBase.Dispose(disposing)
Finally
MyBase.Dispose(disposing)
End Try
End Sub End Sub
'Wird vom Windows Form-Designer benötigt. 'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'NOTE: The following procedure is required by the Windows Form Designer
'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'It can be modified using the Windows Form Designer.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich. 'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _ <System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.txtRegex = New System.Windows.Forms.TextBox() Me.btnTest = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label() Me.btnSave = New System.Windows.Forms.Button()
Me.Label4 = New System.Windows.Forms.Label()
Me.labelResult = New System.Windows.Forms.Label() Me.labelResult = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
Me.txtTest = New System.Windows.Forms.TextBox() Me.txtTest = New System.Windows.Forms.TextBox()
Me.btnTest = New System.Windows.Forms.Button() Me.Label4 = New System.Windows.Forms.Label()
Me.btnSave = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label()
Me.txtRegex = New System.Windows.Forms.TextBox()
Me.SuspendLayout() Me.SuspendLayout()
' '
'txtRegex
'
Me.txtRegex.Location = New System.Drawing.Point(12, 25)
Me.txtRegex.Name = "txtRegex"
Me.txtRegex.Size = New System.Drawing.Size(419, 20)
Me.txtRegex.TabIndex = 0
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 9)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(101, 13)
Me.Label1.TabIndex = 2
Me.Label1.Text = "Regular Expression:"
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(12, 48)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(419, 33)
Me.Label4.TabIndex = 8
Me.Label4.Text = "Wenn die Eingabe insgesamt validiert werden soll, muss der Regex in ^ und $ einge" &
"schlossen sein"
'
'labelResult
'
Me.labelResult.AutoSize = True
Me.labelResult.Location = New System.Drawing.Point(12, 163)
Me.labelResult.Name = "labelResult"
Me.labelResult.Size = New System.Drawing.Size(282, 13)
Me.labelResult.TabIndex = 12
Me.labelResult.Text = "Klicken Sie auf Test, um die Regular Expression zu testen."
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(12, 150)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(51, 13)
Me.Label3.TabIndex = 11
Me.Label3.Text = "Ergebnis:"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(12, 100)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(61, 13)
Me.Label2.TabIndex = 10
Me.Label2.Text = "Test String:"
'
'txtTest
'
Me.txtTest.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.txtTest.Location = New System.Drawing.Point(12, 116)
Me.txtTest.Name = "txtTest"
Me.txtTest.Size = New System.Drawing.Size(419, 20)
Me.txtTest.TabIndex = 9
'
'btnTest 'btnTest
' '
Me.btnTest.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnTest.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnTest.Location = New System.Drawing.Point(201, 193) Me.btnTest.Location = New System.Drawing.Point(187, 192)
Me.btnTest.Name = "btnTest" Me.btnTest.Name = "btnTest"
Me.btnTest.Size = New System.Drawing.Size(112, 31) Me.btnTest.Size = New System.Drawing.Size(112, 31)
Me.btnTest.TabIndex = 14 Me.btnTest.TabIndex = 23
Me.btnTest.Text = "Test" Me.btnTest.Text = "Test"
Me.btnTest.UseVisualStyleBackColor = True Me.btnTest.UseVisualStyleBackColor = True
' '
@ -108,18 +44,83 @@ Partial Class frmRegexEditor
' '
Me.btnSave.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnSave.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK Me.btnSave.DialogResult = System.Windows.Forms.DialogResult.OK
Me.btnSave.Location = New System.Drawing.Point(319, 193) Me.btnSave.Location = New System.Drawing.Point(305, 192)
Me.btnSave.Name = "btnSave" Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(112, 31) Me.btnSave.Size = New System.Drawing.Size(112, 31)
Me.btnSave.TabIndex = 13 Me.btnSave.TabIndex = 22
Me.btnSave.Text = "Speichern" Me.btnSave.Text = "Speichern"
Me.btnSave.UseVisualStyleBackColor = True Me.btnSave.UseVisualStyleBackColor = True
' '
'labelResult
'
Me.labelResult.AutoSize = True
Me.labelResult.Location = New System.Drawing.Point(12, 163)
Me.labelResult.Name = "labelResult"
Me.labelResult.Size = New System.Drawing.Size(284, 13)
Me.labelResult.TabIndex = 21
Me.labelResult.Text = "Klicken Sie auf Test, um die Regular Expression zu testen."
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(12, 150)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(52, 13)
Me.Label3.TabIndex = 20
Me.Label3.Text = "Ergebnis:"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(12, 100)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(63, 13)
Me.Label2.TabIndex = 19
Me.Label2.Text = "Test String:"
'
'txtTest
'
Me.txtTest.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.txtTest.Font = New System.Drawing.Font("Consolas", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtTest.Location = New System.Drawing.Point(12, 116)
Me.txtTest.Name = "txtTest"
Me.txtTest.Size = New System.Drawing.Size(405, 20)
Me.txtTest.TabIndex = 18
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(12, 48)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(419, 33)
Me.Label4.TabIndex = 17
Me.Label4.Text = "Wenn die Eingabe insgesamt validiert werden soll, muss der Regex in ^ und $ einge" &
"schlossen sein"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 9)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(103, 13)
Me.Label1.TabIndex = 16
Me.Label1.Text = "Regular Expression:"
'
'txtRegex
'
Me.txtRegex.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.txtRegex.Font = New System.Drawing.Font("Consolas", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtRegex.Location = New System.Drawing.Point(12, 25)
Me.txtRegex.Name = "txtRegex"
Me.txtRegex.Size = New System.Drawing.Size(405, 20)
Me.txtRegex.TabIndex = 15
'
'frmRegexEditor 'frmRegexEditor
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(443, 236) Me.ClientSize = New System.Drawing.Size(429, 235)
Me.Controls.Add(Me.btnTest) Me.Controls.Add(Me.btnTest)
Me.Controls.Add(Me.btnSave) Me.Controls.Add(Me.btnSave)
Me.Controls.Add(Me.labelResult) Me.Controls.Add(Me.labelResult)
@ -129,21 +130,21 @@ Partial Class frmRegexEditor
Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label4)
Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.txtRegex) Me.Controls.Add(Me.txtRegex)
Me.IconOptions.ShowIcon = False
Me.Name = "frmRegexEditor" Me.Name = "frmRegexEditor"
Me.ShowIcon = False
Me.Text = "Regex Editor" Me.Text = "Regex Editor"
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents txtRegex As TextBox Friend WithEvents btnTest As Button
Friend WithEvents Label1 As Label Friend WithEvents btnSave As Button
Friend WithEvents Label4 As Label
Friend WithEvents labelResult As Label Friend WithEvents labelResult As Label
Friend WithEvents Label3 As Label Friend WithEvents Label3 As Label
Friend WithEvents Label2 As Label Friend WithEvents Label2 As Label
Friend WithEvents txtTest As TextBox Friend WithEvents txtTest As TextBox
Friend WithEvents btnTest As Button Friend WithEvents Label4 As Label
Friend WithEvents btnSave As Button Friend WithEvents Label1 As Label
Friend WithEvents txtRegex As TextBox
End Class End Class