Hallo,
ergänzend zu meinem Vorredner:
Du solltest SendMessageA verwenden. Ich habe nur kurz drüber geschaut und noch nchts analysiert.
Aber mir fällt foglendes auf und das wird den Fehler auslösen.
Du gibst ein Handle per Wert vor. Das geht gar nicht.
hWndTree = 198710 ' SysTreeView32 Handle
Handle werden von Windows zur Laufzeit festgelegt und ändern sich bei jedem Neuaufruf. Im Gegensatz zu den IDs, die immer gleich sind.
Ein Handle ist daher in der Regel mit entprechenden API-Funktionen zu ermitteln.
Z.B.etwa so.....
hWndTree = FindWindowEx(hWndPar, 0, "SysTreeView32", vbNullString)
Gruß
Karl-Heinz
|