Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Lazarus (IDE) (https://www.delphipraxis.net/81-lazarus-ide/)
-   -   dll findet DIALOGS nicht (https://www.delphipraxis.net/198712-dll-findet-dialogs-nicht.html)

ulrich72 25. Nov 2018 15:26

dll findet DIALOGS nicht
 
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

DieDolly 25. Nov 2018 15:29

AW: dll findet DIALOGS nicht
 
Ganz dumm gefragt: welches Delphi benutzt du? Oder benutzt du das böse Lazurus?

Anders dumm gefragt. Kann eine DLL überhaupt eine ShowMessage ausgeben?

ulrich72 25. Nov 2018 15:52

AW: dll findet DIALOGS nicht
 
Ich benutze das böse Lazarus. Aus deiner Frage sehe ich, dass Delphi 7 und Lazarus nicht unbedingt kompatibel sind.
Die zweite Frage muss ich mit "Ja" beantworten, denn im Tutorial klappt das.

CCRDude 25. Nov 2018 16:00

AW: dll findet DIALOGS nicht
 
Der Betreff des Threads ist, dass Dialogs nicht gefunden wird, aber der Text sagt eher, dass ShowMessage nicht gefunden wird... ShowMessage ist auch in Lazarus Teil von Dialogs.

Aber: ohne weitere Dependencies verwendest Du die Dialogs.pp von FreePascal, nicht die der LCL. Du musst eine Abhängigkeit von der LCL hinzufügen, damit Du auf das gewohnte Dialogs zugreifen kannst.

LCL-UI aus DLLs heraus kann (genau wie VCL von Delphi) aber immer mal wieder Probleme bereiten, schlau ist das nicht unbedingt :)

ulrich72 25. Nov 2018 16:14

AW: dll findet DIALOGS nicht
 
Im gesamten Lazarus-Verzeichnis finde ich nur Lazarus\lcl\dialogs.pp.
Wie kann ich die denn hier reinkriegen?

CCRDude 25. Nov 2018 16:16

AW: dll findet DIALOGS nicht
 
Zitat:

Zitat von CCRDude (Beitrag 1419158)
Du musst eine Abhängigkeit von der LCL hinzufügen, damit Du auf das gewohnte Dialogs zugreifen kannst.

Ich hätte besser "vom Package 'LCL'" schreiben sollen, dann wäre es vielleicht klarer gewesen:

Im Projektmanager Add -> New Requirement -> "LCL", OK.

ulrich72 25. Nov 2018 16:49

AW: dll findet DIALOGS nicht
 
Das hat zwar ein wenig geholfen, aber ich musste dann noch die SysUtils hinzufügen und dort hakt es wieder. Ich werde das mal lassen und ShowMessage direkt in der Anwendung aufrufen.
Vielen Dank!

vG
Ulrich


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz