dll Funktion, die objekt zurückliefert, dynamisch einbinden

[maximus Caesar]

ok, habs raus: Die extra Unit muss ganz oben unter Uses angegeben werden:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, TestUnit; //hier wird die extra Unit angegeben

type
  TShellexecute = function:TTestObjekt; stdcall;  // hier die Funktion mit dem Objekt
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    procedure Button3Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure calldll;
    procedure Button2Click(Sender: TObject);
  private