title image


Smiley Re: Background von Einträgen in ImageCombo ändern?
Man könnte auch auf die hier verwendete Picturebox verzichten,



Beispiel mit einer ImageCombo (imgC) einer ImageList (ImL) und einer Picturebox (Picture1) ... nicht optimiert, zum mitschreiben :)



Private Sub Form_Load()

Dim cI As ComboItem



Picture1.AutoRedraw = True

Picture1.BackColor = imgC.BackColor

Picture1.ForeColor = vbBlue

Picture1.Print "Sonntag :)"



ImL.ListImages.Add 1, "Job1", Picture1.Image



Picture1.Cls

Picture1.ForeColor = vbRed

Picture1.Print "Montag :("



ImL.ListImages.Add 2, "Job2", Picture1.Image



imgC.ImageList = ImL



Set cI = imgC.ComboItems.Add

With cI

.Image = "Job1"

End With



Set cI = imgC.ComboItems.Add

With cI

.Image = "Job2"

End With

End Sub



Auf diese weise kannst Du einer ImageCombo alles unterjubeln.


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: