Speicherfreigabe von Stringlisten in DLL

[ueding]

Hallo
danke erst einmal
habe jetzt den Constructor und destructor wie nachstehend eingebaut

Delphi-Quellcode:

type
  TBarcode = class(TAutoObject, IBarcode)
  protected

    function Get_SetFileName: OleVariant; safecall;
    procedure Set_SetFileName(Value: OleVariant); safecall;
    function Get_GetBcCode: OleVariant; safecall;
    procedure Set_GetBcCode(Value: OleVariant); safecall;

   private

   public
    constructor Create;

    destructor Destroy; override;


  end;

.
.
implementation
.
.
constructor Tbarcode.Create;
begin
//inherited Create();

strParse := TStringList.Create;
strRow   := TStringList.Create;

end;


destructor TBarcode.destroy();
begin

 strParse.free;
 strrow.Free;
end;

der constructor wird nicht durchlaufen
aber der destructor wird durchlaufen.
Wenn ich inherited Create() hinzufüge ändert sich leider auch nichts.

Gruß Gregor