MonoRepoUtils: Generate list of wix file entries from folder

This commit is contained in:
Jonathan Jenne 2022-06-15 16:36:10 +02:00
parent 3c3b07ee49
commit e35f5c84c3
5 changed files with 181 additions and 28 deletions

View File

@ -52,13 +52,17 @@
</PropertyGroup> </PropertyGroup>
<ItemGroup> <ItemGroup>
<Reference Include="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <Reference Include="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Dialogs.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Printing.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <Reference Include="DevExpress.Printing.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Sparkline.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <Reference Include="DevExpress.Sparkline.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Data.Desktop.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <Reference Include="DevExpress.Data.Desktop.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <Reference Include="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraDialogs.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraTreeList.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="System" /> <Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" /> <Reference Include="System.ComponentModel.DataAnnotations" />
<Reference Include="System.Data" /> <Reference Include="System.Data" />

View File

@ -0,0 +1,4 @@
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

View File

@ -58,6 +58,16 @@ Partial Class frmStart
Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.BehaviorManager1 = New DevExpress.Utils.Behaviors.BehaviorManager(Me.components) Me.BehaviorManager1 = New DevExpress.Utils.Behaviors.BehaviorManager(Me.components)
Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
Me.LayoutControl3 = New DevExpress.XtraLayout.LayoutControl()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.MemoEdit2 = New DevExpress.XtraEditors.MemoEdit()
Me.LayoutControlItem11 = New DevExpress.XtraLayout.LayoutControlItem()
Me.btnOpenDirectory = New DevExpress.XtraEditors.SimpleButton()
Me.LayoutControlItem12 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem13 = New DevExpress.XtraLayout.LayoutControlItem()
Me.XtraFolderBrowserDialog1 = New DevExpress.XtraEditors.XtraFolderBrowserDialog(Me.components)
CType(Me.ComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl1.SuspendLayout() Me.LayoutControl1.SuspendLayout()
@ -89,15 +99,24 @@ Partial Class frmStart
CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage1.SuspendLayout() Me.XtraTabPage1.SuspendLayout()
CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPage3.SuspendLayout()
CType(Me.LayoutControl3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl3.SuspendLayout()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MemoEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem13, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
'ComboBoxEdit1 'ComboBoxEdit1
' '
Me.ComboBoxEdit1.Location = New System.Drawing.Point(108, 20) Me.ComboBoxEdit1.Location = New System.Drawing.Point(117, 20)
Me.ComboBoxEdit1.Name = "ComboBoxEdit1" Me.ComboBoxEdit1.Name = "ComboBoxEdit1"
Me.ComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.ComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
Me.ComboBoxEdit1.Properties.Items.AddRange(New Object() {"ZUGFERD_SERVICE"}) Me.ComboBoxEdit1.Properties.Items.AddRange(New Object() {"ZUGFERD_SERVICE"})
Me.ComboBoxEdit1.Size = New System.Drawing.Size(742, 20) Me.ComboBoxEdit1.Size = New System.Drawing.Size(733, 20)
Me.ComboBoxEdit1.StyleController = Me.LayoutControl1 Me.ComboBoxEdit1.StyleController = Me.LayoutControl1
Me.ComboBoxEdit1.TabIndex = 0 Me.ComboBoxEdit1.TabIndex = 0
' '
@ -110,7 +129,7 @@ Partial Class frmStart
Me.LayoutControl1.Location = New System.Drawing.Point(0, 0) Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl1.Name = "LayoutControl1" Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.Root = Me.Root Me.LayoutControl1.Root = Me.Root
Me.LayoutControl1.Size = New System.Drawing.Size(1099, 391) Me.LayoutControl1.Size = New System.Drawing.Size(1099, 390)
Me.LayoutControl1.TabIndex = 1 Me.LayoutControl1.TabIndex = 1
Me.LayoutControl1.Text = "LayoutControl1" Me.LayoutControl1.Text = "LayoutControl1"
' '
@ -120,7 +139,7 @@ Partial Class frmStart
Me.MemoEdit1.Name = "MemoEdit1" Me.MemoEdit1.Name = "MemoEdit1"
Me.MemoEdit1.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.MemoEdit1.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.MemoEdit1.Properties.Appearance.Options.UseFont = True Me.MemoEdit1.Properties.Appearance.Options.UseFont = True
Me.MemoEdit1.Size = New System.Drawing.Size(1059, 293) Me.MemoEdit1.Size = New System.Drawing.Size(1059, 292)
Me.MemoEdit1.StyleController = Me.LayoutControl1 Me.MemoEdit1.StyleController = Me.LayoutControl1
Me.MemoEdit1.TabIndex = 5 Me.MemoEdit1.TabIndex = 5
' '
@ -139,7 +158,7 @@ Partial Class frmStart
Me.Root.GroupBordersVisible = False Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3}) Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3})
Me.Root.Name = "Root" Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(1099, 391) Me.Root.Size = New System.Drawing.Size(1099, 390)
Me.Root.TextVisible = False Me.Root.TextVisible = False
' '
'LayoutControlItem1 'LayoutControlItem1
@ -168,7 +187,7 @@ Partial Class frmStart
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 42) Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 42)
Me.LayoutControlItem3.Name = "LayoutControlItem3" Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem3.Size = New System.Drawing.Size(1079, 329) Me.LayoutControlItem3.Size = New System.Drawing.Size(1079, 328)
Me.LayoutControlItem3.Text = "Config Template" Me.LayoutControlItem3.Text = "Config Template"
Me.LayoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top Me.LayoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(85, 13) Me.LayoutControlItem3.TextSize = New System.Drawing.Size(85, 13)
@ -177,9 +196,9 @@ Partial Class frmStart
' '
Me.FluentDesignFormContainer1.Controls.Add(Me.XtraTabControl1) Me.FluentDesignFormContainer1.Controls.Add(Me.XtraTabControl1)
Me.FluentDesignFormContainer1.Dock = System.Windows.Forms.DockStyle.Fill Me.FluentDesignFormContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.FluentDesignFormContainer1.Location = New System.Drawing.Point(0, 159) Me.FluentDesignFormContainer1.Location = New System.Drawing.Point(0, 160)
Me.FluentDesignFormContainer1.Name = "FluentDesignFormContainer1" Me.FluentDesignFormContainer1.Name = "FluentDesignFormContainer1"
Me.FluentDesignFormContainer1.Size = New System.Drawing.Size(1101, 414) Me.FluentDesignFormContainer1.Size = New System.Drawing.Size(1101, 413)
Me.FluentDesignFormContainer1.TabIndex = 2 Me.FluentDesignFormContainer1.TabIndex = 2
' '
'XtraTabControl1 'XtraTabControl1
@ -188,15 +207,15 @@ Partial Class frmStart
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0) Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage2 Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage2
Me.XtraTabControl1.Size = New System.Drawing.Size(1101, 414) Me.XtraTabControl1.Size = New System.Drawing.Size(1101, 413)
Me.XtraTabControl1.TabIndex = 0 Me.XtraTabControl1.TabIndex = 0
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage2, Me.XtraTabPage1}) Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage2, Me.XtraTabPage1, Me.XtraTabPage3})
' '
'XtraTabPage2 'XtraTabPage2
' '
Me.XtraTabPage2.Controls.Add(Me.LayoutControl2) Me.XtraTabPage2.Controls.Add(Me.LayoutControl2)
Me.XtraTabPage2.Name = "XtraTabPage2" Me.XtraTabPage2.Name = "XtraTabPage2"
Me.XtraTabPage2.Size = New System.Drawing.Size(1099, 391) Me.XtraTabPage2.Size = New System.Drawing.Size(1099, 390)
Me.XtraTabPage2.Text = "EmailSignature Generator" Me.XtraTabPage2.Text = "EmailSignature Generator"
' '
'LayoutControl2 'LayoutControl2
@ -212,18 +231,18 @@ Partial Class frmStart
Me.LayoutControl2.Location = New System.Drawing.Point(0, 0) Me.LayoutControl2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl2.Name = "LayoutControl2" Me.LayoutControl2.Name = "LayoutControl2"
Me.LayoutControl2.Root = Me.LayoutControlGroup1 Me.LayoutControl2.Root = Me.LayoutControlGroup1
Me.LayoutControl2.Size = New System.Drawing.Size(1099, 391) Me.LayoutControl2.Size = New System.Drawing.Size(1099, 390)
Me.LayoutControl2.TabIndex = 0 Me.LayoutControl2.TabIndex = 0
Me.LayoutControl2.Text = "LayoutControl2" Me.LayoutControl2.Text = "LayoutControl2"
' '
'txxTemplate 'txxTemplate
' '
Me.txxTemplate.Location = New System.Drawing.Point(135, 140) Me.txxTemplate.Location = New System.Drawing.Point(144, 140)
Me.txxTemplate.MenuManager = Me.RibbonControl1 Me.txxTemplate.MenuManager = Me.RibbonControl1
Me.txxTemplate.Name = "txxTemplate" Me.txxTemplate.Name = "txxTemplate"
Me.txxTemplate.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txxTemplate.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txxTemplate.Properties.Appearance.Options.UseFont = True Me.txxTemplate.Properties.Appearance.Options.UseFont = True
Me.txxTemplate.Size = New System.Drawing.Size(944, 231) Me.txxTemplate.Size = New System.Drawing.Size(935, 230)
Me.txxTemplate.StyleController = Me.LayoutControl2 Me.txxTemplate.StyleController = Me.LayoutControl2
Me.txxTemplate.TabIndex = 4 Me.txxTemplate.TabIndex = 4
' '
@ -235,7 +254,7 @@ Partial Class frmStart
Me.RibbonControl1.MaxItemId = 4 Me.RibbonControl1.MaxItemId = 4
Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.Size = New System.Drawing.Size(1101, 159) Me.RibbonControl1.Size = New System.Drawing.Size(1101, 160)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
' '
'BarButtonItem1 'BarButtonItem1
@ -273,37 +292,37 @@ Partial Class frmStart
' '
'txtBannerUrl 'txtBannerUrl
' '
Me.txtBannerUrl.Location = New System.Drawing.Point(135, 20) Me.txtBannerUrl.Location = New System.Drawing.Point(144, 20)
Me.txtBannerUrl.MenuManager = Me.RibbonControl1 Me.txtBannerUrl.MenuManager = Me.RibbonControl1
Me.txtBannerUrl.Name = "txtBannerUrl" Me.txtBannerUrl.Name = "txtBannerUrl"
Me.txtBannerUrl.Size = New System.Drawing.Size(361, 20) Me.txtBannerUrl.Size = New System.Drawing.Size(352, 20)
Me.txtBannerUrl.StyleController = Me.LayoutControl2 Me.txtBannerUrl.StyleController = Me.LayoutControl2
Me.txtBannerUrl.TabIndex = 5 Me.txtBannerUrl.TabIndex = 5
' '
'txtTrackingUrl 'txtTrackingUrl
' '
Me.txtTrackingUrl.Location = New System.Drawing.Point(631, 20) Me.txtTrackingUrl.Location = New System.Drawing.Point(640, 20)
Me.txtTrackingUrl.MenuManager = Me.RibbonControl1 Me.txtTrackingUrl.MenuManager = Me.RibbonControl1
Me.txtTrackingUrl.Name = "txtTrackingUrl" Me.txtTrackingUrl.Name = "txtTrackingUrl"
Me.txtTrackingUrl.Size = New System.Drawing.Size(448, 20) Me.txtTrackingUrl.Size = New System.Drawing.Size(439, 20)
Me.txtTrackingUrl.StyleController = Me.LayoutControl2 Me.txtTrackingUrl.StyleController = Me.LayoutControl2
Me.txtTrackingUrl.TabIndex = 6 Me.txtTrackingUrl.TabIndex = 6
' '
'txtOutputPath 'txtOutputPath
' '
Me.txtOutputPath.Location = New System.Drawing.Point(631, 60) Me.txtOutputPath.Location = New System.Drawing.Point(640, 60)
Me.txtOutputPath.MenuManager = Me.RibbonControl1 Me.txtOutputPath.MenuManager = Me.RibbonControl1
Me.txtOutputPath.Name = "txtOutputPath" Me.txtOutputPath.Name = "txtOutputPath"
Me.txtOutputPath.Size = New System.Drawing.Size(448, 20) Me.txtOutputPath.Size = New System.Drawing.Size(439, 20)
Me.txtOutputPath.StyleController = Me.LayoutControl2 Me.txtOutputPath.StyleController = Me.LayoutControl2
Me.txtOutputPath.TabIndex = 7 Me.txtOutputPath.TabIndex = 7
' '
'txtADGroup 'txtADGroup
' '
Me.txtADGroup.Location = New System.Drawing.Point(135, 60) Me.txtADGroup.Location = New System.Drawing.Point(144, 60)
Me.txtADGroup.MenuManager = Me.RibbonControl1 Me.txtADGroup.MenuManager = Me.RibbonControl1
Me.txtADGroup.Name = "txtADGroup" Me.txtADGroup.Name = "txtADGroup"
Me.txtADGroup.Size = New System.Drawing.Size(361, 20) Me.txtADGroup.Size = New System.Drawing.Size(352, 20)
Me.txtADGroup.StyleController = Me.LayoutControl2 Me.txtADGroup.StyleController = Me.LayoutControl2
Me.txtADGroup.TabIndex = 8 Me.txtADGroup.TabIndex = 8
' '
@ -321,10 +340,10 @@ Partial Class frmStart
' '
'txtADRoot 'txtADRoot
' '
Me.txtADRoot.Location = New System.Drawing.Point(135, 100) Me.txtADRoot.Location = New System.Drawing.Point(144, 100)
Me.txtADRoot.MenuManager = Me.RibbonControl1 Me.txtADRoot.MenuManager = Me.RibbonControl1
Me.txtADRoot.Name = "txtADRoot" Me.txtADRoot.Name = "txtADRoot"
Me.txtADRoot.Size = New System.Drawing.Size(361, 20) Me.txtADRoot.Size = New System.Drawing.Size(352, 20)
Me.txtADRoot.StyleController = Me.LayoutControl2 Me.txtADRoot.StyleController = Me.LayoutControl2
Me.txtADRoot.TabIndex = 10 Me.txtADRoot.TabIndex = 10
' '
@ -334,7 +353,7 @@ Partial Class frmStart
Me.LayoutControlGroup1.GroupBordersVisible = False Me.LayoutControlGroup1.GroupBordersVisible = False
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10}) Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10})
Me.LayoutControlGroup1.Name = "LayoutControlGroup1" Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
Me.LayoutControlGroup1.Size = New System.Drawing.Size(1099, 391) Me.LayoutControlGroup1.Size = New System.Drawing.Size(1099, 390)
Me.LayoutControlGroup1.TextVisible = False Me.LayoutControlGroup1.TextVisible = False
' '
'LayoutControlItem4 'LayoutControlItem4
@ -343,7 +362,7 @@ Partial Class frmStart
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120) Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120)
Me.LayoutControlItem4.Name = "LayoutControlItem4" Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem4.Size = New System.Drawing.Size(1079, 251) Me.LayoutControlItem4.Size = New System.Drawing.Size(1079, 250)
Me.LayoutControlItem4.Text = "HTML Template" Me.LayoutControlItem4.Text = "HTML Template"
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem4.TextSize = New System.Drawing.Size(112, 13)
' '
@ -410,7 +429,7 @@ Partial Class frmStart
' '
Me.XtraTabPage1.Controls.Add(Me.LayoutControl1) Me.XtraTabPage1.Controls.Add(Me.LayoutControl1)
Me.XtraTabPage1.Name = "XtraTabPage1" Me.XtraTabPage1.Name = "XtraTabPage1"
Me.XtraTabPage1.Size = New System.Drawing.Size(1099, 391) Me.XtraTabPage1.Size = New System.Drawing.Size(1099, 390)
Me.XtraTabPage1.Text = "ConfigCreator" Me.XtraTabPage1.Text = "ConfigCreator"
' '
'RibbonPage2 'RibbonPage2
@ -418,6 +437,91 @@ Partial Class frmStart
Me.RibbonPage2.Name = "RibbonPage2" Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "RibbonPage2" Me.RibbonPage2.Text = "RibbonPage2"
' '
'XtraTabPage3
'
Me.XtraTabPage3.Controls.Add(Me.LayoutControl3)
Me.XtraTabPage3.Name = "XtraTabPage3"
Me.XtraTabPage3.Size = New System.Drawing.Size(1099, 390)
Me.XtraTabPage3.Text = "XtraTabPage3"
'
'LayoutControl3
'
Me.LayoutControl3.Controls.Add(Me.MemoEdit2)
Me.LayoutControl3.Controls.Add(Me.btnOpenDirectory)
Me.LayoutControl3.Controls.Add(Me.TextEdit1)
Me.LayoutControl3.Dock = System.Windows.Forms.DockStyle.Fill
Me.LayoutControl3.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl3.Name = "LayoutControl3"
Me.LayoutControl3.Root = Me.LayoutControlGroup2
Me.LayoutControl3.Size = New System.Drawing.Size(1099, 390)
Me.LayoutControl3.TabIndex = 1
Me.LayoutControl3.Text = "LayoutControl3"
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.LayoutControlGroup2.GroupBordersVisible = False
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlItem12})
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(1099, 390)
Me.LayoutControlGroup2.TextVisible = False
'
'MemoEdit2
'
Me.MemoEdit2.Location = New System.Drawing.Point(131, 38)
Me.MemoEdit2.MenuManager = Me.RibbonControl1
Me.MemoEdit2.Name = "MemoEdit2"
Me.MemoEdit2.Size = New System.Drawing.Size(956, 340)
Me.MemoEdit2.StyleController = Me.LayoutControl3
Me.MemoEdit2.TabIndex = 4
'
'LayoutControlItem11
'
Me.LayoutControlItem11.Control = Me.MemoEdit2
Me.LayoutControlItem11.Location = New System.Drawing.Point(0, 26)
Me.LayoutControlItem11.Name = "LayoutControlItem11"
Me.LayoutControlItem11.Size = New System.Drawing.Size(1079, 344)
Me.LayoutControlItem11.TextSize = New System.Drawing.Size(107, 13)
'
'btnOpenDirectory
'
Me.btnOpenDirectory.Location = New System.Drawing.Point(966, 12)
Me.btnOpenDirectory.Name = "btnOpenDirectory"
Me.btnOpenDirectory.Size = New System.Drawing.Size(121, 22)
Me.btnOpenDirectory.StyleController = Me.LayoutControl3
Me.btnOpenDirectory.TabIndex = 5
Me.btnOpenDirectory.Text = "SimpleButton3"
'
'LayoutControlItem12
'
Me.LayoutControlItem12.Control = Me.btnOpenDirectory
Me.LayoutControlItem12.Location = New System.Drawing.Point(954, 0)
Me.LayoutControlItem12.Name = "LayoutControlItem12"
Me.LayoutControlItem12.Size = New System.Drawing.Size(125, 26)
Me.LayoutControlItem12.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem12.TextVisible = False
'
'TextEdit1
'
Me.TextEdit1.Location = New System.Drawing.Point(131, 12)
Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Size = New System.Drawing.Size(831, 20)
Me.TextEdit1.StyleController = Me.LayoutControl3
Me.TextEdit1.TabIndex = 6
'
'LayoutControlItem13
'
Me.LayoutControlItem13.Control = Me.TextEdit1
Me.LayoutControlItem13.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem13.Name = "LayoutControlItem13"
Me.LayoutControlItem13.Size = New System.Drawing.Size(954, 26)
Me.LayoutControlItem13.TextSize = New System.Drawing.Size(107, 13)
'
'XtraFolderBrowserDialog1
'
Me.XtraFolderBrowserDialog1.SelectedPath = "XtraFolderBrowserDialog1"
'
'frmStart 'frmStart
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -462,6 +566,15 @@ Partial Class frmStart
CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage1.ResumeLayout(False) Me.XtraTabPage1.ResumeLayout(False)
CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPage3.ResumeLayout(False)
CType(Me.LayoutControl3, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl3.ResumeLayout(False)
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MemoEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem13, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
@ -503,4 +616,14 @@ Partial Class frmStart
Friend WithEvents BehaviorManager1 As DevExpress.Utils.Behaviors.BehaviorManager Friend WithEvents BehaviorManager1 As DevExpress.Utils.Behaviors.BehaviorManager
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents XtraTabPage3 As DevExpress.XtraTab.XtraTabPage
Friend WithEvents LayoutControl3 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents MemoEdit2 As MemoEdit
Friend WithEvents btnOpenDirectory As SimpleButton
Friend WithEvents TextEdit1 As TextEdit
Friend WithEvents LayoutControlGroup2 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlItem11 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem13 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem12 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents XtraFolderBrowserDialog1 As XtraFolderBrowserDialog
End Class End Class

View File

@ -120,4 +120,7 @@
<metadata name="BehaviorManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="BehaviorManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value> <value>17, 17</value>
</metadata> </metadata>
<metadata name="XtraFolderBrowserDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>171, 17</value>
</metadata>
</root> </root>

View File

@ -4,6 +4,7 @@ Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Logging Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Interfaces Imports DigitalData.Modules.Interfaces
Imports DigitalData.GUIs.MonoRepoUtils.Config Imports DigitalData.GUIs.MonoRepoUtils.Config
Imports System.Text
Public Class frmStart Public Class frmStart
Private Const ZUGFERD_SERVICE = "ZUGFERD_SERVICE" Private Const ZUGFERD_SERVICE = "ZUGFERD_SERVICE"
@ -113,4 +114,22 @@ Public Class frmStart
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
SaveSettings() SaveSettings()
End Sub End Sub
Private Sub btnOpenDirectory_Click(sender As Object, e As EventArgs) Handles btnOpenDirectory.Click
Dim oResult = XtraFolderBrowserDialog1.ShowDialog()
If oResult = DialogResult.OK Then
Dim oPath = XtraFolderBrowserDialog1.SelectedPath
Dim oFiles = IO.Directory.GetFiles(oPath, "*.dll")
Dim oStringBuilder As New StringBuilder()
For Each oFile In oFiles
Dim oFileInfo = New FileInfo(oFile)
Dim oText = $"<File Id=""{oFileInfo.Name}"" Name=""{oFileInfo.Name}"" KeyPath=""no"" Checksum=""yes"" />"
oStringBuilder.Append($"{oText}{vbNewLine}")
Next
MemoEdit2.EditValue = oStringBuilder.ToString
End If
End Sub
End Class End Class