vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Icon in Listview 
Autor: luet
Datum: 25.03.02 19:18

Hallo,
Hab Probleme mit der Darstellung von Icons im Listview !
Kernpunkt ist unten beschrieben. Funktioniert unter Win 2k auch gut, aber unter Win 98 / ME kommt es zu Fehlern . Gereade wenn ich eine zweite Instanz öffne hängt sich das Programm auf. „Laufzeitfehler 481 ungültiges Bild „
Liegt es an „ OleCreatePictureIndirect” oder ?
Wer kann mir helfen ?
Wäre wichtig für mich.
Danke
Luet

Source:
ImageList1.ListImages.Add , Ext, LoadIcon(Small, Root & File)


Private Function LoadIcon(Size&, File$) As IPictureDisp
Dim Result&
Dim Unkown As IUnknown
Dim Icon As IconType
Dim CLSID As CLSIdType
Dim ShellInfo As ShellFileInfoType

Call SHGetFileInfo(File, 0, ShellInfo, Len(ShellInfo), Size)

Icon.cbSize = Len(Icon)
Icon.picType = vbPicTypeIcon
Icon.hIcon = ShellInfo.hIcon
CLSID.id(8) = &HC0
CLSID.id(15) = &H46
Result = OleCreatePictureIndirect(Icon, CLSID, 1, Unkown)
Set LoadIcon = Unkown
End Function
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Icon in Listview63luet25.03.02 19:18
Re: Icon in Listview434ModeratorDieter25.03.02 20:09
Hallo Dieter43luet25.03.02 21:02
Re: Hallo Dieter435ModeratorDieter25.03.02 21:12
Re: Hallo Dieter39luet25.03.02 21:27
Re: Hallo Dieter420unbekannt25.03.02 21:30
Re: Hallo Dieter43luet25.03.02 21:36
Her dami...442ModeratorDieter25.03.02 21:50

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel