Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Problem z Ustawieniem Maski
DJK



Typ: neutral
Postów: 871
Zarejestrowany: Feb 2004
Problem z Ustawieniem Maski

Witam

Co tu jest nie tak (fragment kodu):

DrawIcon (hImgSmall)
Set imgX = ImageList1.ListImages.Add(, fType, PicBoxSmall.Picture)

Private Sub DrawIcon(hImgSmall&

    Dim m As Long
     
    PicBoxSmall.Picture = LoadPicture()
   
    m& = ImageList_DrawEx(hImgSmall&, shinfo.iIcon, PicBoxSmall.hdc, 0, 0, 0, 0, &HFFFFFFFF, &HFF000000, &H0)
    PicBoxSmall.Picture = PicBoxSmall.Image
    ImageList1.MaskColor = &HFFFFFFFF
End Sub

Funkcja API ImageList_DrawEx ustawia kolor maski, w ImageList chyba ustawia, ale gdy w ListView zaznaczę ikonę to zaznaczona jest cała razem z niewidoczną częścią czyli maską

Nie wiem czy dobrze to wyjaśniłem

Pozdrawiam


_____________________________________________
Jeśli można coś zrobić w sposób optymalny to czemu nie

23-07-2004 11:11
Pokaż profil DJK  Wyślij email do DJK   Odwiedź stronę DJK  
Wszystkich odpowiedzi: 0 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1