Skip to content

Commit 19dfc7a

Browse files
committed
[Refactor] Use complete DISM API lists when possible
1 parent c08d4f3 commit 19dfc7a

File tree

13 files changed

+388
-1512
lines changed

13 files changed

+388
-1512
lines changed

MainForm.vb

Lines changed: 339 additions & 1293 deletions
Large diffs are not rendered by default.

Panels/Img_Ops/AppxPkgs/RemProvAppxPackage.Designer.vb

Lines changed: 1 addition & 13 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

Panels/Img_Ops/Capabilities/AddCapabilities.Designer.vb

Lines changed: 0 additions & 13 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

Panels/Img_Ops/Capabilities/AddCapabilities.vb

Lines changed: 0 additions & 25 deletions
Original file line numberDiff line numberDiff line change
@@ -386,31 +386,6 @@ Public Class AddCapabilities
386386
Text = ""
387387
Win10Title.Visible = True
388388
End If
389-
Select Case MainForm.Language
390-
Case 0
391-
Select Case My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName
392-
Case "ENU", "ENG"
393-
Label4.Text &= " Only not installed capabilities (" & ListView1.Items.Count & ") are shown"
394-
Case "ESN"
395-
Label4.Text &= " Solo las funcionalidades no instaladas (" & ListView1.Items.Count & ") son mostradas"
396-
Case "FRA"
397-
Label4.Text &= " Seules les capacités non installées (" & ListView1.Items.Count & ") sont représentées"
398-
Case "PTB", "PTG"
399-
Label4.Text &= " Só são mostradas as capacidades não instaladas (" & ListView1.Items.Count & ")"
400-
Case "ITA"
401-
Label4.Text &= " Sono mostrate solo le funzionalità non installate (" & ListView1.Items.Count & ")"
402-
End Select
403-
Case 1
404-
Label4.Text &= " Only not installed capabilities (" & ListView1.Items.Count & ") are shown"
405-
Case 2
406-
Label4.Text &= " Solo las funcionalidades no instaladas (" & ListView1.Items.Count & ") son mostradas"
407-
Case 3
408-
Label4.Text &= " Seules les capacités non installées (" & ListView1.Items.Count & ") sont représentées"
409-
Case 4
410-
Label4.Text &= " Só são mostradas as capacidades não instaladas (" & ListView1.Items.Count & ")"
411-
Case 5
412-
Label4.Text &= " Sono mostrate solo le funzionalità non installate (" & ListView1.Items.Count & ")"
413-
End Select
414389
Win10Title.BackColor = CurrentTheme.BackgroundColor
415390
BackColor = CurrentTheme.SectionBackgroundColor
416391
ForeColor = CurrentTheme.ForegroundColor

Panels/Img_Ops/Capabilities/RemCapabilities.Designer.vb

Lines changed: 1 addition & 14 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

Panels/Img_Ops/Capabilities/RemCapabilities.vb

Lines changed: 0 additions & 25 deletions
Original file line numberDiff line numberDiff line change
@@ -148,31 +148,6 @@ Public Class RemCapabilities
148148
ForeColor = CurrentTheme.ForegroundColor
149149
ListView1.BackColor = CurrentTheme.SectionBackgroundColor
150150
ListView1.ForeColor = ForeColor
151-
Select Case MainForm.Language
152-
Case 0
153-
Select Case My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName
154-
Case "ENU", "ENG"
155-
Label2.Text &= " Only installed capabilities (" & ListView1.Items.Count & ") are shown"
156-
Case "ESN"
157-
Label2.Text &= " Solo las funcionalidades instaladas (" & ListView1.Items.Count & ") son mostradas"
158-
Case "FRA"
159-
Label2.Text &= " Seules les capacités installées (" & ListView1.Items.Count & ") sont représentées"
160-
Case "PTB", "PTG"
161-
Label2.Text &= " Só são mostradas as capacidades instaladas (" & ListView1.Items.Count & ")"
162-
Case "ITA"
163-
Label2.Text &= " Sono mostrate solo le capacità installate (" & ListView1.Items.Count & ")"
164-
End Select
165-
Case 1
166-
Label2.Text &= " Only installed capabilities (" & ListView1.Items.Count & ") are shown"
167-
Case 2
168-
Label2.Text &= " Solo las funcionalidades instaladas (" & ListView1.Items.Count & ") son mostradas"
169-
Case 3
170-
Label2.Text &= " Seules les capacités installées (" & ListView1.Items.Count & ") sont représentées"
171-
Case 4
172-
Label2.Text &= " Só são mostradas as capacidades instaladas (" & ListView1.Items.Count & ")"
173-
Case 5
174-
Label2.Text &= " Sono mostrate solo le capacità installate (" & ListView1.Items.Count & ")"
175-
End Select
176151
Dim handle As IntPtr = MainForm.GetWindowHandle(Me)
177152
If MainForm.IsWindowsVersionOrGreater(10, 0, 18362) Then MainForm.EnableDarkTitleBar(handle, CurrentTheme.IsDark)
178153
End Sub

0 commit comments

Comments
 (0)