Einzelnen Beitrag anzeigen

mensch72

Registriert seit: 6. Feb 2008
838 Beiträge
 
#1

Übersetzen von pas nach hpp, dabei cpp Kommentare übergeben

  Alt 6. Feb 2008, 21:20
wenn man pas-Dateien vom C-Compilter übersetzen und nutzen möchte, und man Quelltext in c in die Pascal Datei einbinden möchte, an entsprechender Stelle, wie muss man das da deklarieren?

Delphi-Quellcode:
type
MyDateTime = packed record
private
 FDateTime : Double;

public
  function ToDateTime : TDateTime;
  procedure FromDateTime(Value : TDateTime);

{$IFDEF TEST}
    
   MyDateTime& __fastcall operator =(const TDateTime Value) {this->FromDateTime(Value); return(*this);};
   __fastcall operator TDateTime()   {return (this->ToDateTime());   }

{$ENDIF}

end;

Erzeute Hpp Datei sollte dann so aussehen:

Delphi-Quellcode:
struct MyDateTime
#pragma pack(push,1)
struct MyDateTime
{
private:
   double FDateTime;

public:
   System::TDateTime __fastcall ToDateTime(void);
   void __fastcall FromDateTime(System::TDateTime Value);

            MyDateTime& __fastcall operator =(const TDateTime Value) {this->FromDateTime(Value); return(*this);}
;
            __fastcall operator TDateTime()   {return (this->ToDateTime());   }

} ;

#pragma pack(pop)

Oder aber in einem anderen Anwendungsfall, wenn ich einfach Kommentare auch mit übernehmen möchte?
Welche Compileranweisung nimmt man da. HPPEMIT funktioniert nur für den Dateianfang ...

vielen Dank!
  Mit Zitat antworten Zitat