vb.net - 如何在 VB.net 中创建高质量图标

Question

我需要在 vb.net 中为我当前的项目创建高质量的图标

到目前为止，这是我的代码，

 Private Sub CreateIcon(ByVal bitmapName As String)
    Try
        Dim fi As New System.IO.FileInfo(bitmapName)
        Dim bmp As New Bitmap(fi.FullName)
        Dim sw As System.IO.StreamWriter = System.IO.File.CreateText(fi.FullName.Replace(fi.Extension, ".ico"))
        Icon.FromHandle(bmp.GetHicon).Save(sw.BaseStream)
        sw.Close()
    Catch ex As Exception
        System.Diagnostics.Debug.WriteLine(ex)
    End Try
End Sub

但问题是它最后只给我一个非常低质量的图标。有没有人对如何制作更高质量的图像有任何想法？

Answer 1

我想您应该深入研究 ico 文件格式，看看如何手动构建它。如果您的任务倾向于仅支持特定情况(源大小和格式)，您可以调查此项目:Dynamically Generating Icons (safely) .

溶剂化有局限性，但可以扩展以满足您的要求。