"ITaskbarList - Windows 7 wieder "freigeben

[daywalker9]

Moin Leute,

ich benutzte hier das Interface ITaskbarList3 um den Status unter Windows 7 anzuzeigen. NUn wenn ich die Form schließe, ist der Status noch zu sehen. Wenn ich dort nun

Delphi-Quellcode:

fTaskbarlist.SetProgressValue(application.handle,0,0) ;

aufrufe bleibt der Status noch sichtbar.

Delphi-Quellcode:

var FTaskBarList : ITaskbarList3;
begin if fTaskbarList=NIL then
        begin if Succeeded(CoCreateInstance(CLSID_TaskbarList, nil, CLSCTX_INPROC_SERVER or CLSCTX_LOCAL_SERVER, IUnknown, fTaskBarList)) then
                begin
                  if Succeeded(fTaskbarList.HrInit) then
                    begin
                      fTaskbarList.SetProgressState(application.Handle,TBPF_NORMAL);
                      fTaskbarList.SetProgressValue(application.Handle,i,max);
                    end;
                end
              else
                fTaskbarList := NIL;
        end;
end;

Habt ihr eine Idee, wie ich den Status wieder dort rausbekomme?

[Uwe Raabe]

Delphi-Quellcode:

fTaskbarList.SetProgressState(application.Handle,TBPF_NOPROGRESS );

[daywalker9]

Macht sinn, Danke!