adds link to Eugen Buzuks Website (Icons License)

9 years ago · bba8907c95
parent b7e6a0654b
commit bba8907c95
5 changed files with 60 additions and 19 deletions
--- a/.vs/Gästeliste/v14/.suo
+++ b/.vs/Gästeliste/v14/.suo
--- a/Gästeliste/Gästeliste.vbproj
+++ b/Gästeliste/Gästeliste.vbproj
@ -32,7 +32,7 @@
    <PublisherName>Dominic Reich</PublisherName>
    <MinimumRequiredVersion>1.0.0.0</MinimumRequiredVersion>
    <OpenBrowserOnPublish>false</OpenBrowserOnPublish>
-    <ApplicationRevision>20</ApplicationRevision>
+    <ApplicationRevision>21</ApplicationRevision>
    <ApplicationVersion>1.0.1.%2a</ApplicationVersion>
    <UseApplicationTrust>true</UseApplicationTrust>
    <CreateDesktopShortcut>true</CreateDesktopShortcut>
--- a/Gästeliste/frmAbout.Designer.vb
+++ b/Gästeliste/frmAbout.Designer.vb
@ -42,6 +42,7 @@ Partial Class frmAbout
        Me.OKButton = New System.Windows.Forms.Button()
        Me.FlowLayoutPanel1 = New System.Windows.Forms.FlowLayoutPanel()
        Me.lnkWebsite = New System.Windows.Forms.LinkLabel()
+        Me.lnkIcons = New System.Windows.Forms.LinkLabel()
        Me.TableLayoutPanel.SuspendLayout()
        CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.FlowLayoutPanel1.SuspendLayout()
@ -50,8 +51,8 @@ Partial Class frmAbout
        'TableLayoutPanel
        '
        Me.TableLayoutPanel.ColumnCount = 2
-        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 33.0!))
-        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 67.0!))
+        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 25.16704!))
+        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 74.83296!))
        Me.TableLayoutPanel.Controls.Add(Me.LogoPictureBox, 0, 0)
        Me.TableLayoutPanel.Controls.Add(Me.LabelProductName, 1, 0)
        Me.TableLayoutPanel.Controls.Add(Me.LabelVersion, 1, 1)
@ -71,7 +72,7 @@ Partial Class frmAbout
        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 40.0!))
        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
-        Me.TableLayoutPanel.Size = New System.Drawing.Size(396, 258)
+        Me.TableLayoutPanel.Size = New System.Drawing.Size(449, 258)
        Me.TableLayoutPanel.TabIndex = 0
        '
        'LogoPictureBox
@ -81,7 +82,7 @@ Partial Class frmAbout
        Me.LogoPictureBox.Location = New System.Drawing.Point(3, 3)
        Me.LogoPictureBox.Name = "LogoPictureBox"
        Me.TableLayoutPanel.SetRowSpan(Me.LogoPictureBox, 6)
-        Me.LogoPictureBox.Size = New System.Drawing.Size(124, 222)
+        Me.LogoPictureBox.Size = New System.Drawing.Size(107, 222)
        Me.LogoPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
        Me.LogoPictureBox.TabIndex = 0
        Me.LogoPictureBox.TabStop = False
@ -89,11 +90,11 @@ Partial Class frmAbout
        'LabelProductName
        '
        Me.LabelProductName.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LabelProductName.Location = New System.Drawing.Point(136, 0)
+        Me.LabelProductName.Location = New System.Drawing.Point(119, 0)
        Me.LabelProductName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
        Me.LabelProductName.MaximumSize = New System.Drawing.Size(0, 17)
        Me.LabelProductName.Name = "LabelProductName"
-        Me.LabelProductName.Size = New System.Drawing.Size(257, 17)
+        Me.LabelProductName.Size = New System.Drawing.Size(327, 17)
        Me.LabelProductName.TabIndex = 0
        Me.LabelProductName.Text = "Produktname"
        Me.LabelProductName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -101,11 +102,11 @@ Partial Class frmAbout
        'LabelVersion
        '
        Me.LabelVersion.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LabelVersion.Location = New System.Drawing.Point(136, 25)
+        Me.LabelVersion.Location = New System.Drawing.Point(119, 25)
        Me.LabelVersion.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
        Me.LabelVersion.MaximumSize = New System.Drawing.Size(0, 17)
        Me.LabelVersion.Name = "LabelVersion"
-        Me.LabelVersion.Size = New System.Drawing.Size(257, 17)
+        Me.LabelVersion.Size = New System.Drawing.Size(327, 17)
        Me.LabelVersion.TabIndex = 0
        Me.LabelVersion.Text = "Version"
        Me.LabelVersion.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -113,11 +114,11 @@ Partial Class frmAbout
        'LabelCopyright
        '
        Me.LabelCopyright.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LabelCopyright.Location = New System.Drawing.Point(136, 50)
