Terry, don't have you e-mail so thought I'd let you know thru this news
group that thanks to some help from others, I've polished up the Resources
class so you don't have to declare an instance of the class but can use it
direct via shared members. Here is the code:
Imports System.Reflection
Public Class Resources
'WARNING: Icon and Image Names are Case Sensistive
Private Shared Function AssemblyName() As String
Static v_AssemblyName As String
If v_AssemblyName Is Nothing Then v_AssemblyName =
System.Reflection.Assembly.GetExecutingAssembly().GetName.Name & "."
Return v_AssemblyName
End Function
Public Shared Function GetIcon(ByVal IconName As String) As Icon
Dim asm As [Assembly] = [Assembly].GetExecutingAssembly
Dim v_name As String = IconName
If InStr(v_name.ToLower, ".ico") <= 0 Then v_name = v_name & ".ico"
Dim Name As String = AssemblyName() & v_name
Dim s As System.IO.Stream = asm.GetManifestResourceStream(Name)
If Not s Is Nothing Then
Return New Icon(s)
s.Close()
End If
End Function
Public Shared Function GetImage(ByVal ImageName As String) As Image
Dim asm As [Assembly] = [Assembly].GetExecutingAssembly
Dim v_name As String = ImageName
If InStr(v_name.ToLower, ".bmp") <= 0 Then v_name = v_name & ".bmp"
Dim Name As String = AssemblyName() & v_name
Dim s As System.IO.Stream = asm.GetManifestResourceStream(Name)
If Not s Is Nothing Then
Return New Bitmap(s)
s.Close()
End If
End Function
End Class
One Handed Man ( OHM - Terry Burns ) said:
Actually Ive heard 'Gwid' used at user group meetings by various speakers,
as this is not part of any dictionary, who cares ?
--
OHM ( Terry Burns ) * Use the following to email me *
Dim ch() As Char = "ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--
Chris Dunaway said:
A Guid is a Global Unique Identifier GUID pronouced ' gwid' or 'Goo-id'.
Not to start a religious war here, but 'gwid' has is not the correct
pronunciation for a GUID. The correct one is 'Goo-id" as you also
indicated. I cannot find the MS article that said this, but it does
exist.
Does it matter? No. I was just feeling a bit picky
.
Cheers!
--
Chris
dunawayc[AT]sbcglobal_lunchmeat_[DOT]net
To send me an E-mail, remove the "[", "]", underscores ,lunchmeat, and
replace certain words in my E-Mail address.
