DLL-Problem - Die 2.

[CalganX]

Hi,
diesmal liegt das Problem in der DLL... Die DLL sieht wie folgt aus:

Delphi-Quellcode:

library Project2;

uses
  SysUtils, Dialogs, Menus, Forms,
  Classes;

function install(Syntaxmenu: TMenuItem): boolean; export;
var
  NewItem: TMenuItem;
begin
  try
    NewItem := TMenuItem.Create(Syntaxmenu);
    NewItem.Caption := 'TEST';
    NewItem.Visible := true;
    result := true;
  except
    result := false;
  end;
end;

exports
  install;

{$R *.res}

begin
end.

Wenn ich die DLL nun lade mit:

Delphi-Quellcode:

    DLLHandle := LoadLibrary(PChar(OpenDialog2.FileName));
  if DLLHandle <> 0 then begin
    InstFuncPtr := GetProcAddress(DLLHandle,'install');
    if InstFuncPtr <> nil then begin
      @InstFunc := InstFuncPtr;
      if InstFunc(Syntaxhighlighting1) then begin
        {...}
      end;
      InstFuncPtr := nil;
    end else ShowMessage('Plugin-DLL ist Fehlerhaft');
  end;
  FreeLibrary(DLLHandle);

Dann stürzt der mit Haufenweiser Ausnahmefehlern ab... Bis ich dann alles mit den Taskmanager beenden muss...

Chris