RegexEditor: Improve Look and Feel

This commit is contained in:
Jonathan Jenne 2021-04-19 14:03:33 +02:00
parent 04fd63a9c7
commit 5e45aef7ff
13 changed files with 326 additions and 87 deletions

View File

@ -12,7 +12,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyDescription("")> <Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")> <Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("RegexEditor")> <Assembly: AssemblyProduct("RegexEditor")>
<Assembly: AssemblyCopyright("Copyright © 2019")> <Assembly: AssemblyCopyright("Copyright © 2021")>
<Assembly: AssemblyTrademark("")> <Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)> <Assembly: ComVisible(False)>
@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.1.0.0")> <Assembly: AssemblyVersion("1.2.0.0")>
<Assembly: AssemblyFileVersion("1.1.0.0")> <Assembly: AssemblyFileVersion("1.2.0.0")>

View File

@ -22,7 +22,7 @@ Namespace My.Resources
'''<summary> '''<summary>
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
'''</summary> '''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _ <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _ Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
@ -59,5 +59,65 @@ Namespace My.Resources
resourceCulture = value resourceCulture = value
End Set End Set
End Property End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property about() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("about", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property actions_check() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("actions_check", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property actions_check1() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("actions_check1", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property definednameuseinformula() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("definednameuseinformula", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property definednameuseinformula1() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("definednameuseinformula1", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property definednameuseinformula2() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("definednameuseinformula2", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
End Module End Module
End Namespace End Namespace

View File

@ -46,7 +46,7 @@
mimetype: application/x-microsoft.net.object.binary.base64 mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with value : The object must be serialized with
: System.Serialization.Formatters.Binary.BinaryFormatter : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding. : and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64 mimetype: application/x-microsoft.net.object.soap.base64
@ -60,6 +60,7 @@
: and then encoded with base64 encoding. : and then encoded with base64 encoding.
--> -->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata"> <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true"> <xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType> <xsd:complexType>
<xsd:choice maxOccurs="unbounded"> <xsd:choice maxOccurs="unbounded">
@ -68,9 +69,10 @@
<xsd:sequence> <xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" /> <xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence> </xsd:sequence>
<xsd:attribute name="name" type="xsd:string" /> <xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" /> <xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" /> <xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType> </xsd:complexType>
</xsd:element> </xsd:element>
<xsd:element name="assembly"> <xsd:element name="assembly">
@ -85,9 +87,10 @@
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" /> <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" /> <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence> </xsd:sequence>
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" /> <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" /> <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" /> <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType> </xsd:complexType>
</xsd:element> </xsd:element>
<xsd:element name="resheader"> <xsd:element name="resheader">
@ -109,9 +112,28 @@
<value>2.0</value> <value>2.0</value>
</resheader> </resheader>
<resheader name="reader"> <resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="definednameuseinformula" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\definednameuseinformula.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="definednameuseinformula1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\definednameuseinformula1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="actions_check" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="actions_check1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_check1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="definednameuseinformula2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\definednameuseinformula2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="about" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\about.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
</root> </root>

View File

@ -0,0 +1,3 @@
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

View File

@ -48,21 +48,33 @@
<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.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Data.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.Printing.v19.2.Core, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Printing.v20.1.Core, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.Utils.v19.2, Version=19.2.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.XtraBars.v19.2, Version=19.2.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="DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraEditors.v19.2.dll</HintPath>
</Reference>
<Reference Include="DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraLayout.v19.2.dll</HintPath>
</Reference>
<Reference Include="PresentationCore" />
<Reference Include="System" /> <Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" />
<Reference Include="System.Data" /> <Reference Include="System.Data" />
<Reference Include="System.Deployment" /> <Reference Include="System.Deployment" />
<Reference Include="System.Drawing" /> <Reference Include="System.Drawing" />
<Reference Include="System.Runtime.Remoting" />
<Reference Include="System.Windows.Forms" /> <Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" /> <Reference Include="System.Xml" />
<Reference Include="System.Core" /> <Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" /> <Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" /> <Reference Include="System.Data.DataSetExtensions" />
<Reference Include="System.Net.Http" /> <Reference Include="System.Net.Http" />
<Reference Include="UIAutomationClient" />
<Reference Include="WindowsBase" />
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<Import Include="Microsoft.VisualBasic" /> <Import Include="Microsoft.VisualBasic" />
@ -102,6 +114,7 @@
</Compile> </Compile>
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<EmbeddedResource Include="My Project\licenses.licx" />
<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>
@ -130,5 +143,23 @@
<Name>Language</Name> <Name>Language</Name>
</ProjectReference> </ProjectReference>
</ItemGroup> </ItemGroup>
<ItemGroup>
<None Include="Resources\actions_check.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\definednameuseinformula.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\definednameuseinformula1.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\actions_check1.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\definednameuseinformula2.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\about.svg" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" /> <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project> </Project>

View File

@ -0,0 +1,19 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Layer_1" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Yellow{fill:#FFB115;}
.Red{fill:#D11C1C;}
.Blue{fill:#1177D7;}
.Green{fill:#039C23;}
.Black{fill:#727272;}
.White{fill:#FFFFFF;}
.st0{opacity:0.5;}
.st1{display:none;}
.st2{display:inline;fill:#039C23;}
.st3{display:inline;fill:#D11C1C;}
.st4{display:inline;fill:#727272;}
</style>
<g id="About">
<path d="M16,2C8.3,2,2,8.3,2,16s6.3,14,14,14s14-6.3,14-14S23.7,2,16,2z M16,6c1.1,0,2,0.9,2,2s-0.9,2-2,2s-2-0.9-2-2 S14.9,6,16,6z M20,24h-8v-2h2v-8h-2v-2h2h4v10h2V24z" class="Blue" />
</g>
</svg>

View File

@ -0,0 +1,15 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Layer_1" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Yellow{fill:#FFB115;}
.Black{fill:#727272;}
.Green{fill:#039C23;}
.Red{fill:#D11C1C;}
.st0{opacity:0.75;}
.st1{opacity:0.5;}
</style>
<g id="Check">
<polygon points="27,5 11,21 5,15 2,18 11,27 30,8 " class="Green" />
</g>
</svg>

View File

@ -0,0 +1,15 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Layer_1" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Yellow{fill:#FFB115;}
.Black{fill:#727272;}
.Green{fill:#039C23;}
.Red{fill:#D11C1C;}
.st0{opacity:0.75;}
.st1{opacity:0.5;}
</style>
<g id="Check">
<polygon points="27,5 11,21 5,15 2,18 11,27 30,8 " class="Green" />
</g>
</svg>

View File

@ -0,0 +1,9 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="DefinedNameUseInFormula" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Black{fill:#727272;}
</style>
<path d="M7,20l-7-7V9l7-7h22c0.6,0,1,0.4,1,1v16c0,0.6-0.4,1-1,1h-8.4l0.5-2h2.3H28V4H7.8L2,9.8v2.3L7.8,18h3.8h1.6 l-0.4,2H7z M6,11c0,1.1,0.9,2,2,2s2-0.9,2-2c0-1.1-0.9-2-2-2S6,9.9,6,11z" class="Black" />
<path d="M19.9,14h2.3l-0.5,2h-2.3l-2.1,8.7c-0.3,1.2-0.7,2.2-1.2,3c-0.6,0.8-1.2,1.4-2,1.8c-0.7,0.4-1.6,0.6-2.6,0.6 c-1,0-1.8-0.2-2.3-0.6c-0.7-0.5-1-1-1-1.6c0-0.5,0.2-0.9,0.5-1.2c0.3-0.3,0.7-0.5,1.2-0.5c0.2,0,0.4,0,0.6,0.1 c0.2,0.1,0.4,0.2,0.6,0.3c0.1,0.1,0.3,0.3,0.6,0.7c0.1,0.2,0.3,0.3,0.4,0.3c0.1,0.1,0.2,0.1,0.4,0.1c0.5,0,0.9-0.6,1.1-1.7l2.2-9.9 h-1.7l0.4-2h1.7l0.4-1.7c0.3-1.4,1-2.4,2-3.2c1-0.8,2.3-1.1,4-1.1c0.8,0,1.5,0.1,1.9,0.3c0.5,0.2,0.8,0.5,1.1,0.8 c0.3,0.4,0.4,0.7,0.4,1.1c0,0.3-0.1,0.6-0.2,0.9c-0.2,0.3-0.4,0.5-0.6,0.6c-0.3,0.1-0.6,0.2-0.9,0.2c-0.3,0-0.6-0.1-0.9-0.2 c-0.3-0.1-0.5-0.3-0.8-0.6c-0.3-0.3-0.5-0.5-0.6-0.6c-0.1-0.1-0.3-0.1-0.4-0.1c-0.3,0-0.6,0.1-0.8,0.4c-0.1,0.2-0.3,0.6-0.4,1.3 L19.9,14z M22.5,22.3l1.2,2.4c0.7-0.9,1.1-1.5,1.3-1.7c0.3-0.3,0.6-0.5,1-0.7s0.6-0.2,0.9-0.2c0.3,0,0.6,0.1,0.8,0.3 s0.3,0.4,0.3,0.7c0,0.2,0,0.4-0.1,0.5s-0.2,0.3-0.3,0.4s-0.3,0.2-0.4,0.2c-0.1,0-0.2,0-0.5,0.1c-0.3,0-0.5,0-0.6,0.1 c-0.1,0-0.2,0.1-0.4,0.2c-0.2,0.1-0.3,0.3-0.5,0.4c-0.1,0.1-0.3,0.4-0.8,1.1l0.4,0.8c0.3,0.6,0.6,1.1,0.8,1.2 c0.2,0.2,0.4,0.3,0.6,0.3c0.3,0,0.7-0.2,1.1-0.6l0.8,1c-0.9,0.8-1.8,1.2-2.7,1.2c-0.4,0-0.7-0.1-1-0.2c-0.3-0.1-0.6-0.3-0.8-0.6 c-0.2-0.2-0.5-0.6-0.7-1.1l-0.4-0.9c-0.4,0.7-0.8,1.2-1.2,1.6c-0.4,0.4-0.8,0.7-1.1,0.9c-0.3,0.2-0.6,0.2-0.9,0.2 c-0.2,0-0.4,0-0.6-0.1c-0.1-0.1-0.3-0.2-0.4-0.4C18,29.3,18,29.2,18,29c0-0.2,0.1-0.4,0.2-0.6c0.1-0.2,0.3-0.3,0.4-0.4 c0.2-0.1,0.5-0.1,0.9-0.1c0.3,0,0.5-0.1,0.7-0.2c0.2-0.1,0.4-0.2,0.6-0.5c0.2-0.2,0.5-0.7,1-1.4L21,24.3h-1.1l0.3-1.4 c0.6-0.1,1.2-0.3,1.7-0.6H22.5z" class="Blue" />
</svg>

View File

@ -0,0 +1,9 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="DefinedNameUseInFormula" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Black{fill:#727272;}
</style>
<path d="M7,20l-7-7V9l7-7h22c0.6,0,1,0.4,1,1v16c0,0.6-0.4,1-1,1h-8.4l0.5-2h2.3H28V4H7.8L2,9.8v2.3L7.8,18h3.8h1.6 l-0.4,2H7z M6,11c0,1.1,0.9,2,2,2s2-0.9,2-2c0-1.1-0.9-2-2-2S6,9.9,6,11z" class="Black" />
<path d="M19.9,14h2.3l-0.5,2h-2.3l-2.1,8.7c-0.3,1.2-0.7,2.2-1.2,3c-0.6,0.8-1.2,1.4-2,1.8c-0.7,0.4-1.6,0.6-2.6,0.6 c-1,0-1.8-0.2-2.3-0.6c-0.7-0.5-1-1-1-1.6c0-0.5,0.2-0.9,0.5-1.2c0.3-0.3,0.7-0.5,1.2-0.5c0.2,0,0.4,0,0.6,0.1 c0.2,0.1,0.4,0.2,0.6,0.3c0.1,0.1,0.3,0.3,0.6,0.7c0.1,0.2,0.3,0.3,0.4,0.3c0.1,0.1,0.2,0.1,0.4,0.1c0.5,0,0.9-0.6,1.1-1.7l2.2-9.9 h-1.7l0.4-2h1.7l0.4-1.7c0.3-1.4,1-2.4,2-3.2c1-0.8,2.3-1.1,4-1.1c0.8,0,1.5,0.1,1.9,0.3c0.5,0.2,0.8,0.5,1.1,0.8 c0.3,0.4,0.4,0.7,0.4,1.1c0,0.3-0.1,0.6-0.2,0.9c-0.2,0.3-0.4,0.5-0.6,0.6c-0.3,0.1-0.6,0.2-0.9,0.2c-0.3,0-0.6-0.1-0.9-0.2 c-0.3-0.1-0.5-0.3-0.8-0.6c-0.3-0.3-0.5-0.5-0.6-0.6c-0.1-0.1-0.3-0.1-0.4-0.1c-0.3,0-0.6,0.1-0.8,0.4c-0.1,0.2-0.3,0.6-0.4,1.3 L19.9,14z M22.5,22.3l1.2,2.4c0.7-0.9,1.1-1.5,1.3-1.7c0.3-0.3,0.6-0.5,1-0.7s0.6-0.2,0.9-0.2c0.3,0,0.6,0.1,0.8,0.3 s0.3,0.4,0.3,0.7c0,0.2,0,0.4-0.1,0.5s-0.2,0.3-0.3,0.4s-0.3,0.2-0.4,0.2c-0.1,0-0.2,0-0.5,0.1c-0.3,0-0.5,0-0.6,0.1 c-0.1,0-0.2,0.1-0.4,0.2c-0.2,0.1-0.3,0.3-0.5,0.4c-0.1,0.1-0.3,0.4-0.8,1.1l0.4,0.8c0.3,0.6,0.6,1.1,0.8,1.2 c0.2,0.2,0.4,0.3,0.6,0.3c0.3,0,0.7-0.2,1.1-0.6l0.8,1c-0.9,0.8-1.8,1.2-2.7,1.2c-0.4,0-0.7-0.1-1-0.2c-0.3-0.1-0.6-0.3-0.8-0.6 c-0.2-0.2-0.5-0.6-0.7-1.1l-0.4-0.9c-0.4,0.7-0.8,1.2-1.2,1.6c-0.4,0.4-0.8,0.7-1.1,0.9c-0.3,0.2-0.6,0.2-0.9,0.2 c-0.2,0-0.4,0-0.6-0.1c-0.1-0.1-0.3-0.2-0.4-0.4C18,29.3,18,29.2,18,29c0-0.2,0.1-0.4,0.2-0.6c0.1-0.2,0.3-0.3,0.4-0.4 c0.2-0.1,0.5-0.1,0.9-0.1c0.3,0,0.5-0.1,0.7-0.2c0.2-0.1,0.4-0.2,0.6-0.5c0.2-0.2,0.5-0.7,1-1.4L21,24.3h-1.1l0.3-1.4 c0.6-0.1,1.2-0.3,1.7-0.6H22.5z" class="Blue" />
</svg>

View File

@ -0,0 +1,9 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="DefinedNameUseInFormula" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Black{fill:#727272;}
</style>
<path d="M7,20l-7-7V9l7-7h22c0.6,0,1,0.4,1,1v16c0,0.6-0.4,1-1,1h-8.4l0.5-2h2.3H28V4H7.8L2,9.8v2.3L7.8,18h3.8h1.6 l-0.4,2H7z M6,11c0,1.1,0.9,2,2,2s2-0.9,2-2c0-1.1-0.9-2-2-2S6,9.9,6,11z" class="Black" />
<path d="M19.9,14h2.3l-0.5,2h-2.3l-2.1,8.7c-0.3,1.2-0.7,2.2-1.2,3c-0.6,0.8-1.2,1.4-2,1.8c-0.7,0.4-1.6,0.6-2.6,0.6 c-1,0-1.8-0.2-2.3-0.6c-0.7-0.5-1-1-1-1.6c0-0.5,0.2-0.9,0.5-1.2c0.3-0.3,0.7-0.5,1.2-0.5c0.2,0,0.4,0,0.6,0.1 c0.2,0.1,0.4,0.2,0.6,0.3c0.1,0.1,0.3,0.3,0.6,0.7c0.1,0.2,0.3,0.3,0.4,0.3c0.1,0.1,0.2,0.1,0.4,0.1c0.5,0,0.9-0.6,1.1-1.7l2.2-9.9 h-1.7l0.4-2h1.7l0.4-1.7c0.3-1.4,1-2.4,2-3.2c1-0.8,2.3-1.1,4-1.1c0.8,0,1.5,0.1,1.9,0.3c0.5,0.2,0.8,0.5,1.1,0.8 c0.3,0.4,0.4,0.7,0.4,1.1c0,0.3-0.1,0.6-0.2,0.9c-0.2,0.3-0.4,0.5-0.6,0.6c-0.3,0.1-0.6,0.2-0.9,0.2c-0.3,0-0.6-0.1-0.9-0.2 c-0.3-0.1-0.5-0.3-0.8-0.6c-0.3-0.3-0.5-0.5-0.6-0.6c-0.1-0.1-0.3-0.1-0.4-0.1c-0.3,0-0.6,0.1-0.8,0.4c-0.1,0.2-0.3,0.6-0.4,1.3 L19.9,14z M22.5,22.3l1.2,2.4c0.7-0.9,1.1-1.5,1.3-1.7c0.3-0.3,0.6-0.5,1-0.7s0.6-0.2,0.9-0.2c0.3,0,0.6,0.1,0.8,0.3 s0.3,0.4,0.3,0.7c0,0.2,0,0.4-0.1,0.5s-0.2,0.3-0.3,0.4s-0.3,0.2-0.4,0.2c-0.1,0-0.2,0-0.5,0.1c-0.3,0-0.5,0-0.6,0.1 c-0.1,0-0.2,0.1-0.4,0.2c-0.2,0.1-0.3,0.3-0.5,0.4c-0.1,0.1-0.3,0.4-0.8,1.1l0.4,0.8c0.3,0.6,0.6,1.1,0.8,1.2 c0.2,0.2,0.4,0.3,0.6,0.3c0.3,0,0.7-0.2,1.1-0.6l0.8,1c-0.9,0.8-1.8,1.2-2.7,1.2c-0.4,0-0.7-0.1-1-0.2c-0.3-0.1-0.6-0.3-0.8-0.6 c-0.2-0.2-0.5-0.6-0.7-1.1l-0.4-0.9c-0.4,0.7-0.8,1.2-1.2,1.6c-0.4,0.4-0.8,0.7-1.1,0.9c-0.3,0.2-0.6,0.2-0.9,0.2 c-0.2,0-0.4,0-0.6-0.1c-0.1-0.1-0.3-0.2-0.4-0.4C18,29.3,18,29.2,18,29c0-0.2,0.1-0.4,0.2-0.6c0.1-0.2,0.3-0.3,0.4-0.4 c0.2-0.1,0.5-0.1,0.9-0.1c0.3,0,0.5-0.1,0.7-0.2c0.2-0.1,0.4-0.2,0.6-0.5c0.2-0.2,0.5-0.7,1-1.4L21,24.3h-1.1l0.3-1.4 c0.6-0.1,1.2-0.3,1.7-0.6H22.5z" class="Blue" />
</svg>

View File

@ -1,6 +1,6 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmRegexEditor Partial Class frmRegexEditor
Inherits DevExpress.XtraEditors.XtraForm Inherits DevExpress.XtraBars.Ribbon.RibbonForm
'Form overrides dispose to clean up the component list. 'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _ <System.Diagnostics.DebuggerNonUserCode()> _
@ -19,62 +19,29 @@ Partial Class frmRegexEditor
'Do not modify it using the code editor. 'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _ <System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.btnTest = New System.Windows.Forms.Button()
Me.btnSave = New System.Windows.Forms.Button()
Me.labelResult = 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.Label4 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.txtRegex = New System.Windows.Forms.TextBox() Me.txtRegex = New System.Windows.Forms.TextBox()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.labelResult = New DevExpress.XtraBars.BarStaticItem()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
'btnTest
'
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(187, 192)
Me.btnTest.Name = "btnTest"
Me.btnTest.Size = New System.Drawing.Size(112, 31)
Me.btnTest.TabIndex = 23
Me.btnTest.Text = "Test"
Me.btnTest.UseVisualStyleBackColor = True
'
'btnSave
'
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.Location = New System.Drawing.Point(305, 192)
Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(112, 31)
Me.btnSave.TabIndex = 22
Me.btnSave.Text = "Speichern"
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 'Label2
' '
Me.Label2.AutoSize = True Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(12, 100) Me.Label2.Location = New System.Drawing.Point(12, 151)
Me.Label2.Name = "Label2" Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(63, 13) Me.Label2.Size = New System.Drawing.Size(64, 13)
Me.Label2.TabIndex = 19 Me.Label2.TabIndex = 19
Me.Label2.Text = "Test String:" Me.Label2.Text = "Test String:"
' '
@ -82,15 +49,16 @@ Partial Class frmRegexEditor
' '
Me.txtTest.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ 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) 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.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtTest.Location = New System.Drawing.Point(12, 116) Me.txtTest.Location = New System.Drawing.Point(12, 167)
Me.txtTest.Multiline = True
Me.txtTest.Name = "txtTest" Me.txtTest.Name = "txtTest"
Me.txtTest.Size = New System.Drawing.Size(405, 20) Me.txtTest.Size = New System.Drawing.Size(487, 136)
Me.txtTest.TabIndex = 18 Me.txtTest.TabIndex = 18
' '
'Label4 'Label4
' '
Me.Label4.Location = New System.Drawing.Point(12, 48) Me.Label4.Location = New System.Drawing.Point(12, 110)
Me.Label4.Name = "Label4" Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(419, 33) Me.Label4.Size = New System.Drawing.Size(419, 33)
Me.Label4.TabIndex = 17 Me.Label4.TabIndex = 17
@ -100,9 +68,9 @@ Partial Class frmRegexEditor
'Label1 'Label1
' '
Me.Label1.AutoSize = True Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 9) Me.Label1.Location = New System.Drawing.Point(12, 69)
Me.Label1.Name = "Label1" Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(103, 13) Me.Label1.Size = New System.Drawing.Size(108, 13)
Me.Label1.TabIndex = 16 Me.Label1.TabIndex = 16
Me.Label1.Text = "Regular Expression:" Me.Label1.Text = "Regular Expression:"
' '
@ -110,41 +78,117 @@ Partial Class frmRegexEditor
' '
Me.txtRegex.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ 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) 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.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtRegex.Location = New System.Drawing.Point(12, 25) Me.txtRegex.Location = New System.Drawing.Point(12, 85)
Me.txtRegex.Name = "txtRegex" Me.txtRegex.Name = "txtRegex"
Me.txtRegex.Size = New System.Drawing.Size(405, 20) Me.txtRegex.Size = New System.Drawing.Size(487, 22)
Me.txtRegex.TabIndex = 15 Me.txtRegex.TabIndex = 15
' '
'RibbonControl1
'
Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarStaticItem1, Me.labelResult})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 6
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.Size = New System.Drawing.Size(511, 66)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
'
'BarButtonItem1
'
Me.BarButtonItem1.Caption = "Speichern und schließen"
Me.BarButtonItem1.Id = 1
Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.actions_check1
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "Regular Expression testen"
Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.definednameuseinformula1
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'BarStaticItem1
'
Me.BarStaticItem1.Caption = "Ergebnis"
Me.BarStaticItem1.Id = 3
Me.BarStaticItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.about
Me.BarStaticItem1.Name = "BarStaticItem1"
Me.BarStaticItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
Me.RibbonPage1.Name = "RibbonPage1"
Me.RibbonPage1.Text = "RibbonPage1"
'
'RibbonPageGroup1
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
'
'RibbonStatusBar1
'
Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItem1)
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelResult)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 309)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.RibbonStatusBar1.Size = New System.Drawing.Size(511, 22)
'
'RibbonPage2
'
Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "RibbonPage2"
'
'labelResult
'
Me.labelResult.Caption = "<kein Ergebnis>"
Me.labelResult.Id = 5
Me.labelResult.Name = "labelResult"
'
'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(429, 235) Me.ClientSize = New System.Drawing.Size(511, 331)
Me.Controls.Add(Me.btnTest)
Me.Controls.Add(Me.btnSave)
Me.Controls.Add(Me.labelResult)
Me.Controls.Add(Me.Label3)
Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.txtTest) Me.Controls.Add(Me.txtTest)
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.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.definednameuseinformula2
Me.Name = "frmRegexEditor" Me.Name = "frmRegexEditor"
Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1
Me.Text = "Regex Editor" Me.Text = "Regex Editor"
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents btnTest As Button
Friend WithEvents btnSave As Button
Friend WithEvents labelResult 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 Label4 As Label Friend WithEvents Label4 As Label
Friend WithEvents Label1 As Label Friend WithEvents Label1 As Label
Friend WithEvents txtRegex As TextBox Friend WithEvents txtRegex As TextBox
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
Friend WithEvents labelResult As DevExpress.XtraBars.BarStaticItem
End Class End Class

View File

@ -4,6 +4,8 @@ Public Class frmRegexEditor
Public RegexString As String Public RegexString As String
Public Sub New(RegexString As String) Public Sub New(RegexString As String)
MyBase.New()
' Dieser Aufruf ist für den Designer erforderlich. ' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent() InitializeComponent()
@ -15,21 +17,22 @@ Public Class frmRegexEditor
txtRegex.Text = RegexString txtRegex.Text = RegexString
End Sub End Sub
Private Sub btnTest_Click(sender As Object, e As EventArgs) Handles btnTest.Click Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
RegexString = txtRegex.Text
Close()
End Sub
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
Try Try
Dim oTestString As String = txtTest.Text Dim oTestString As String = txtTest.Text
If Regex.IsMatch(oTestString, txtRegex.Text) Then If Regex.IsMatch(oTestString, txtRegex.Text) Then
labelResult.Text = "Test String ist gültig." labelResult.Caption = "Test String ist gültig."
Else Else
labelResult.Text = "Test String ist nicht gültig." labelResult.Caption = "Test String ist nicht gültig."
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Regex Test") MsgBox(ex.Message, MsgBoxStyle.Critical, "Regex Test")
End Try End Try
End Sub End Sub
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
RegexString = txtRegex.Text
End Sub
End Class End Class