dll - gemeinsam genutzte Unit - OOP - Problem

[Ghostwalker]

Ganz einfach. Mach aus deiner Prozedure Test eine funktion die das generierte Objekt zurückgiebt.

Dann kannst du das Instanz im Programm nutzen

z.B.

Code:

     {library}
      function test:TTestobjekt;   stdcall;
      begin
        result := TTestobjekt.create;
        result.String1:='FUNKTIONIERT!!!!!!!';
      end;


      {Programm}

      procedure TForm1.Button1Click(Sender: TObject);
      var Obj:TTestObjekt;
      begin
        obj := test;
        showmessage(obj.String1);
      end;

So sollte das ganze funktionieren