Das Handle ist ungültig

**jaenicke**

seltsam

Ich kann machen was ich will beide WideChars ergeben immer .. nothing.

Ich habe es kurz mit "echten" Anwendungen getestet (hatte bisher immer nur den Systemsound aktiv), da steht in der Tat nichts drin. Also habe ich einfach mal in die Doku geschaut... und siehe da, das Verhalten ist so dokumentiert und vollkommen korrekt.

https://msdn.microsoft.com/de-de/lib...(v=vs.85).aspx

Zitat:

If the client has not called IAudioSessionControl::SetDisplayName to set the display name, the string will be empty. Rather than display an empty name string, the Sndvol program uses a default, automatically generated name to label the volume control for the audio session.

Wie es der Windows Mixer macht steht also auch direkt da, der geht vermutlich über die Process-ID.

GetSessionIdentifier gibt übrigens immer etwas zurück, auch unter Windows 7.

Zitat:

Wie es der Windows Mixer macht steht also auch direkt da, der geht vermutlich über die Process-ID.

Ich mache nichts anderes.. und gehe ebenfalls nur über die ID.

Ich liste alle Prozesse auf addiere diese zu einer liste und prüfe ob irgendeiner davon
diese Bedingung erfüllt.

if State <> uint(TAudioSessionState.AudioSessionStateExpired) then

Zitat:

GetSessionIdentifier gibt übrigens immer etwas zurück, auch unter Windows 7.

Hmm... kleines Beispiele ?
Wenn du das meinst ? Ja!

Zitat:

SessionIdentifier = {0.0.0.00000000}.{e457a6b5-b413-4304-9b72-f8ba7de1d36a}|\Device\HarddiskVolume1\Program Files (x86)

Was ich bei @TiGü gesehen habe hatte vergessen DisplayName und IconPath frei zu geben.
CoTaskMemFree(pDisplayName); (Ok war\ist eh leer von daher erst mal egal)

Zitat:

und siehe da, das Verhalten ist so dokumentiert und vollkommen korrekt.

Korrekt ja laut Doku aber in meinen Augen.. sorry Schwachsinn.
Es wird also geprüft ob es sich um eine echte Anwendung handelt, wenn ja wird nix zurück gegeben um zu verhindern
das Developer den Mixer in dieser Art nachahmen können.
Diese Funktion ist dann einfach Nutzlos.

gruss

Mein Problem ist also..
Ich muss den DisplayNamen bzw.. den Pfad zum IconPath selbst vorher setzen.

Macht irgendwo keine sinn.
Es wären zwei funktionsaufrufe die letztendlich für die Katz sind wenn ich anschließend selbst noch das Icon bzw. den DisplayNamen selbst noch suchen muss.

Das würde also ausreichen.

markieren

Delphi-Quellcode:

			FAudioSessionList[Index].DisplayName := pDisplayName;

if AudioSessionInfo(Index).DisplayName = '' then

  FAudioSessionList[Index].DisplayName := ExtractFileName

  (ChangeFileExt(GetBaseNameFromPID(PID), ''));

CoTaskMemFree(pDisplayName);

kann mir das dann schenken und muss anstelle dessen versuchen den Korrekten Namen zu analysieren.
GetBaseNameFromPID

Hmm.. was für ein schmarrn

gruss

**TiGü**

Zitat von EWeiss:

Zitat:

und siehe da, das Verhalten ist so dokumentiert und vollkommen korrekt.

Korrekt ja laut Doku aber in meinen Augen.. sorry Schwachsinn.
Es wird also geprüft ob es sich um eine echte Anwendung handelt, wenn ja wird nix zurück gegeben um zu verhindern
das Developer den Mixer in dieser Art nachahmen können.
Diese Funktion ist dann einfach Nutzlos.

Kann es sein, dass du den von jaenicke zitierten Abschnitt nicht so ganz verstanden hast?
Hier nochmal auf Deutsch:

Zitat von MSDN:

Wenn der Client IAudioSessionControl::SetDisplayName nicht aufgerufen hat, um den Anzeigenamen zu setzen, ist der String leer.
Anstatt einen leeren Namenstring anzuzeigen, verwendet das Programm Sndvol einen automatisch generierten Standardnamen, um den Lautstärkeregler für die Audiositzung zu beschriften.

Was heißt das also?
Es besagt, dass es für Programme wie Skype, Chrome, Internet Explorer, FireFox, WinAmp, VLC KEINE Pflicht ist, das Interface IAudioSessionControl zu implementieren bzw. die Methode SetDisplayName aufzurufen.

Keine Ahnung, was du eigentlich bezwecken möchtest???
Wahrscheinlich setzt du einfach voraus, dass wir alle deine Beiträge lesen und wir daher genau wissen, woran du arbeitest und den Rest können wir uns gefälligst selber zusammenreimen.
Wäre ja auch noch schöner, ein vollständiges Gegeben, Gesucht und zumindest einen Lösungsansatz zu verlangen.

