Methode löst AV aus, wenn über Interface aufgerufen

[implementation]

Ich habe hier ein Interface (IGenetix) und dessen zugehörige Klasse (TGenetix).
Wenn ich eine Methode über eine Variable der Klasse direkt aufrufe, gibt es keine Probleme.
Wenn ich die Methode dann aber über ein Interface aufrufe, wird eine Access Violation ausgelöst.
Der Code für die DLL ist angehängt.
Es wird erst einmal nur GetGenetix() aufgerufen.

[xaromz]

Hallo,

ändere doch mal die lokale Variable in GetGenetix (gen) zum Typ IGenetix. Ich vermute, irgendwo stimmt die Referenzzählung sonst nicht.
Falls das nichts hilft, dann gehe mit Einzelschritt durch GetByte(), um den Fehler einzugrenzen.

Gruß
xaromz

[hoika]

Hallo,

noch mal dein Code

Delphi-Quellcode:

Gen.Assign(PChar(local)); // läuft
WriteLn(Gen.GetByte('@')); // läuft
Result := Gen;
WriteLn(Result.GetByte('@')); // läuft nicht (AV)

Wie sieht es damit aus ?

Delphi-Quellcode:

var
  IGen: IGenetix;
begin
 ...
  iGen:= Gen;
  WriteLn(iGen.GetByte('@')); // ???
  Result:= Gen;
end;

Heiko

[implementation]

Zitat von xaromz:

ändere doch mal die lokale Variable in GetGenetix (gen) zum Typ IGenetix. Ich vermute, irgendwo stimmt die Referenzzählung sonst nicht.

Habe ich schon probiert. Hilft nicht.

Zitat von xaromz:

Falls das nichts hilft, dann gehe mit Einzelschritt durch GetByte(), um den Fehler einzugrenzen.

Wenn ich die Methode direkt über die Klasseninstanz aufrufe, funzt sie ja.
Es ist auch egal, welche Methode. Auch IGenetix.Assign funzt nicht TGenetix.Assign aber schon.

[ADD]

OK ich habe das Problem jetzt gelöst.
Unverständlicherweise funktioniert es nicht mit CDECL.
Mit REGISTER und PASCAL gibt es keine Probleme.
Danke, dass ihr euch den Code angeschaut habt.