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
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?