January 2005 Blog Posts

Sono alle cozze!

Oggi è uno di quei giorni allo stesso tempo molto belli e molto incasinati, uno di quelli in cui non puoi seguire seriamente una commessa e allora fai qui e là tutti quelle cosette "che tanto ci impiego cinque minuti". Evito la cronaca... dico solo che due minuti fa mi sono fermato un attimo a guardare la scrivania e mi sono accerto che... - Stavo usando due portatili, un desktop ed un virtual PC! (Si, si proprio "usando"... a rotazione! 8-p) E' ufficiale: sono alle cozze!!! Meglio se chiudo tutto e mi dedico un pò a Need for Speed... Ecco lo sapevo! Mi...

"Piove sul bagnato", ...ma cosa?

"Imprecisione" da "fuoco amico" a stelle e strisce a Sumatra... Dejiavù? http://www.corriere.it/ultima_ora/agrnews.jsp?id=%7B3D0C4442-898B-4F3A-B66F-007E3EA6E8A4%7D powered by IMHO

Utilizzare una icona incorporata nell'assembly corrente.

Se può essere d'aiuto a chi ancora non avesse affrontato l'argomento... (N.B. recuperato dal web e leggermente modificato)     Private Function GetIconFromExecutingAssembly(ByVal iconName As String) As Icon        Dim oStream As System.IO.Stream        Dim oAssembly As System.Reflection.Assembly        Dim sIcon As String        Dim oBitmap As Bitmap        'open the executing assembly        oAssembly = System.Reflection.Assembly.LoadFrom(Application.ExecutablePath)        sIcon = String.Format("{0}.{1}", oAssembly.GetName.Name, iconName)        'create stream for image (icon) in assembly        oStream = oAssembly.GetManifestResourceStream(sIcon)        'create new bitmap from stream        oBitmap = CType(Image.FromStream(oStream), Bitmap)        'create icon from bitmap        Return Icon.FromHandle(oBitmap.GetHicon)    End Function powered by IMHO Modificato il 07/01/2005 Su suggerimento di Enzo Colluto (vedi feedback) ecco un modo ancora più immediato: Dim myIcon As Icon = New Icon(GetType(myForm), "MYICO.ICO")