Eigene Basisklassen definieren

[DMW]

Zitat von Der Jan:

Hintergrund des ganzen ist, dass ich gerade die Möglichkeit prüfe, eine C++ Klassenbibliothek in Delphi nutzbar zu machen. Diese definiert aber quasi "vom Urschleim" her alle verwendeten Typen als Klassen. Wenn diese jetzt in Delphi von Tobject abgeleitet sind, kriegt man den ganzen Spaß nimmer kompatibel.

Du könntest zur Not so etwas wie das hier versuchen.

Für den Produktiveinsatz muß ich allerdings dringend abraten: jede auch nur implizite Behandlung solcher Pseudoklassen als Delphi-Klassen (anders gesagt, jeder Zugriff auf negative Offsets der gar nicht vorhandenen Delphi-VMT) führt mit etwas Glück nur zu einer AV, ansonsten zu Speicherkorruption. Und wenn eine Exception in C++-Code geworfen wird, kann sie in Delphi nur mit einem allgemeinen try/except-Handler als externe Exception (falls du C++Builder verwendest, wäre es der berüchtigte Exception-Code EEFFACE) gefangen werden, und ebenso umgekehrt.

Der sauberste Weg wäre vermutlich, ein paar Wrapper-Interfaces zu definieren und die C++-Klassen davon ableiten zu lassen. Auf der C++-Seite mußt du dich dann aber manuell um das Abfangen von Exceptions in Interface-Funktionen kümmern; in Delphi gibt es dafür safecall.