diff --git a/.gitignore b/.gitignore index f0defa9..f993283 100644 --- a/.gitignore +++ b/.gitignore @@ -3,3 +3,4 @@ ################################################################################ /.vs/SC2kInstall/v16/Server/sqlite3 +/.vs/SC2kInstall/v16 diff --git a/SC2kInstall.sln b/SC2kInstall.sln index 65242c3..f058627 100644 --- a/SC2kInstall.sln +++ b/SC2kInstall.sln @@ -1,26 +1,37 @@  Microsoft Visual Studio Solution File, Format Version 12.00 -# Visual Studio Express 2012 for Windows Desktop +# Visual Studio Version 16 +VisualStudioVersion = 16.0.29806.167 +MinimumVisualStudioVersion = 10.0.40219.1 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "SC2kInstall", "SC2kInstall\SC2kInstall.vbproj", "{4E1D92F3-E123-4B10-8E48-9460DFBFD872}" EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU + Debug|x64 = Debug|x64 Debug|x86 = Debug|x86 Release|Any CPU = Release|Any CPU + Release|x64 = Release|x64 Release|x86 = Release|x86 EndGlobalSection GlobalSection(ProjectConfigurationPlatforms) = postSolution {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|Any CPU.ActiveCfg = Debug|Any CPU {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|Any CPU.Build.0 = Debug|Any CPU + {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|x64.ActiveCfg = Debug|x64 + {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|x64.Build.0 = Debug|x64 {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|x86.ActiveCfg = Debug|x86 {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Debug|x86.Build.0 = Debug|x86 {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|Any CPU.ActiveCfg = Release|Any CPU {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|Any CPU.Build.0 = Release|Any CPU + {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|x64.ActiveCfg = Release|x64 + {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|x64.Build.0 = Release|x64 {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|x86.ActiveCfg = Release|x86 {4E1D92F3-E123-4B10-8E48-9460DFBFD872}.Release|x86.Build.0 = Release|x86 EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE EndGlobalSection + GlobalSection(ExtensibilityGlobals) = postSolution + SolutionGuid = {93C3958D-6508-4FCA-AD3C-23DC02A2AB0D} + EndGlobalSection EndGlobal diff --git a/SC2kInstall.suo b/SC2kInstall.suo deleted file mode 100644 index ba975fa..0000000 Binary files a/SC2kInstall.suo and /dev/null differ diff --git a/SC2kInstall.v11.suo b/SC2kInstall.v11.suo deleted file mode 100644 index 4bdca1e..0000000 Binary files a/SC2kInstall.v11.suo and /dev/null differ diff --git a/SC2kInstall/BACKGROUND.Designer.VB b/SC2kInstall/BACKGROUND.Designer.VB index 8811140..d6e737c 100644 --- a/SC2kInstall/BACKGROUND.Designer.VB +++ b/SC2kInstall/BACKGROUND.Designer.VB @@ -1,9 +1,9 @@ - _ + Partial Class BACKGROUND Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. - _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then @@ -20,12 +20,12 @@ Partial Class BACKGROUND 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. - _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(BACKGROUND)) Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() - Me.LinkLabel1 = New System.Windows.Forms.LinkLabel() Me.SuspendLayout() ' 'Label1 @@ -34,9 +34,10 @@ Partial Class BACKGROUND Me.Label1.BackColor = System.Drawing.Color.Transparent Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.ForeColor = System.Drawing.Color.Black - Me.Label1.Location = New System.Drawing.Point(13, 13) + Me.Label1.Location = New System.Drawing.Point(15, 51) + Me.Label1.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(406, 46) + Me.Label1.Size = New System.Drawing.Size(808, 91) Me.Label1.TabIndex = 0 Me.Label1.Text = "SimCity 2000 Installer" ' @@ -45,11 +46,12 @@ Partial Class BACKGROUND Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label2.AutoSize = True Me.Label2.BackColor = System.Drawing.Color.Transparent - Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label2.ForeColor = System.Drawing.SystemColors.ButtonHighlight - Me.Label2.Location = New System.Drawing.Point(1048, 9) + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.ForeColor = System.Drawing.SystemColors.ScrollBar + Me.Label2.Location = New System.Drawing.Point(2090, 51) + Me.Label2.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(18, 9) + Me.Label2.Size = New System.Drawing.Size(49, 26) Me.Label2.TabIndex = 1 Me.Label2.Text = "Exit" ' @@ -58,38 +60,27 @@ Partial Class BACKGROUND Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.Label3.AutoSize = True Me.Label3.BackColor = System.Drawing.Color.Transparent - Me.Label3.Location = New System.Drawing.Point(13, 606) + Me.Label3.Location = New System.Drawing.Point(26, 1165) + Me.Label3.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(80, 13) + Me.Label3.Size = New System.Drawing.Size(159, 25) Me.Label3.TabIndex = 2 Me.Label3.Text = "Beta Release 2" ' - 'LinkLabel1 - ' - Me.LinkLabel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.LinkLabel1.AutoSize = True - Me.LinkLabel1.BackColor = System.Drawing.Color.Transparent - Me.LinkLabel1.LinkColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer)) - Me.LinkLabel1.Location = New System.Drawing.Point(991, 606) - Me.LinkLabel1.Name = "LinkLabel1" - Me.LinkLabel1.Size = New System.Drawing.Size(75, 13) - Me.LinkLabel1.TabIndex = 3 - Me.LinkLabel1.TabStop = True - Me.LinkLabel1.Text = "aldude999.net" - ' 'BACKGROUND ' - Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleDimensions = New System.Drawing.SizeF(12.0!, 25.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.Blue Me.BackgroundImage = Global.WindowsApplication1.My.Resources.Resources.Maxis_Logo Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center - Me.ClientSize = New System.Drawing.Size(1077, 631) - Me.Controls.Add(Me.LinkLabel1) + Me.ClientSize = New System.Drawing.Size(2154, 1213) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.DoubleBuffered = True + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.Margin = New System.Windows.Forms.Padding(6) Me.Name = "BACKGROUND" Me.Text = "BACKGROUND" Me.ResumeLayout(False) @@ -99,5 +90,4 @@ Partial Class BACKGROUND Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label3 As System.Windows.Forms.Label - Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel End Class diff --git a/SC2kInstall/BACKGROUND.VB b/SC2kInstall/BACKGROUND.VB index 19bda03..47e527f 100644 --- a/SC2kInstall/BACKGROUND.VB +++ b/SC2kInstall/BACKGROUND.VB @@ -36,9 +36,9 @@ Me.Close() End Sub - Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked - Dim website As String = "https://aldude999.net" - Process.Start(website) + Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) + ' Dim website As String = "https://aldude999.net" + ' Process.Start(website) End Sub End Class \ No newline at end of file diff --git a/SC2kInstall/BACKGROUND.resx b/SC2kInstall/BACKGROUND.resx index d58980a..997b960 100644 --- a/SC2kInstall/BACKGROUND.resx +++ b/SC2kInstall/BACKGROUND.resx @@ -117,4 +117,27 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + AAABAAIAICAQAAAAAADoAgAAJgAAABAQEAAAAAAAKAEAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/ + AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAAAAAAAAAAAAAAACIf3///3+IgAAAAAAAAAiHh4 + f3//f3d3iAAAAAAAjdiHh3f///f3d3c4AAAACN3diHh3//93d3czMyAAAIM93diHh3/393MzM6ooAAij + Mz3diIiIiIgzOqqGhgCP+qozPdiAAAAAgiaIaGiAj///qjM4AAAAAAhoZoaGgI7u7u7jOHdwB3gAiGZ3 + d3CLu7u7szgICAgIAACCIiIgiGhoaGhof3d3dwAACIM3cIaGhoaCiAgICAgAAAAIiIAIaGiq/4f3d3d3 + gAAAAAgACIKq/zOAgICAgIAAAAAIAACC/zN3h/d3d3dwCIVVUAAACDN3eICAgICAgAh4hQAAAACId3h/ + d3d3d3gAiAAAAAAAAIiICAgICAgIAAAAAAAAAAAACH93d3d3dwAAAAAAAAAAAIgICAgICAgAAAAAAAAA + AACH93d3d3d3gAAAAAAAAAAAgICAgICAgIAAAAAAAAAAAIf3d3d3d3dwAAAAAAAAAAB/////////dwAA + AAAAAAAIAIiIiIiIiIAIAAAAAAAACRAIiIiIiIgAGQAAAAAAAACIAIiICIiACIAAAAAAAAAAAIAAAAAA + AIAAAAAAAAAAAAABiIgIiIEAAAAAAAAAAAAACQAAEAAJAAAAAAAAAAAAAAAAAIAAAAAAAAAA/4AAf/wA + AB/wAAAH4AAAA8AAAAGAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAAGAAAABwAAAA+AA + AAfwAAAP/AAAP/+AAf//AAH//wAA//8AAP//AAD//wAAf/4AAD/+AAA//wAAf//AAf//4AP//+97//// + f/8oAAAAEAAAACAAAAABAAQAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAA + AACAAIAAgIAAAMDAwACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAB3//93 + AAAA3Xd/93czAAOt14AAiqZgD/rYAAAIZmCLu4B4iAAiIIZngHCAAIiACHeAeIgACAAAiIBwgAAAAAAA + B4iIAAAAAAAHgIAAAAAAAAAAAAAAAAAAh3d3eAAAAAEIiIiAEAAAAAAAAAAAAAAAAQAAEAAA8A9IBMAD + AACAAQAAAAAAAAAAAAAAAAAAAAAAAIABAADAAwAA8A8AAPAPAADwDwAA4AcAAOAHAAD4HwAA+98AAA== + + \ No newline at end of file diff --git a/SC2kInstall/Form3.Designer.vb b/SC2kInstall/Form3.Designer.vb index ae6eacb..461c500 100644 --- a/SC2kInstall/Form3.Designer.vb +++ b/SC2kInstall/Form3.Designer.vb @@ -32,15 +32,17 @@ Partial Class Form3 Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) Me.CheckBox2 = New System.Windows.Forms.CheckBox() + Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label1.Location = New System.Drawing.Point(12, 9) + Me.Label1.Location = New System.Drawing.Point(24, 17) + Me.Label1.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(294, 24) + Me.Label1.Size = New System.Drawing.Size(560, 44) Me.Label1.TabIndex = 0 Me.Label1.Text = "Where is Your ""SC2K"" Folder?" ' @@ -50,17 +52,19 @@ Partial Class Form3 ' 'TextBox1 ' - Me.TextBox1.Location = New System.Drawing.Point(16, 37) + Me.TextBox1.Location = New System.Drawing.Point(32, 71) + Me.TextBox1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.TextBox1.Name = "TextBox1" - Me.TextBox1.Size = New System.Drawing.Size(254, 20) + Me.TextBox1.Size = New System.Drawing.Size(504, 31) Me.TextBox1.TabIndex = 1 Me.TextBox1.Text = "SC2K" ' 'Button1 ' - Me.Button1.Location = New System.Drawing.Point(276, 37) + Me.Button1.Location = New System.Drawing.Point(552, 71) + Me.Button1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.Button1.Name = "Button1" - Me.Button1.Size = New System.Drawing.Size(30, 20) + Me.Button1.Size = New System.Drawing.Size(60, 38) Me.Button1.TabIndex = 2 Me.Button1.Text = "..." Me.Button1.UseVisualStyleBackColor = True @@ -68,9 +72,10 @@ Partial Class Form3 'Button3 ' Me.Button3.Font = New System.Drawing.Font("Lucida Console", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button3.Location = New System.Drawing.Point(230, 63) + Me.Button3.Location = New System.Drawing.Point(460, 121) + Me.Button3.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(75, 23) + Me.Button3.Size = New System.Drawing.Size(150, 44) Me.Button3.TabIndex = 4 Me.Button3.Text = "Next" Me.Button3.UseVisualStyleBackColor = True @@ -78,31 +83,46 @@ Partial Class Form3 'CheckBox1 ' Me.CheckBox1.AutoSize = True - Me.CheckBox1.Location = New System.Drawing.Point(16, 69) + Me.CheckBox1.Location = New System.Drawing.Point(32, 133) + Me.CheckBox1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.CheckBox1.Name = "CheckBox1" - Me.CheckBox1.Size = New System.Drawing.Size(89, 17) + Me.CheckBox1.Size = New System.Drawing.Size(174, 29) Me.CheckBox1.TabIndex = 5 Me.CheckBox1.Text = "Only Register" - Me.ToolTip1.SetToolTip(Me.CheckBox1, "Check this box if you want to register your files in their current folder. Checki" & _ + Me.ToolTip1.SetToolTip(Me.CheckBox1, "Check this box if you want to register your files in their current folder. Checki" & "ng this box WILL NOT install the files!") Me.CheckBox1.UseVisualStyleBackColor = True ' 'CheckBox2 ' Me.CheckBox2.AutoSize = True - Me.CheckBox2.Location = New System.Drawing.Point(16, 84) + Me.CheckBox2.Location = New System.Drawing.Point(32, 162) + Me.CheckBox2.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.CheckBox2.Name = "CheckBox2" - Me.CheckBox2.Size = New System.Drawing.Size(204, 17) + Me.CheckBox2.Size = New System.Drawing.Size(403, 29) Me.CheckBox2.TabIndex = 6 Me.CheckBox2.Text = "Install Load Game Patch (Windows 7)" Me.ToolTip1.SetToolTip(Me.CheckBox2, "This will install the Load/Save game patch requried for Windows 7 and above") Me.CheckBox2.UseVisualStyleBackColor = True ' + 'CheckBox3 + ' + Me.CheckBox3.AutoSize = True + Me.CheckBox3.Location = New System.Drawing.Point(32, 195) + Me.CheckBox3.Name = "CheckBox3" + Me.CheckBox3.Size = New System.Drawing.Size(412, 29) + Me.CheckBox3.TabIndex = 7 + Me.CheckBox3.Text = "Associate .sc2 files with Sim City 2000" + Me.ToolTip1.SetToolTip(Me.CheckBox3, "Enabling this will allow you to double click your cities to open them in Sim City" & + " 2000") + Me.CheckBox3.UseVisualStyleBackColor = True + ' 'Form3 ' - Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleDimensions = New System.Drawing.SizeF(12.0!, 25.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(314, 113) + Me.ClientSize = New System.Drawing.Size(628, 236) + Me.Controls.Add(Me.CheckBox3) Me.Controls.Add(Me.CheckBox2) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.Button3) @@ -110,6 +130,7 @@ Partial Class Form3 Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Label1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.Name = "Form3" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.ResumeLayout(False) @@ -124,4 +145,5 @@ Partial Class Form3 Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox + Friend WithEvents CheckBox3 As CheckBox End Class diff --git a/SC2kInstall/Form3.vb b/SC2kInstall/Form3.vb index b979972..4a61794 100644 --- a/SC2kInstall/Form3.vb +++ b/SC2kInstall/Form3.vb @@ -36,6 +36,7 @@ My.Settings.location = TextBox1.Text My.Settings.register = CheckBox1.Checked My.Settings.patch = CheckBox2.Checked + My.Settings.associate = CheckBox3.Checked My.Settings.Save() Form4.Show() Me.Close() @@ -78,4 +79,5 @@ TextBox1.Enabled = True End If End Sub + End Class \ No newline at end of file diff --git a/SC2kInstall/Form4.Designer.vb b/SC2kInstall/Form4.Designer.vb index 810ab30..5dba056 100644 --- a/SC2kInstall/Form4.Designer.vb +++ b/SC2kInstall/Form4.Designer.vb @@ -44,52 +44,58 @@ Partial Class Form4 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label1.Location = New System.Drawing.Point(13, 13) + Me.Label1.Location = New System.Drawing.Point(26, 25) + Me.Label1.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(228, 24) + Me.Label1.Size = New System.Drawing.Size(442, 44) Me.Label1.TabIndex = 0 Me.Label1.Text = "Personalize Your Install" ' 'Label2 ' Me.Label2.AutoSize = True - Me.Label2.Location = New System.Drawing.Point(17, 78) + Me.Label2.Location = New System.Drawing.Point(34, 150) + Me.Label2.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(67, 13) + Me.Label2.Size = New System.Drawing.Size(134, 25) Me.Label2.TabIndex = 1 Me.Label2.Text = "Mayor Name" ' 'TextBox1 ' - Me.TextBox1.Location = New System.Drawing.Point(20, 94) + Me.TextBox1.Location = New System.Drawing.Point(40, 181) + Me.TextBox1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.TextBox1.Name = "TextBox1" - Me.TextBox1.Size = New System.Drawing.Size(100, 20) + Me.TextBox1.Size = New System.Drawing.Size(196, 31) Me.TextBox1.TabIndex = 2 Me.TextBox1.Text = "aldude999" ' 'Label3 ' Me.Label3.AutoSize = True - Me.Label3.Location = New System.Drawing.Point(17, 122) + Me.Label3.Location = New System.Drawing.Point(34, 235) + Me.Label3.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(51, 13) + Me.Label3.Size = New System.Drawing.Size(103, 25) Me.Label3.TabIndex = 3 Me.Label3.Text = "Company" ' 'TextBox2 ' - Me.TextBox2.Location = New System.Drawing.Point(20, 138) + Me.TextBox2.Location = New System.Drawing.Point(40, 265) + Me.TextBox2.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.TextBox2.Name = "TextBox2" - Me.TextBox2.Size = New System.Drawing.Size(100, 20) + Me.TextBox2.Size = New System.Drawing.Size(196, 31) Me.TextBox2.TabIndex = 4 - Me.TextBox2.Text = "vbnalex.tk" + Me.TextBox2.Text = "aldude999.net" ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("Lucida Console", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button1.Location = New System.Drawing.Point(175, 180) + Me.Button1.Location = New System.Drawing.Point(350, 346) + Me.Button1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.Button1.Name = "Button1" - Me.Button1.Size = New System.Drawing.Size(75, 23) + Me.Button1.Size = New System.Drawing.Size(150, 44) Me.Button1.TabIndex = 5 Me.Button1.Text = "Install!" Me.Button1.UseVisualStyleBackColor = True @@ -97,26 +103,29 @@ Partial Class Form4 'Label4 ' Me.Label4.AutoSize = True - Me.Label4.Location = New System.Drawing.Point(17, 41) + Me.Label4.Location = New System.Drawing.Point(34, 79) + Me.Label4.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(48, 13) + Me.Label4.Size = New System.Drawing.Size(94, 25) Me.Label4.TabIndex = 6 Me.Label4.Text = "Location" ' 'TextBox3 ' - Me.TextBox3.Location = New System.Drawing.Point(20, 55) + Me.TextBox3.Location = New System.Drawing.Point(40, 106) + Me.TextBox3.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.TextBox3.Name = "TextBox3" - Me.TextBox3.Size = New System.Drawing.Size(221, 20) + Me.TextBox3.Size = New System.Drawing.Size(438, 31) Me.TextBox3.TabIndex = 7 Me.TextBox3.Text = "C:\Program Files\Maxis\SimCity 2000" ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True - Me.CheckBox1.Location = New System.Drawing.Point(17, 186) + Me.CheckBox1.Location = New System.Drawing.Point(34, 358) + Me.CheckBox1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.CheckBox1.Name = "CheckBox1" - Me.CheckBox1.Size = New System.Drawing.Size(66, 17) + Me.CheckBox1.Size = New System.Drawing.Size(124, 29) Me.CheckBox1.TabIndex = 8 Me.CheckBox1.Text = "Shortcut" Me.ToolTip1.SetToolTip(Me.CheckBox1, "Install a shortcut on the desktop") @@ -125,9 +134,10 @@ Partial Class Form4 'CheckBox2 ' Me.CheckBox2.AutoSize = True - Me.CheckBox2.Location = New System.Drawing.Point(93, 186) + Me.CheckBox2.Location = New System.Drawing.Point(186, 358) + Me.CheckBox2.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.CheckBox2.Name = "CheckBox2" - Me.CheckBox2.Size = New System.Drawing.Size(76, 17) + Me.CheckBox2.Size = New System.Drawing.Size(144, 29) Me.CheckBox2.TabIndex = 9 Me.CheckBox2.Text = "Menu Item" Me.ToolTip1.SetToolTip(Me.CheckBox2, "Install a shortcut in your menu") @@ -136,12 +146,13 @@ Partial Class Form4 'CheckBox3 ' Me.CheckBox3.AutoSize = True - Me.CheckBox3.Location = New System.Drawing.Point(17, 163) + Me.CheckBox3.Location = New System.Drawing.Point(34, 313) + Me.CheckBox3.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.CheckBox3.Name = "CheckBox3" - Me.CheckBox3.Size = New System.Drawing.Size(101, 17) + Me.CheckBox3.Size = New System.Drawing.Size(192, 29) Me.CheckBox3.TabIndex = 10 Me.CheckBox3.Text = "Include SCURK" - Me.ToolTip1.SetToolTip(Me.CheckBox3, "This will install SCURK, and add a shortcut in the menu folder if Menu Item is ch" & _ + Me.ToolTip1.SetToolTip(Me.CheckBox3, "This will install SCURK, and add a shortcut in the menu folder if Menu Item is ch" & "ecked. This will not work if you do not have SCURK in your Sim City folder!") Me.CheckBox3.UseVisualStyleBackColor = True ' @@ -149,26 +160,28 @@ Partial Class Form4 ' Me.ComboBox1.FormattingEnabled = True Me.ComboBox1.Items.AddRange(New Object() {"USA", "GER", "FRE"}) - Me.ComboBox1.Location = New System.Drawing.Point(129, 93) + Me.ComboBox1.Location = New System.Drawing.Point(258, 179) + Me.ComboBox1.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.ComboBox1.Name = "ComboBox1" - Me.ComboBox1.Size = New System.Drawing.Size(75, 21) + Me.ComboBox1.Size = New System.Drawing.Size(146, 33) Me.ComboBox1.TabIndex = 11 Me.ComboBox1.Text = "USA" ' 'Label5 ' Me.Label5.AutoSize = True - Me.Label5.Location = New System.Drawing.Point(129, 77) + Me.Label5.Location = New System.Drawing.Point(258, 148) + Me.Label5.Margin = New System.Windows.Forms.Padding(6, 0, 6, 0) Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(77, 13) + Me.Label5.Size = New System.Drawing.Size(151, 25) Me.Label5.TabIndex = 12 Me.Label5.Text = "Language Tag" ' 'Form4 ' - Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleDimensions = New System.Drawing.SizeF(12.0!, 25.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(262, 215) + Me.ClientSize = New System.Drawing.Size(524, 413) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.ComboBox1) Me.Controls.Add(Me.CheckBox3) @@ -183,6 +196,7 @@ Partial Class Form4 Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.Margin = New System.Windows.Forms.Padding(6, 6, 6, 6) Me.Name = "Form4" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Registration Data" diff --git a/SC2kInstall/Form5.vb b/SC2kInstall/Form5.vb index 233407d..2b6eb00 100644 --- a/SC2kInstall/Form5.vb +++ b/SC2kInstall/Form5.vb @@ -88,6 +88,40 @@ End If End If + If My.Settings.associate = True Then + 'City + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.sc2\", "", "SimCity2000.Document.City") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.sc2\", "Content Type", "SimCity2000.Document.City") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.City\", "", "SimCity2000.Document.City") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.City\", "FriendlyTypeName", "SimCity 2000 City") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.City\DefaultIcon", "", My.Settings.store & "\SIMCITY.EXE,1") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.City\shell", "", "open") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.City\shell\open\command", "", My.Settings.store & "\SIMCITY.EXE %1") + 'Scenario + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.scn\", "", "SimCity2000.Document.Scenario") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.scn\", "Content Type", "SimCity2000.Document.Scenario") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.Scenario\", "", "SimCity2000.Document.Scenario") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.Scenario\", "FriendlyTypeName", "SimCity 2000 Scenario") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.Scenario\DefaultIcon", "", My.Settings.store & "\SIMCITY.EXE,2") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.Scenario\shell", "", "open") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.Scenario\shell\open\command", "", My.Settings.store & "\SIMCITY.EXE %1") + + + If My.Settings.SCURK = True Then + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.mif\", "", "SimCity2000.Document.TileSet") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\.mif\", "Content Type", "SimCity2000.Document.TileSet") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.TileSet\", "", "SimCity2000.Document.TileSet") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.TileSet\", "FriendlyTypeName", "SimCity 2000 Tile Set") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.TileSet\DefaultIcon", "", My.Settings.store & "\WINSCURK.EXE,1") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.TileSet\shell", "", "open") + My.Computer.Registry.SetValue("HKEY_CLASSES_ROOT\SimCity2000.Document.TileSet\shell\open\command", "", My.Settings.store & "\WINSCURK.EXE %1") + End If + 'This reloads file icons + Process.Start("taskkill.exe", "/IM " & Chr(34) & "explorer.exe" & Chr(34) & " /F") + Threading.Thread.Sleep(500) + System.Diagnostics.Process.Start("explorer.exe") + End If + ' Windows sucks End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click diff --git a/SC2kInstall/My Project/AssemblyInfo.vb b/SC2kInstall/My Project/AssemblyInfo.vb index fcb35b0..fbda295 100644 --- a/SC2kInstall/My Project/AssemblyInfo.vb +++ b/SC2kInstall/My Project/AssemblyInfo.vb @@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices - + @@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices ' by using the '*' as shown below: ' - - + + diff --git a/SC2kInstall/My Project/Settings.Designer.vb b/SC2kInstall/My Project/Settings.Designer.vb index dc58860..4ffebe5 100644 --- a/SC2kInstall/My Project/Settings.Designer.vb +++ b/SC2kInstall/My Project/Settings.Designer.vb @@ -15,7 +15,7 @@ Option Explicit On Namespace My _ Partial Friend NotInheritable Class MySettings Inherits Global.System.Configuration.ApplicationSettingsBase @@ -185,6 +185,18 @@ Namespace My Me("language") = value End Set End Property + + _ + Public Property associate() As Boolean + Get + Return CType(Me("associate"),Boolean) + End Get + Set + Me("associate") = value + End Set + End Property End Class End Namespace diff --git a/SC2kInstall/My Project/Settings.settings b/SC2kInstall/My Project/Settings.settings index c6cecef..5a605d4 100644 --- a/SC2kInstall/My Project/Settings.settings +++ b/SC2kInstall/My Project/Settings.settings @@ -35,5 +35,8 @@ + + False + \ No newline at end of file diff --git a/SC2kInstall/SC2kInstall.vbproj b/SC2kInstall/SC2kInstall.vbproj index 6039e42..d18dbdc 100644 --- a/SC2kInstall/SC2kInstall.vbproj +++ b/SC2kInstall/SC2kInstall.vbproj @@ -84,6 +84,80 @@ + + true + bin\Release 64\ + SC2kInstall.xml + true + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + pdbonly + AnyCPU + MinimumRecommendedRules.ruleset + + + bin\x86\Release 64\ + x86 + MinimumRecommendedRules.ruleset + + + true + true + true + bin\x64\Debug\ + SC2kInstall.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + full + x64 + MinimumRecommendedRules.ruleset + + + true + bin\x64\Release\ + SC2kInstall.xml + true + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + pdbonly + x64 + MinimumRecommendedRules.ruleset + + + true + bin\x64\Release 64\ + SC2kInstall.xml + true + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + pdbonly + x64 + MinimumRecommendedRules.ruleset + + + true + true + true + bin\Debug 64\ + SC2kInstall.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + full + AnyCPU + MinimumRecommendedRules.ruleset + + + true + bin\x86\Debug 64\ + x86 + MinimumRecommendedRules.ruleset + + + true + true + true + bin\x64\Debug 64\ + SC2kInstall.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + full + x64 + MinimumRecommendedRules.ruleset + False diff --git a/SC2kInstall/app.config b/SC2kInstall/app.config index 35289f5..cbea854 100644 --- a/SC2kInstall/app.config +++ b/SC2kInstall/app.config @@ -62,6 +62,9 @@ + + False + diff --git a/SC2kInstall/bin/x64/Debug/SC2kInstall.exe b/SC2kInstall/bin/x64/Debug/SC2kInstall.exe new file mode 100644 index 0000000..6336acf Binary files /dev/null and b/SC2kInstall/bin/x64/Debug/SC2kInstall.exe differ diff --git a/SC2kInstall/bin/x64/Debug/SC2kInstall.exe.config b/SC2kInstall/bin/x64/Debug/SC2kInstall.exe.config new file mode 100644 index 0000000..cbea854 --- /dev/null +++ b/SC2kInstall/bin/x64/Debug/SC2kInstall.exe.config @@ -0,0 +1,70 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + False + + + + diff --git a/SC2kInstall/bin/x64/Debug/SC2kInstall.pdb b/SC2kInstall/bin/x64/Debug/SC2kInstall.pdb new file mode 100644 index 0000000..1664a9b Binary files /dev/null and b/SC2kInstall/bin/x64/Debug/SC2kInstall.pdb differ diff --git a/SC2kInstall/bin/x64/Debug/SC2kInstall.xml b/SC2kInstall/bin/x64/Debug/SC2kInstall.xml new file mode 100644 index 0000000..ea582d6 --- /dev/null +++ b/SC2kInstall/bin/x64/Debug/SC2kInstall.xml @@ -0,0 +1,46 @@ + + + + +SC2kInstall + + + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + + Returns the cached ResourceManager instance used by this class. + + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + + Looks up a localized resource of type System.Byte[]. + + + + + Looks up a localized resource of type System.Drawing.Bitmap. + + + + + Looks up a localized resource of type System.Byte[]. + + + + + Looks up a localized resource of type System.Byte[]. + + + + diff --git a/SC2kInstall/bin/x64/Debug/song b/SC2kInstall/bin/x64/Debug/song new file mode 100644 index 0000000..bef769a Binary files /dev/null and b/SC2kInstall/bin/x64/Debug/song differ diff --git a/SC2kInstall/bin/x64/Release/SC2KInstall_2_0_0_2_x64.rar b/SC2kInstall/bin/x64/Release/SC2KInstall_2_0_0_2_x64.rar new file mode 100644 index 0000000..0fce580 Binary files /dev/null and b/SC2kInstall/bin/x64/Release/SC2KInstall_2_0_0_2_x64.rar differ diff --git a/SC2kInstall/bin/x64/Release/SC2kInstall.exe b/SC2kInstall/bin/x64/Release/SC2kInstall.exe new file mode 100644 index 0000000..ccf5d34 Binary files /dev/null and b/SC2kInstall/bin/x64/Release/SC2kInstall.exe differ diff --git a/SC2kInstall/bin/x64/Release/SC2kInstall.exe.config b/SC2kInstall/bin/x64/Release/SC2kInstall.exe.config new file mode 100644 index 0000000..cbea854 --- /dev/null +++ b/SC2kInstall/bin/x64/Release/SC2kInstall.exe.config @@ -0,0 +1,70 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + False + + + + diff --git a/SC2kInstall/bin/x64/Release/SC2kInstall.pdb b/SC2kInstall/bin/x64/Release/SC2kInstall.pdb new file mode 100644 index 0000000..026eb0c Binary files /dev/null and b/SC2kInstall/bin/x64/Release/SC2kInstall.pdb differ diff --git a/SC2kInstall/bin/x64/Release/SC2kInstall.xml b/SC2kInstall/bin/x64/Release/SC2kInstall.xml new file mode 100644 index 0000000..ea582d6 --- /dev/null +++ b/SC2kInstall/bin/x64/Release/SC2kInstall.xml @@ -0,0 +1,46 @@ + + + + +SC2kInstall + + + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + + Returns the cached ResourceManager instance used by this class. + + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + + Looks up a localized resource of type System.Byte[]. + + + + + Looks up a localized resource of type System.Drawing.Bitmap. + + + + + Looks up a localized resource of type System.Byte[]. + + + + + Looks up a localized resource of type System.Byte[]. + + + + diff --git a/SC2kInstall/bin/x64/Release/song b/SC2kInstall/bin/x64/Release/song new file mode 100644 index 0000000..bef769a Binary files /dev/null and b/SC2kInstall/bin/x64/Release/song differ diff --git a/SC2kInstall/bin/x86/Debug/SC2kInstall.exe b/SC2kInstall/bin/x86/Debug/SC2kInstall.exe new file mode 100644 index 0000000..6a18e9b Binary files /dev/null and b/SC2kInstall/bin/x86/Debug/SC2kInstall.exe differ diff --git a/SC2kInstall/bin/x86/Debug/SC2kInstall.exe.config b/SC2kInstall/bin/x86/Debug/SC2kInstall.exe.config new file mode 100644 index 0000000..cbea854 --- /dev/null +++ b/SC2kInstall/bin/x86/Debug/SC2kInstall.exe.config @@ -0,0 +1,70 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + False + + + + diff --git a/SC2kInstall/bin/x86/Debug/SC2kInstall.pdb b/SC2kInstall/bin/x86/Debug/SC2kInstall.pdb new file mode 100644 index 0000000..6720647 Binary files /dev/null and b/SC2kInstall/bin/x86/Debug/SC2kInstall.pdb differ diff --git a/SC2kInstall/bin/x86/Debug/song b/SC2kInstall/bin/x86/Debug/song new file mode 100644 index 0000000..bef769a Binary files /dev/null and b/SC2kInstall/bin/x86/Debug/song differ diff --git a/SC2kInstall/bin/x86/Release/SC2KInstall_2_0_0_2_x86.rar b/SC2kInstall/bin/x86/Release/SC2KInstall_2_0_0_2_x86.rar new file mode 100644 index 0000000..c5952ff Binary files /dev/null and b/SC2kInstall/bin/x86/Release/SC2KInstall_2_0_0_2_x86.rar differ diff --git a/SC2kInstall/bin/x86/Release/SC2kInstall.exe b/SC2kInstall/bin/x86/Release/SC2kInstall.exe new file mode 100644 index 0000000..e33d9fe Binary files /dev/null and b/SC2kInstall/bin/x86/Release/SC2kInstall.exe differ diff --git a/SC2kInstall/bin/x86/Release/SC2kInstall.exe.config b/SC2kInstall/bin/x86/Release/SC2kInstall.exe.config new file mode 100644 index 0000000..cbea854 --- /dev/null +++ b/SC2kInstall/bin/x86/Release/SC2kInstall.exe.config @@ -0,0 +1,70 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + + + + + + + + + + False + + + False + + + False + + + + + + False + + + + diff --git a/SC2kInstall/bin/x86/Release/song b/SC2kInstall/bin/x86/Release/song new file mode 100644 index 0000000..bef769a Binary files /dev/null and b/SC2kInstall/bin/x86/Release/song differ diff --git a/SC2kInstall/obj/x86/Release/SC2kInstall.vbprojAssemblyReference.cache b/SC2kInstall/obj/x86/Release/SC2kInstall.vbprojAssemblyReference.cache new file mode 100644 index 0000000..51c25a2 Binary files /dev/null and b/SC2kInstall/obj/x86/Release/SC2kInstall.vbprojAssemblyReference.cache differ