+        Me.LabelCopyright.Location = New System.Drawing.Point(119, 50)
        Me.LabelCopyright.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
        Me.LabelCopyright.MaximumSize = New System.Drawing.Size(0, 17)
        Me.LabelCopyright.Name = "LabelCopyright"
-        Me.LabelCopyright.Size = New System.Drawing.Size(257, 17)
+        Me.LabelCopyright.Size = New System.Drawing.Size(327, 17)
        Me.LabelCopyright.TabIndex = 0
        Me.LabelCopyright.Text = "Copyright"
        Me.LabelCopyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -125,11 +126,11 @@ Partial Class frmAbout
        'LabelCompanyName
        '
        Me.LabelCompanyName.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LabelCompanyName.Location = New System.Drawing.Point(136, 75)
+        Me.LabelCompanyName.Location = New System.Drawing.Point(119, 75)
        Me.LabelCompanyName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
        Me.LabelCompanyName.MaximumSize = New System.Drawing.Size(0, 17)
        Me.LabelCompanyName.Name = "LabelCompanyName"
-        Me.LabelCompanyName.Size = New System.Drawing.Size(257, 17)
+        Me.LabelCompanyName.Size = New System.Drawing.Size(327, 17)
        Me.LabelCompanyName.TabIndex = 0
        Me.LabelCompanyName.Text = "Firmenname"
        Me.LabelCompanyName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -137,13 +138,13 @@ Partial Class frmAbout
        'TextBoxDescription
        '
        Me.TextBoxDescription.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.TextBoxDescription.Location = New System.Drawing.Point(136, 103)
+        Me.TextBoxDescription.Location = New System.Drawing.Point(119, 103)
        Me.TextBoxDescription.Margin = New System.Windows.Forms.Padding(6, 3, 3, 3)
        Me.TextBoxDescription.Multiline = True
        Me.TextBoxDescription.Name = "TextBoxDescription"
        Me.TextBoxDescription.ReadOnly = True
        Me.TextBoxDescription.ScrollBars = System.Windows.Forms.ScrollBars.Both
-        Me.TextBoxDescription.Size = New System.Drawing.Size(257, 97)
+        Me.TextBoxDescription.Size = New System.Drawing.Size(327, 97)
        Me.TextBoxDescription.TabIndex = 0
        Me.TextBoxDescription.TabStop = False
        Me.TextBoxDescription.Text = resources.GetString("TextBoxDescription.Text")
@ -152,7 +153,7 @@ Partial Class frmAbout
        '
        Me.OKButton.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.OKButton.DialogResult = System.Windows.Forms.DialogResult.Cancel
-        Me.OKButton.Location = New System.Drawing.Point(318, 232)
+        Me.OKButton.Location = New System.Drawing.Point(371, 232)
        Me.OKButton.Name = "OKButton"
        Me.OKButton.Size = New System.Drawing.Size(75, 23)
        Me.OKButton.TabIndex = 0
@ -161,10 +162,11 @@ Partial Class frmAbout
        'FlowLayoutPanel1
        '
        Me.FlowLayoutPanel1.Controls.Add(Me.lnkWebsite)
+        Me.FlowLayoutPanel1.Controls.Add(Me.lnkIcons)
        Me.FlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.FlowLayoutPanel1.Location = New System.Drawing.Point(133, 206)
+        Me.FlowLayoutPanel1.Location = New System.Drawing.Point(116, 206)
        Me.FlowLayoutPanel1.Name = "FlowLayoutPanel1"
-        Me.FlowLayoutPanel1.Size = New System.Drawing.Size(260, 19)
+        Me.FlowLayoutPanel1.Size = New System.Drawing.Size(330, 19)
        Me.FlowLayoutPanel1.TabIndex = 1
        '
        'lnkWebsite
@ -178,12 +180,25 @@ Partial Class frmAbout
        Me.lnkWebsite.TabStop = True
        Me.lnkWebsite.Text = "Zur Webseite"
        '
+        'lnkIcons
+        '
+        Me.lnkIcons.AutoSize = True
+        Me.lnkIcons.Image = CType(resources.GetObject("lnkIcons.Image"), System.Drawing.Image)
+        Me.lnkIcons.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.lnkIcons.Location = New System.Drawing.Point(80, 0)
+        Me.lnkIcons.Name = "lnkIcons"
+        Me.lnkIcons.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.lnkIcons.Size = New System.Drawing.Size(208, 13)
+        Me.lnkIcons.TabIndex = 3
+        Me.lnkIcons.TabStop = True
+        Me.lnkIcons.Text = "Adressbuch-Symbol von Eugen Buzuk"
+        '
        'frmAbout
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.CancelButton = Me.OKButton
-        Me.ClientSize = New System.Drawing.Size(414, 276)
+        Me.ClientSize = New System.Drawing.Size(467, 276)
        Me.Controls.Add(Me.TableLayoutPanel)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
        Me.MaximizeBox = False
