DLL Fehler

[theomega]

doch tut er

jetzt taucht das nächste Problem auf: Wenn ich alle Debug-Showmessages raus mache, dann passiert garnix. Wenn ich die DLL lösche, dann läuft das Programm wieder. Und wenn ich eine showmessage in die Procedure einbau, wird die auch angezeigt, allerdings ist das Programm dannach wieder weg.

hier nocheinmal der neue DLL-Code:

Code:

library DEU;

uses
  SysUtils,
  Classes;

{$R *.res}


type TInfo=record
author:shortstring;
name:shortstring;
end;

function info:TInfo;stdcall;

var re:tInfo;
begin;
re.author := 'Dominik Bruhn';
re.name := 'German / Deutsch';

result := re;
end;
//=================================================


type TLanguage=record
opentermset:shortstring;
newtermset:shortstring;
end;

function language:TLanguage; stdcall;
var re:TLanguage;
begin;
re.opentermset := 'Termset öffnen';
re.newtermset := 'Neues Termset';

result := re;
end;

exports
language,
info;

begin

end.

die andere Procedure ist gleichgeblieben.

Und nochwas: Das Array ist im Programm nachher leer. Vielleicht habt ihr doch recht. Aber was für andere Möglichkeiten gibt es denn?