procedure TSDGIS.BizFormCreate(Sender: TObject);
var
b : IWorkSpaceFactory;
c : iworkspace;
begin
tbArcMain.SetBuddyControl(mcarcmain.Object_);
tocArcMain.SetBuddyControl(mcarcmain.Object_);
b:=gis.CoSdeWorkspaceFactory.Create as IWorkSpaceFactory;
end;
编译能过,在运行时报错