KONTOPRUEF-Logo
Sehen Sie sich auch mein anderes Produkt an:
myebilanz – die Freeware-eBilanz aus MySQL und CSV!
myebilanz

Einbindung in Borland Delphi

Borland Delphi hat (zumindest in jüngeren Versionen) zwar einen WSDL-Import für WebServices/SOAP integriert, wir empfehlen aus verschiedenen Gründen allerdings den Einsatz des sog. COM-Objekts HanftWddx.

Nach der HanftWddx-Installation gibt es für den Aufruf zwei Möglichkeiten: Late Binding und Early Binding. Late Binding ist zwar schneller programmiert und compiliert, allerdings machen sich Fehler bei den Funktionsnamen (z.B. TextBlzKto statt TestBlzKto) erst zur Laufzeit bemerkbar. Mit Early Binding finden Sie solche Fehler bereits beim Compilieren. Im folgenden werden beide Möglichkeiten beschrieben:

  • Late Binding:
    uses
      ComObj;
    var
      myKtoPruef: OleVariant;
      myResult: Integer;
    begin
      myKtoPruef:=CreateOleObject('HanftWddx.KtoPruef');
      myKtoPruef.TestBlzKto('benutzername', 'kennwort', '76010085', '1856', 'DE', 0, '');
      myResult:=myKtoPruef.Result
    end;
  • Early Binding:
    Importieren Sie zunächst die Typbibliothek von HanftWddx, und zwar mit Projekt - Typbibliothek importieren. Sie finden HanftWddx unter HanftWddx Bibliothek für KtoPruef und Address. Dann sieht der Code wie folgt aus:
    uses
      HanftWddx_TLB;
    var
      myKtoPruef: IKtoPruef;
      myResult: Integer;
    begin
      myKtoPruef:=CoKtoPruef.Create;
      myKtoPruef.TestBlzKto('benutzername', 'kennwort', '76010085', '1856', 'DE', 0, '');
      myResult:=myKtoPruef.Result
    end;

In beiden Fällen sollten Sie aus Laufzeitgründen darauf achten, daß der Start des COM-Servers (CreateOleObject bzw. CoKtoPruef.Create) nicht für jede einzelne Abfrage durchgeführt wird. Am besten starten Sie den COM-Server nur ein einziges Mal in Ihrem Programm und rufen dann nur noch TestBlzKto (oder andere Funktionen daraus) auf.

Sehen Sie sich auch mein anderes Produkt an:
myebilanz – die Freeware-eBilanz aus MySQL und CSV!
myebilanz