|
|
Using bits2_0.idl I made bits2_0.tlb
I am using Delphi for the COM Client to BackgroundCopyManager.
Using this code to test BackgroundCopyManager.
procedure TForm1.FormCreate(Sender: TObject);
var
test : IBackgroundCopyManager;
jobs : IEnumBackgroundCopyJobs;
begin
test := CoBackgroundCopyManager2_0_.Create;
try
SetLastError(0);
test.EnumJobs(0, jobs);
jobs := nil;
except
on E: Exception do
begin
messageDlg(E.Message);
messageDlg(IntToStr(GetLastError));
end;
end;
test := nil;
end;
test.EnumJobs(0,jobs) will always give me access violation even though
I am running as an administrator. Looking up Win API GetLastError gives
me 1411 ERROR_CLASS_DOES_NOT_EXIST. But notice that the coclass creates
IBackgroundCopyManager just fine. And I know bits is working (v2.0)
because WindowsUpdate runs just fine.
Ideas?
|
|