COM Klassen in dll

[sakura]

Starte ein zweites Projekt - zB eine normale VCL Anwendung, binde die entsprechende _TLB.PAS in die uses Klausel ein und versuche folgendes:

Delphi-Quellcode:

uses
  ..., COMTest_TLB;

procedure Button1Click(Sender: TObject);
var
  MyCOMObject: IMyCOMObject;
begin
  MyCOMObject := CoMyCOMObject.Create;
  ShowMessage(IntToStr(MyCOMObject.JustATest(1, 2)));
end;

......