DDBAC Fehler: "Interface nicht unterstützt"

[Hobbycoder]

Hab jetzt noch mal alles so gemacht, wie du es vorgeschlagen hat. Leider mit dem altbekannten Ergebnis.
Ich bin mir gar nicht mehr so sicher, dass das was mit DDBAC selbst zu tun hat.
Leider kann ich diese Zeile
aBlob := IUnknown(aHIKAZ.Item['UmsaetzeGebucht1', 1]) as IBACDataObject2; nicht weiter zerlegen bzw. debuggen, weil mir einfach das Wissen bezüglich Interfaces fehlt. Ich weiß zwar grundlegend was da passiert, aber für debuggen reicht das leider nicht aus.

Ich habe jetzt die DDBACHelperObject.pas ein dem Projekt BankTest3 verwendet. leider ohne Erfolg.

Noch eine Idee?
Langsam verzweifele ich. Wenn ich das direkt in einer Form verpacke läuft's. Wenn du meine Klasse nutzt läuft's auch. Wenn ich meine Klasse nutze läuft's nicht?

BankTest3 hänge ich mal an (Drin enthalten sind auch die beiden BankingApplicationComponents_TLB.pas und DDBACSWIFT_TLB.pas).

[Idiomatix]

Hallo,

hmmm.
Versuchsweise hatte ich mal unmittelbar vor Deinem o.g. "soft" Typecast die folgende Zeilen in die Projekte BankTest2 und BankTest3 eingefügt.

Delphi-Quellcode:

  anIID := StringToGUID('{DD000122-3E33-11D1-A006-0060088FF6B8}');  // TGUID von IBacDataObject2
  if IUnknown(aHIKAZ.Item['UmsaetzeGebucht1', 1]).QueryInterface(anIID,p) <> 0 Then
    Begin
      ShowMessage('Fehler');   // VCL.Dialogs in uses clause ! 
      Exit;
    End
  else
    Begin
      if Assigned(p) then
        ShowMessage('Alles klar');
    End;

und zuvor anIID als TGUID- und p als Pointer-Variable deklariert. Dann habe ich noch sichergestellt,
dass das Interface IBacDataObject2 korrekt in der Registry steht.

Ergebnis: BankTest2 : Alles klar, BankTest3: Fehler.

Damit ist klar, dass aHIKAZ bei BankTest3 noch nicht richtig initialisiert zu sein scheint. Dachte zunächst an ein
fehlendes CoInitializeEx, aber wir haben es doch hier mit keiner MultiThreaded-Applikation zu tun.
Vielleicht liegt es auch an den beiden fehlenden Container-Objekten in BankTest3.
Da würde ich mal weiterschauen.
MfG

[Idiomatix]

Yep,
genau das wars. Anbei die funktionierende DDBACHelper-Unit.
MfG