Das Service-Objekt ermöglicht die Herstellung einer Verbindung zu einem Web-Service.
Web-Services sind über das Internet erreichbare Funktionsbibliotheken.
Definieren Sie hierzu ein Merkmal (hier: Service1) vom Typ COM-Objektreferenz und hinterlegen in der Eigenschaft „Klasse“ den COM-Klassennamen
TCEServer.Service
Alternativ definieren Sie eine lokale Variable in einer Funktion:
Dim Service1 As TCEServer.Service
Initialisieren Sie das Service-Objekt in einer Funktion:
Service1 := New TCEServer.Service
Initialisieren Sie nun das Service-Objekt mit den unten angegebenen Eigenschaften, um den Web-Service korrekt anzusprechen.
Danach stellen Sie die Verbindung mit dem Webservice her:
Service1.Connect("http://server.de", "Service1.wsdl", 80)
Rufen Sie danach die Webservice-Funktion Ihrer Wahl auf:
Result := Service1.Execute("GetData", 10, 5, "ABC", RetValue)
Beenden Sie die Verbindung zum Webservice durch Terminieren des Objektes:
Service1 := Nothing