@ -204,4 +219,5 @@ Partial Class frmAbout

    Friend WithEvents FlowLayoutPanel1 As FlowLayoutPanel
    Friend WithEvents lnkWebsite As LinkLabel
+    Friend WithEvents lnkIcons As LinkLabel
 End Class
--- a/Gästeliste/frmAbout.resx
+++ b/Gästeliste/frmAbout.resx
@ -606,4 +606,25 @@
 (Der Text für die Bezeichnung wird zur Laufzeit durch die Assemblyinformationen der Anwendung ersetzt.
 Passen Sie die Assemblyinformationen der Anwendung im Anwendungsbereich des Projekt-Designers an.)</value>
  </data>
+  <data name="lnkIcons.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAANrSURBVDhPdZB7TJNXGIdPJskgklJDIBCoTgQvEIgoQ9DB
+        7MR6A29QRoQ/jOjCsmg0drB0BGIMkzKBAkWLFAGVVOVi1FUrN6sbw7LSQlu5tWWtWOxGafvBSGai+flZ
+        vyzLkj3Jm5w3531O3vMj/+bkg6mPz/Q6w3546txSqXYfqvjVfVqioWovD3vutBiXhmU6l/mYsC6BGf8A
+        h8OJ2crliXmZecqy7mljzRDlqhuafyPVuHFF60GjjsLVkQU0jy5ANrqERxrziFgkimJ0QlgsVvaWTxOW
+        tqem4Du5GtXqRfz4ixPlP89BMjgH2W9OSNXzEKvdEA95oHrxGk1S6deMToiPj8+22NhY02dJiThe1Ymy
+        gb9Q2uPAYzOFPvMC7o5T6DEtQEX3ooF5XKc3KS4u/pbRvayOiIhQJSfE47CgGoIeD/pNFG6OuPC9chZ9
+        U2606+bQrndBOUnh4iAFRa9KxefzlzE+YYWGhl5P3BSHlJxTOHHnDxjsi/iqw4anZjcqnjignVnEhccO
+        PJzwoKTfhc7eZ5agoCB/xieEzWaXbIqLwUbuQeS1WTFmp3Ds5jQ0VjeO3LBAPe1CscKGWyNOHO16BelD
+        3fw+HnczoxPi6+ubGxu9HtHxSeDVaGnRg/IHFoj7Z/CT3oGuUfoLww5802lFVpsNjXSoVaKyM4zuDTIl
+        KirybWTkWnx+Ton8WzPQWf5EhWIKZztMKJBPonnQjny5Bdk3rCi6/wJCobCU0b1EcDjhrlVhIUg+1YTd
+        MisyZRO4OjiL1md2NA7YcVxuRlaLCfxWM/Jv29Bxr1uTlbU/mvGJPx2KISx4BeJySrBXZsPOOiO4tUak
+        ScbAuzSO9IZxHJJN4nDTFDJbf4e0vfvl3i9SuYxPSEBAgDIkkIU12/Owo96MHTV67Kw1gEc/xJM8x+5L
+        Y9hzeQJ7Giax/9osog8K6kl4uB+je4OUBrL9Ebw+GUkXjdhaacA2ulKr9EgT65EuGUVOgx4FLQYU0mGu
+        SSsQMuoH6CALA1ew8cmGeOTUqXG6bQylt59D1GVAdacWlfIBnG9U/F1Y0fYyT1CtZYWv28Wo/3CAn52N
+        knPn3xaVt7w6USTWZeSeVSSlfVm/MiZF4B8SmUl8WIn03Cq6lnuN/8Dy8/PLoDdJpc+r3/d0ffT+4v8h
+        5B0QifP0zn03OAAAAABJRU5ErkJggg==
+</value>
+  </data>
 </root>
--- a/Gästeliste/frmAbout.vb
+++ b/Gästeliste/frmAbout.vb
@ -24,4 +24,8 @@
    Private Sub lnkWebsite_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles lnkWebsite.LinkClicked
        Process.Start("http://tmsn.at/?tools&gaesteliste")
    End Sub
+
+    Private Sub lnkIcons_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles lnkIcons.LinkClicked
+        Process.Start("http://www.icondrawer.com/")
+    End Sub
 End Class