Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Imagelist kaputt
Autor: Mary
Datum: 08.12.03 23:15
Hallo … Ist bei mir auch passiert bei der Verwendung von verschiedenen Namespace innerhalb eines Projektes, Abhilfe ! #Region " Variables " Private _ImageList As New ImageList .... #end Region sub New() .... _ImageList = LoadResourcen.LoadBitmapStrip(Type.GetType("vbControls.Menü.MenüControl"), "vbControls.MenüControl.bmp", _ New Size(16, 16), True, New Point(0, 0)) ..... end sub In Modul/Class o.ä. Protected Friend Shared Function LoadBitmapStrip(ByVal isType As Type, ByVal isName As String, ByVal isSize As Size, ByVal Transparent As Boolean, ByVal TransparentePixel As Point) As ImageList Dim nImageList As New ImageList nImageList.ImageSize = isSize Dim myAssembly As [Assembly] = [Assembly].GetAssembly(isType) Dim bmp As Bitmap = New Bitmap(myAssembly.GetManifestResourceStream(isName)) If Transparent Then Dim myColor As Color = bmp.GetPixel(TransparentePixel.X, TransparentePixel.Y) bmp.MakeTransparent(myColor) End If ' Schneidet anhand der Size das Bitmap zurecht und läd es in die Imagelist Classe nImageList.Images.AddStrip(bmp) Return nImageList End Function

Imagelist kaputt :gr...	1.614	Dartrax	22.11.03 17:09
Re: Imagelist kaputt ...	1.080	Dartrax	23.11.03 18:48
Re: Imagelist kaputt ...	1.285	Mary	08.12.03 23:15

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen