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!