Chciałem zmienić podejście do obsługi Subiekta GT z poziomu Delphi. Mam wygenerowane 2 pliki InsERT_TLB i ADODB_TLB z biblioteki GTA.dll. Do tej pory stosowałem zmienne typu OleVariant. Ale dzisiaj zobaczyłem, że mogę stosować zmienne z tych interfejsów, czyli GT, Dodatki, Aplikacji itp. Zrobiłem taki kawałek kodu, żeby zobaczyć, czy mi się aplikacja odpali:
procedure TForm1.Button1Click(Sender: TObject);
var
oGT: GT;
oDodatki: Dodatki;
oSGT: Aplikacja;
begin
oGT.Produkt := 1;
//oGT.Serwer := '172.16.120.10,58999';
oGT.Serwer := '.\SQL';
oGT.Baza := 'baza';
oGT.Autentykacja := 0;
oGT.Uzytkownik := 'user';
oGT.UzytkownikHaslo := 'Hasło';
oGT.Operator_ := 'Szef';
oGT.OperatorHaslo := '';
oSGT := oGT.Uruchom(gtaUruchom, gtaUruchomNowy);
oSGT.Okno.Widoczne := true;
end;
Niestety po naciśnięciu przycisku, zamiast odpalać się aplikacja Subiekt, to pojawia się błąd:

Co jest nie tak? Może ktoś podpowie?