Forums Neueste Beiträge
 

Probleme mit der Funktion SHGetStockIconInfo

19/10/2009 - 16:19 von George Löwer | Report spam
Hi ihr,

ich bekomme bei der Folgenden Funktion immer nur Fehlerhafte Parameter und
kein Icon geliefert.
Kann mir vielleicht einer einen Tipp geben.

Private Type SHSTOCKICONINFO
cbSize As Long
hIcon As Long
iSysImageIndex As Long
iIcon As Long
szPath As String
End Type

Private Const SHGFI_ICON As Long = &H100
Private Const SHGFI_SMALLICON As Long = &H1

Private Declare Function SHGetStockIconInfo Lib "shell32.dll" (ByVal SIID As
Long, ByVal uFlags As Long, ByRef PSII As SHSTOCKICONINFO) As Long

Private Sub HoleIcon
Dim mysii As SHSTOCKICONINFO
Dim Result As Long
mysii.cbSize = Len(mysii)
Result = SHGetStockIconInfo(3, SHGFI_ICON Or SHGFI_SMALLICON, mysii)
End Sub


Gruß George Löwer
 

Lesen sie die antworten

#1 Timo Kunze
19/10/2009 - 21:34 | Warnen spam
George Löwer schrieb:
ich bekomme bei der Folgenden Funktion immer nur Fehlerhafte Parameter
und kein Icon geliefert.


Du liest das Icon ja auch nicht aus. Du speicherst lediglich den
Rückgabewert von SHGetStockIconInfo, den du aber auch nicht weiter
verwendest.

Kann mir vielleicht einer einen Tipp geben.


Nutze statt 3 die entsprechende SIID_*-Konstante. Das würde schonmal die
Lesbarkeit des Codes erhöhen.
Außerdem solltest du dir die Definition von SHSTOCKICONINFO nochmal
anschauen. Im Original ist szPath nicht als LPSTR definiert, sondern als
WCHAR[MAX_PATH].

Timo
www.TimoSoft-Software.de - Unicode controls for VB6
"Those who sacrifice freedom for safety deserve neither."
"Demokratie ist per Definition unsicher. Ihr Schutz entsteht aus der
Überzeugung, dass die demokratischen Kràfte überwiegen und sich – auf
demokratischem Wege – durchsetzen."

Ähnliche fragen