none
how to use this icons RRS feed

  • Question

  • i want to use this icons for develop pic:

    i can't find them from any dll's files imagers.dll ,shell32.dll ..etc


    • Edited by YakirFx Saturday, September 21, 2019 9:58 AM
    Saturday, September 21, 2019 9:55 AM

Answers

  • Hi,

    This is a document on the method of e. Graphics. DrawString.

    You can try to do it .

    Best Regards,

    Julie


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.

    • Marked as answer by YakirFx Wednesday, October 2, 2019 6:35 PM
    Thursday, September 26, 2019 1:44 AM
    Moderator

All replies

  • Hello,

    If they are not in the following library (there are a ton of images categorized in sub folders) you will need to most likely need to purchase them.

    https://www.microsoft.com/en-us/download/details.aspx?id=35825


    Please remember to mark the replies as answers if they help and unmarked them if they provide no help, this will help others who are looking for solutions to the same or similar problem. Contact via my Twitter (Karen Payne) or Facebook (Karen Payne) via my MSDN profile but will not answer coding question on either.

    NuGet BaseConnectionLibrary for database connections.

    StackOverFlow
    profile for Karen Payne on Stack Exchange


    Saturday, September 21, 2019 10:37 AM
    Moderator
  • Screenshot the panel, then carefully select and save each image as a 32x32, 64x64 etc Windows Bitmap file (*.bmp)
    The code below will turn those bitmaps into Icon Files

        Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Dim BMPfileName As String = "d:\testing.bmp"
            Dim ICOFileName As String = "d:\testing.ico"
            Using BMPImage As System.Drawing.Bitmap = System.Drawing.Image.FromFile(BMPfileName, True)
                Using ico As System.Drawing.Icon = System.Drawing.Icon.FromHandle(BMPImage.GetHicon())
                    Using ICOFileStream As IO.Stream = IO.File.Create(ICOFileName)
                        ico.Save(ICOFileStream)
                    End Using
                End Using
            End Using
        End Sub

    Experiment with the size until you are satisfied

    Saturday, September 21, 2019 4:02 PM
  • I found this :

    https://docs.microsoft.com/en-us/windows/uwp/design/style/segoe-ui-symbol-font

    It is not official icons?

    It is not same icons of imersive control panel?

    Sunday, September 22, 2019 3:40 AM
  • I found this :

    https://docs.microsoft.com/en-us/windows/uwp/design/style/segoe-ui-symbol-font

    It is not official icons?

    It is not same icons of imersive control panel?

    It looks interesting... I have never heard of it until now that you found it.

    It seems it does not directly work in VB?? It is used in a XAML control which is not vb???

    "For more info, design guidance, and code examples, see Command bar.

    If you have the XAML Controls Gallery app installed, click here to open the app and see the FontIcon in action.

        Get the XAML Controls Gallery app (Microsoft Store)
        Get the source code (GitHub)"

    https://docs.microsoft.com/en-us/uwp/api/windows.ui.xaml.controls.fonticon#examples

    You know the difference between a font and an icon right? There are other symbol fonts like wingdings etc installed on all windows.

    You appear to have win10 do you have the font? You can try to get the font and use it as a text character in vb maybe ie button.text = chr(211), button.font = new (thefont stuff).

    Or perhaps there is a vb control in git hub junk pile.

    Maybe someone has an example for vb?

    Sunday, September 22, 2019 11:00 AM
  • Yes but those icons are Microsoft officially??
    • Edited by YakirFx Sunday, September 22, 2019 11:10 AM
    Sunday, September 22, 2019 11:09 AM
  • Yes but those icons are Microsoft officially??

    What icons? There are no icons. You found a font.

    PS If your app uses this font it will only run on win10 unless you distribute and install the font with your app. Since it does not come with win7 you will need to purchase the font to distribute it.
    Sunday, September 22, 2019 11:17 AM
  • In VB, you can use Surrogate Pairs.

    For example, for the Sound symbol (0xD83D,  0xDD0A), with Emoji font instead of Symbol :

            Using gr As Graphics = Graphics.FromHwnd(IntPtr.Zero)
                Using fnt As Font = New Font("Segoe UI Emoji", 60.0F)
                    Dim sUnicodeString As String = ChrW(&HD83D) + ChrW(&HDD0A)
                    gr.DrawString(sUnicodeString, fnt, New SolidBrush(System.Drawing.Color.Red), 0, 0, StringFormat.GenericDefault)
                End Using
            End Using

    With "Segoe UI Symbol" :

    with Direct2D to get colors :

    Sunday, September 22, 2019 11:43 AM
  • PS Here is an example of using the wingdings font which comes with most versions of windows.

    First the example checks to see if the font is installed and if so shows the mouse symbol it in the left button otherwise it shows "mouse" text.

    The right button just shows normal text.

    You can use a font several ways to provide a graphic symbol image but a font is not an icon.

    So you can find free fonts, purchase fonts or use windows fonts. If you can use any symbol then you can use any font or any icon or graphic you have the rights to and on and on...

    The example makes the controls just cut and paste the code into an empty form. Change the form name as reqd.

    Public Class Form5
    
        Private WithEvents Button1 As New Button With {.Parent = Me,
            .Location = New Point(50, 100), .Size = New Size(100, 36)}
        Private WithEvents Button2 As New Button With {.Parent = Me,
            .Location = New Point(160, 100), .Size = New Size(100, 36)}
    
        Private Sub Form5_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    
            'make sure the font is installed
            Dim f As String = CheckFontExists("Wingdings")
            'give the installed font to button 1
            Button1.Font = New Font(f, 20, FontStyle.Bold)
    
            If f = "Wingdings" Then
                Button1.Text = Chr(56).ToString
            Else
                Button1.Text = "Mouse"
            End If
    
            Button2.Font = New Font(Me.Font.FontFamily, 14)
            Button2.Text = "Mouse"
    
        End Sub
    
        Public Function CheckFontExists(ByVal thisFontName As String) As String
            'if thisFontName exists on the system returns thisFontName
            'else returns the default Cadrail.FontName
            Try
                Using TestFont As Font = New Font(thisFontName, 10)
                    If CBool(String.Compare(thisFontName, TestFont.Name, StringComparison.InvariantCultureIgnoreCase) = 0) Then
                        Return thisFontName
                    Else
                        Return Me.Font.FontFamily.ToString
                    End If
                End Using
    
            Catch ex As Exception
                Return Me.Font.FontFamily.ToString
            End Try
    
        End Function
    
    
    End Class



    Sunday, September 22, 2019 12:08 PM
  • thank you , but i found easy way myself

    1.open character map

    2.open visual studio editor then add button and change font family to "Segoe MDL2 Assets"

    3.search for some icon then copy and paste icon in the "text" of like "button1" in visual studio editor

    that's it


    i have some issue look this pic


    i want the "Settings" text to be centered with the settings icon not bottom align

    • Edited by YakirFx Sunday, September 22, 2019 8:43 PM
    Sunday, September 22, 2019 7:15 PM
  • Someone?
    Tuesday, September 24, 2019 6:24 AM
  • Draw in Button Paint event with e.Graphics.DrawString
    Tuesday, September 24, 2019 7:51 AM
  • Hi,

    I'm sorry, maybe VB. net can't satisfy your idea. If you use the Segoe MDL2 Assets font, the icon is already a char text, not an image, and it will change with the font size you set.

    Public Class Form1
        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            Button1.Font = New Font("Segoe MDL2 Assets", 20)
            Button1.Text = Char.ConvertFromUtf32(&HE115) & " " & "Button1"
            Button1.TextAlign = ContentAlignment.MiddleCenter
        End Sub
    End Class

    If you want to add text as well as icons to button, you can use a PictureBox, add icons to it, then bind them to Button.

    Best Regards,

    Julie


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.

    Tuesday, September 24, 2019 7:59 AM
    Moderator
  • Castorix31

    how to use in your solution ?

    thank you


    • Edited by YakirFx Wednesday, September 25, 2019 4:47 PM
    Wednesday, September 25, 2019 8:57 AM
  • Hi,

    This is a document on the method of e. Graphics. DrawString.

    You can try to do it .

    Best Regards,

    Julie


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.

    • Marked as answer by YakirFx Wednesday, October 2, 2019 6:35 PM
    Thursday, September 26, 2019 1:44 AM
    Moderator