DLL dynamisch einbinden, was mach ich falsch ?

[shmia]

Zitat von arbu man:

Ich versuche grade eine dll dynamisch einzubinden

Hier der DLL Code

Delphi-Quellcode:

library dll;

uses
  SysUtils,Classes;

{$R *.res}

function functionpchar(pc:pchar):pchar;
begin
  result:=PChar('Result ist: '+PChar(pc));
end;

exports
  functionpchar;

Das geht so nicht!!

Delphi-Quellcode:

function functionpchar(pc:pchar):pchar;
begin
  // in der folgenden Zeile wird ein AnsiString gebildet

  result:=PChar('Result ist: '+PChar(pc));
  // es wird ein Zeiger auf diesen String zurückgegeben
  // wenn diese Funktion verlassen wird, ist der String ungültig
  // und Result zeigt auf ungültige Daten

  // möglicherweise haben sind die Daten im Speicher noch intakt
  // aber das ist nicht von Dauer
end;