also, bei mir funktioniert das...
Delphi-Quellcode:
library Project1;
uses
sharemem, SysUtils,
Classes, Dialogs;
{$R *.res}
procedure TextOut(AMessage : string); stdcall;
begin
ShowMessage(AMessage);
end;
exports
TextOut;
begin
end.
Delphi-Quellcode:
program Project2;
{$APPTYPE CONSOLE}
uses
ShareMem,
SysUtils;
procedure TextOut(AMessage : string); stdcall; external 'project1.dll';
begin
TextOut('Hallo Welt');
end.