Ошибка при загрузке DLL

[Stilet]

Ниче не помогает, все перепробовал!!! Пишет, что инструкция не может быть read

И даже мой код?
Может ты где-то в другом месте накосячил?

[dani92]

Я написал твой код, но такая же фигня!!
нашел в инете ткаой, похож на твой, но тоже облом

Полный код DLL:

library MyForms;

uses

SysUtils,

Classes,

Forms,

DLLFormU in 'DLLFormU.pas' {DLLForm};

function ShowForm : Integer; stdcall;

var

Form : TDLLForm;

begin

Form := TDLLForm.Create(Application);

Result := Form.ShowModal;

Form.Free;

end;

exports ShowForm;

begin

end.

Приложение, вызывающее DLL MyForms

unit TestAppU;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type

TFormI = class (TForm)

Buttoni: TButton;

procedure ButtonlClick(Sender: T0b]ect);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

function ShowForm : Integer; stdcal1;

external 'myforms.dll';

implementation

{$R *.DFM}

procedure Tform1.Button1Click(Sender: TObject) ;

begin

ShowForm;

end;

end.

[Stilet]

Form := TDLLForm.Create(Application);

Я не так писал. Читай мой пост внимательно.
У меня о работает норм...