Tabsheet aus dll erzeugen

[Dt2158]

also hab mal so meine dll gemacht!

Delphi-Quellcode:

library pl_html;

{ Wichtiger Hinweis zur DLL-Speicherverwaltung: ShareMem muß sich in der
  ersten Unit der unit-Klausel der Bibliothek und des Projekts befinden (Projekt-
  Quelltext anzeigen), falls die DLL Prozeduren oder Funktionen exportiert, die
  Strings als Parameter oder Funktionsergebnisse übergeben. Das gilt für alle
  Strings, die von oder an die DLL übergeben werden -- sogar für diejenigen, die
  sich in Records und Klassen befinden. Sharemem ist die Schnittstellen-Unit zur
  Verwaltungs-DLL für gemeinsame Speicherzugriffe, BORLNDMM.DLL.
  Um die Verwendung von BORLNDMM.DLL zu vermeiden, können Sie String-
  Informationen als PChar- oder ShortString-Parameter übergeben. }


uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, ComCtrls,   ExtCtrls,  TabNotBk, ImgList;

var
 TabSheetTest: TTabSheet;

{$R *.res}

procedure Test(pTool: TPageControl);
begin
TabSheetTest := TTabSheet.Create(pTool);
TabSheetTest.PageControl := pTool;
TabsheetTest.Caption := 'Test';
TabsheetTest.Name := 'TabSheetTool1';
end;

exports Test;

begin
end.

das hauptprogramm:

Delphi-Quellcode:

interface

...

 procedure Test(pTool: TPageControl);

implementation

 procedure Test(pTool: TPageControl); external 'pl_html.dll';

...
...
...

procedure TMainForm.Button1Click(Sender: TObject);
begin
 test(pagecontrol_tools);
end;

fehlermeldung

Zitat:

bla bla Converterror: "Tfont kann nicht tfont zugewiesen werden" blabla

logisch!

aber was nun?