Delphi nach C++ Portierung Problem

[DocShoe]

Hallo zusammen,

ich habe eine Delphi-Unit einer Dritthersteller-Komponente, die etwa so aussieht:

Delphi-Quellcode:

TSomeClass = Class(TObject) 
private 
   FHandle                   : PPGconn; 
   FSystem                   : Boolean; 
   FLastOperationTime        : cardinal; 
   ... 
public 
   constructor Create; // kein weiterer Konstruktor vorhanden
   destructor Destroy; Override; 
   ... 
end;

In weiteren .pas Dateien wird sie dann so benutzt (Zeile 5). Zeile 6 stammt von mir und dient nur zu Testzwecken.

Delphi-Quellcode:

procedure TAnotherClass.Open(); 
var NC1 : TSomeClass; 
var NC2 : TSomeClass; 
begin 
   ... 
   NC1 := TSomeClass( FHandle ); // Zeile 5: was passiert hier? 
   NC2 := TSomeClass.Create;          // Zeile 6: lässt sich im Einzelschritt debuggen und springt in den Konstruktor. 
   ... 
end;

Zeile 5:
Ich habe keine Ahnung, was da passiert. Es exsitiert kein Konstruktor, der einen Parameter akzeptiert. In den Aufruf kann ich auch nicht hineindebuggen, für mich sieht das so aus, als würde das Objekt ohne Konstruktoraufruf konstruiert und irgendwie initialisiert.
Was passiert da? Ich habe nicht mal ´ne Ahnung, wonach ich da googeln sollte.

Zeile 6:
Hier wird der Konstruktor aufgerufen und ein TSomeClass Objekt erzeugt. Ich kann per Einzelschritt in den Konstruktor springen und mir dort anschauen, was passiert. Allerdings haben die Member von NC1 und NC2 unterschiedliche Werte.

Den Aufruf in Zeile 5 möchte ich in C++ umsetzen:

Delphi-Quellcode:

TSomeClass* sc = new TSomeClass( FHandle );

das lässt sich nicht übersetzen:
"Kein passender Konstruktor zur Initialisierung von TSomeClass"

[Der schöne Günther]

Das

Delphi-Quellcode:

NC1 := TSomeClass( FHandle );

ist kein Konstruktor, das ist ein harter Cast der Variable

Delphi-Quellcode:

FHandle

auf den Typ

Delphi-Quellcode:

TSomeClass

um ihn dann

Delphi-Quellcode:

NC1

zuzuweisen.

[DocShoe]

Danke, das wars. :thumb:

In C++ sieht das jetzt so aus (und funktioniert):

Delphi-Quellcode:

TSomeClass* sc = reinterpret_cast<TSomeClass*>( FHandle );

[Der schöne Günther]

Ja, die harte Konvertierung in Delphi entspricht dem

Delphi-Quellcode:

reinterpret_cast<>

. Ist trotzdem ein Verbrechen ;-)

[DocShoe]

Jo, ist unsauber weil nicht streng typisiert. Ist aber 3rd Party, was willste da machen?