dll erzeugen

[khh]

hallo zusammen,
ich möchte unter Lazarus eine dll erzeugen um Klassen aus dieser zu verwenden.
Was mach ich falsch, dass ich beim Kompilieren keine dll sondern eine exe erzeuge

hab grad mal ein Beispiel aus dem Netz genommenum diese Möglichkeit zu testen.
Lazarus erstelltbeim Erzeugen einer Bibliothek ein neues Projekt und beim Kompilieren ne exe

was mach ich falsch?

hier ´nur mal der DLL-Code.
EDIT: der Link zum Beitrag Link

Delphi-Quellcode:

library MWStObj;
{$mode objfpc}{$H+}


uses

  SysUtils,

  Classes,

  Obj_Unit in 'Obj_Unit.pas';



type

  TMWSt98 = class(TMWSt)

  private

    FMWStSatz : Real;

  public

    constructor Create;

    function GetBrutto(const aNetto: Currency): Currency; override;

    procedure SetPercent(const aPercent : Integer); override;

  end;



constructor TMWSt98.Create;

begin

  inherited Create;

  FMWStSatz := 1.15;

  Assert(MWST_VERSION = 1, 'Falsche Unit-Version!');

end;



function TMWSt98.GetBrutto(const aNetto: Currency): Currency;

begin

  Result := aNetto * FMWStSatz

end;



procedure TMWSt98.SetPercent(const aPercent : Integer);

begin

  FMWStSatz := 1.0 + (aPercent/100);

end;



{ Schnittstellenprozedur }



function CreateMWStObj: TMWSt98; stdcall;

begin

  Result := TMWSt98.Create;

end;



{ Export der Schnittstellenprozedur }



exports

  CreateMWStObj resident;

begin

  { nichts zu tun }

end.

danke für eure Hilfe

Gruss KH