Möchtest eine der folgenden Informationen?

markieren

Code:

			- - - - - - - - - - - - - - - - - -

SessionIndex:              0

SessionIdentifier:         {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|#%b{A9EF3FD9-4240-455E-A4D5-F2B3301887B2}

SessionInstanceIdentifier: {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|#%b{A9EF3FD9-4240-455E-A4D5-F2B3301887B2}|12%b#

DisplayName:               @%SystemRoot%\System32\AudioSrv.Dll,-202

IconPath:                  @%SystemRoot%\System32\AudioSrv.Dll,-203

Process ID:                0

- - - - - - - - - - - - - - - - - -

SessionIndex:              1

SessionIdentifier:         {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|\Device\HarddiskVolume4\Program Files (x86)\Google\Chrome\Application\chrome.exe%b{00000000-0000-0000-0000-000000000000}

SessionInstanceIdentifier: {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|\Device\HarddiskVolume4\Program Files (x86)\Google\Chrome\Application\chrome.exe%b{00000000-0000-0000-0000-000000000000}|12%b13524

DisplayName:

IconPath:

Process ID:                13524

ProcessName:               C:\Program Files (x86)\Google\Chrome\Application\chrome.exe

- - - - - - - - - - - - - - - - - -

SessionIndex:              2

SessionIdentifier:         {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|\Device\HarddiskVolume4\Program Files (x86)\Skype\Phone\Skype.exe%b{00000000-0000-0000-0000-000000000000}

SessionInstanceIdentifier: {0.0.0.00000000}.{18e53891-8712-4c0d-9aab-e23e4b813b96}|\Device\HarddiskVolume4\Program Files (x86)\Skype\Phone\Skype.exe%b{00000000-0000-0000-0000-000000000000}|12%b184

DisplayName:

IconPath:

Process ID:                184

ProcessName:               C:\Program Files (x86)\Skype\Phone\Skype.exe

Zitat:

Kann es sein, dass du den von jaenicke zitierten Abschnitt nicht so ganz verstanden hast?

Habe ich!

Zitat:

Ich muss den DisplayNamen bzw.. den Pfad zum IconPath selbst vorher setzen.

Du hast schon gesehen das ich es mit meinem Programm teste?
Also muss ich hier den DisplayNamen und den Pfad zum Icon selber setzen.. Ist das jetzt deutlich genug?

Zitat:

Möchtest eine der folgenden Informationen?

Die habe ich selber.. wenn du meinen Shot angeschaut hättest wäre es dir aufgefallen.

Du musst mich auch nicht auf diese Art hier belehren das mag ich gar nicht!.

Zudem bringen mir deine Infos nichts denn die Strings bleiben wie zuvor leer.

Auch wenn bsp. Winamp

Zitat:

VLC KEINE Pflicht ist, das Interface IAudioSessionControl zu implementieren bzw. die Methode SetDisplayName aufzurufen.

es nicht implementiert kommt MS mit seinem Mixer an den Namen sowie das Icon heran.

Zum IExplorer habe ich ja schon einen Shot geschickt. (Es geht also)
So nun mit all deinen klugen Sprüchen (Belehrungen) wenn MS es kann warum funktioniert es dann nicht bei mir?

Ach vergiss es einfach.. Ich finde eine Lösung dessen kannst du sicher sein!

gruss

**jaenicke**

Zitat von EWeiss:

Auch wenn bsp. Winamp

Zitat:

VLC KEINE Pflicht ist, das Interface IAudioSessionControl zu implementieren bzw. die Methode SetDisplayName aufzurufen.

es nicht implementiert kommt MS mit seinem Mixer an den Namen sowie das Icon heran.

Richtig, aber eben nicht über eine fertige API, sondern indem es selbst eine passende Beschriftung ermittelt, wie es ja auch in der Doku steht, ich vermute z.B. aus dem Prozessnamen, Fenstertiteln oder ähnlichem.

Zitat von jaenicke:

Zitat von EWeiss:

Auch wenn bsp. Winamp

Zitat:

VLC KEINE Pflicht ist, das Interface IAudioSessionControl zu implementieren bzw. die Methode SetDisplayName aufzurufen.

es nicht implementiert kommt MS mit seinem Mixer an den Namen sowie das Icon heran.

Richtig, aber eben nicht über eine fertige API, sondern indem es selbst eine passende Beschriftung ermittelt, wie es ja auch in der Doku steht, ich vermute z.B. aus dem Prozessnamen, Fenstertiteln oder ähnlichem.

Danke und genau das bin ich am versuchen wenn der Name\Pfad zum Icon Leer ist.
Was ich möchte.. das TAudioVolume auf einen Kompletten Mixer erweitern so wie er sichtbar wird wie wenn man im Tray auf das Lautsprecher Symbol klickt.

EDIT:
Schlage mich jetzt mit der Änderung rum.
Durch die Änderung auf GetProcessImageFileNameW habe ich nun Probleme den korrekten Pfad zu Anwendung zu finden um das Icon zu setzen.
Muss diesen Pfad

Zitat:

\Device\HarddiskVolume1\Program Files\Windows Sidebar\sidebar.exe

in einem gültigen umwandeln.

Und so geht es immer weiter..

markieren

Delphi-Quellcode:

			a := MAX_PATH;

GetVolumePathNamesForVolumeNameW(PWideChar(FAudioSessionList[Index].IconPath),

  @FullPath, MAX_PATH, a);

SetSysItemIcon(FullPath);

FullPath ist leer..

gruss

**TiGü**

Zitat:

...wenn MS es kann warum funktioniert es dann nicht bei mir?

Spruch des Tages, Internet kann zu!

Du hast den vollständigen Processpfad/-dateinamen, du hast das Process Handle, du hast die Process ID...woran scheitert es jetzt genau?

Hier noch ein Schups in die richtige Richtung, weil heute Donnerstag ist:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure ExtractIcons(const FileName: string);

var

  IconCount: Cardinal;

  I: Integer;

  IconHandle: HICON;

begin

  IconCount := ExtractIcon(HInstance, PChar(FileName), UINT(-1));

  if IconCount <> 0 then

  begin

    for I := 0 to IconCount - 1 do

    begin

      IconHandle := ExtractIcon(HInstance, PChar(FileName), I);

      if IconHandle <> 0 then

      begin

        // mach irgendwas mit dem Icon Handle

        // . . .

        // am Ende freigeben

        DestroyIcon(IconHandle);

      end;

    end;

  end;

end;

**TiGü**

Zitat von EWeiss:

EDIT:
Schlage mich jetzt mit der Änderung rum.
Durch die Änderung auf GetProcessImageFileNameW habe ich nun Probleme den korrekten Pfad zu Anwendung zu finden um das Icon zu setzen.
Muss diesen Pfad

Zitat:

\Device\HarddiskVolume1\Program Files\Windows Sidebar\sidebar.exe

in einem gültigen umwandeln.

zusammenfalten · markieren

Delphi-Quellcode:

			                      SessionControl2.GetProcessId(ProcessId);

                      Writeln('Process ID:                ', ProcessId);

                      ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False, ProcessId);

                      if ProcessHandle <> 0 then

                      begin

                        if GetModuleFileNameEx(ProcessHandle, 0, ProcessName, MAX_PATH) <> 0 then

                        begin

                          Writeln('ProcessName:               ', ProcessName);

                        end;

                        CloseHandle(ProcessHandle);

                      end;

Zitat von TiGü:

Zitat von EWeiss:

EDIT:
Schlage mich jetzt mit der Änderung rum.
Durch die Änderung auf GetProcessImageFileNameW habe ich nun Probleme den korrekten Pfad zu Anwendung zu finden um das Icon zu setzen.
Muss diesen Pfad

Zitat:

\Device\HarddiskVolume1\Program Files\Windows Sidebar\sidebar.exe

in einem gültigen umwandeln.

zusammenfalten · markieren

Delphi-Quellcode:

			                      SessionControl2.GetProcessId(ProcessId);

                      Writeln('Process ID:                ', ProcessId);

                      ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False, ProcessId);

                      if ProcessHandle <> 0 then

                      begin

                        if GetModuleFileNameEx(ProcessHandle, 0, ProcessName, MAX_PATH) <> 0 then

                        begin

                          Writeln('ProcessName:               ', ProcessName);

                        end;

                        CloseHandle(ProcessHandle);

                      end;

Das hatten wir schon Seiten vorher... aber trotzdem Danke.
Nicht nur GetModuleBaseName (gibt den ExeNamen ohne Pfad zurück) verursacht diesen Fehler auch GetModuleFileNameEx (ExeNamen inklusive Pfad)

Hier gibt es den Fehler das mein Handle ungültig ist.
Deshalb haben wir es doch geändert.

Zitat:

Hier noch ein Schups in die richtige Richtung, weil heute Donnerstag ist:

Danke hatte ich schon fertig.. und ist mir bekannt.

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TAudioVolume.SetSysItemIcon(wsItems: PWideChar);

var

  fi: TSHFileInfo;

begin

  ZeroMemory(@fi, sizeof(TSHFileInfo));

  if SHGetFileInfo(wsItems, 0, fi, sizeof(TSHFileInfo),

    SHGFI_DISPLAYNAME Or SHGFI_SYSICONINDEX or SHGFI_LARGEICON or SHGFI_ICON) <> 0 then

  Icon := fi.HICON;

end;

gruss