dll findet DIALOGS nicht

[ulrich72]

Hallo,
ich hoffe, dass mir jemand sagen kann warum das nicht läuft!
Das ist der Nachbau einer DLL aus den Tutorials von Andreas Hiller.

Code:

library meineDLL;

{$mode objfpc}{$H+}

uses Classes,
     SysUtils,
     Dialogs;

  { you can add units after this }

function addiereZahlen(zahl1, zahl2 :Integer) : Integer; StdCall;
begin
   result := zahl1 + zahl2;
end;

function subtrahiereZahlen(zahl1, zahl2 :Integer) : Integer; StdCall;
begin
   result := zahl1 - zahl2;
end;

function multipliziereZahlen(zahl1, zahl2 :Integer) : Integer; StdCall;
begin
   result := zahl1 * zahl2;
end;

function dividiereZahlen(zahl1, zahl2 :Integer) : Extended; StdCall;
begin
   result := zahl1 / zahl2;
end;

procedure showText(text :PChar); StdCall;
begin
   ShowMessage(StrPas(text));
end;


exports

addiereZahlen,
subtrahiereZahlen,
multipliziereZahlen,
dividiereZahlen;
showText;
end.

Wenn ich die DLL kompilieren will bekomme ich folgende Fehlermeldung:

Code:

meineDLL.lpr(33,4)Error: Identifier not found "ShowMessage"

Die Dialogs im Kopf spielt offenbar eine wichtige Rolle, ich weiß leider nur nicht welche.

Wer hilft mir bitte?

vG
Ulrich