2012-05-13 30 views
3

我需要在vb.net如何創造高品質的圖標在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 

但問題是它最終只會給我一個質量很低的圖標。有沒有人對如何製作更高質量的圖像有任何想法?

+0

修復一些可能的內存泄漏,檢查我的答案... –

+0

使用ex.Message ... –

+1

質量是主觀的。圖標有什麼問題? – Gabe

回答

0

我想你應該深入研究ico文件格式,看看如何手動構建它。如果您的任務傾向於僅支持特定情況(源大小和格式),則可以調查此項目:Dynamically Generating Icons (safely)

溶劑化有侷限性,但可以根據您的要求進行擴展。