Einzelnen Beitrag anzeigen

Elvis

Registriert seit: 25. Nov 2005
Ort: München
1.909 Beiträge
 
Delphi 2010 Professional
 
#7

Re: MS .NET Assembly als Win32 PE-Datei compilieren ?

  Alt 15. Jul 2006, 21:16
Warum gehst du nicht einfach den Weg über COM, so wie das für deinen Fall vorgesehen ist?

.Net Lib:
Delphi-Quellcode:
namespace DP.DelphiInterop;

interface
uses
  System.Runtime.*;
  
type
  [ClassInterface(ClassInterfaceType.AutoDual)]
  Sample = public class
  public
    property Miep : String read 'Miep';
  end;
  
implementation
end.
In Delphi als Type lib importiert, und dann noch eine Unit mit type aliases um die ekligen COM Namen zu verstecken:
Delphi-Quellcode:
unit uSample;

interface
uses
  DP_DelphiInterop_TLB;

type
  ISample = _Sample;
  TSample = CoSample;

implementation
end.
So wird's benutzt (CoInitialize muss aber irgendwo in der App aufgerufen werden):
Delphi-Quellcode:
uses
  uSample in 'uSample.pas';

var
  sample : ISample;
begin
  sample := TSample.Create();
  
  Writeln(sample.Miep);
end.
Robert Giesecke
I’m a great believer in “Occam’s Razor,” the principle which says:
“If you say something complicated, I’ll slit your throat.”
  Mit Zitat antworten Zitat