Witam.
Mam problem związany z InsERT Subiekt GT gdyż nie mogę go zainstalować (import bibliotek COM [ActiveX]), a gdy próbuje odwołać się dynamicznie to połowa nie działa
uses ComObj;
...
var oSu, oGT, oDodatki : olevariant;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
try
oGT:=CreateOleObject('InsERT.GT');
oDodatki:=CreateOleObject('InsERT.Dodatki');
oSu:=CreateOleObject('InsERT.Subiekt');
except
on e:exception do
begin
ShowMessage('Błąd przy próbie uruchomienia Sfery');
end;
end;
oGT.Produkt:=1;
oGT.Autentykacja:= 0;
oGT.serwer:='AS-KOMPUTER\InsERTGT';
oGT.Uzytkownik:='sa';
oGT.UzytkownikHaslo:= '';
oGT.Baza:='omg';
oGT.Operator := 'Szef';
oSu:=oGT.Uruchom(0,0);
end;
Wywala błąd że nie istnieje taka ścieżka do klasy (InsERT.Subiekt), nie mogę sobie z tym poradzić, więc proszę o pomoc.
Mam Delphi 7 Personal i Win 7 64b
Jak by ktoś mógł podrzucić pewne działające przykłady w jakimkolwiek języku był bym wdzięczny.