[The Shadow]

В моей DLL есть процедура

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29

uses   SysUtils,   Graphics,   Windows,   Forms,   Math,   ExtCtrls,   Classes;    ...    procedure ImageNegative(Image: TImage); var r, g, b: Byte; i, j: Integer; begin for i:=0 to Image.Width - 1 do for j:=0 to Image.Height - 1 do begin r:=GetRValue(Image.Canvas.Pixels[i, j]); g:=GetGValue(Image.Canvas.Pixels[i, j]); b:=GetBValue(Image.Canvas.Pixels[i, j]); Image.Canvas.Pixels[i, j]:=RGB(255 - r, 255 - g, 255 - b); end; Image.Refresh; end;    exports ImageNegative;

При вызове процедуры из DLL появляется ошибка, но если вставить ее в сам проект (exe), то ошибки нет. В чем ошибка?

[zip000]

procedure ImageNegative(Image: TImage); stdcall; export;

[Spider13]

Не обязательно, приведи пример программы?

[The Shadow]

В программе пишу:

Код:

1 2 3 4 5 6 7 8 9 10

... implementation ... procedure ImageNegative(Image: TImage); external 'Путь к dll' name 'ImageNagative'; ... procedure TMyForm.NegButtonClick(Sender: TObject); begin ImageNegative(Image1); end; ...

[AlexSku]

'ImageNagative'
Ошибка в букве (чтобы не было ошибок, применяй копирование).

[The Shadow]

Это я опечатался. А процедура вызывается. Если бы я напечатал неправильно, то была бы другая ошибка. Ошибка такая Exception EInvalidOperator in Module Methods.dll at 00024E10

[Spider13]

у меня все работает нормально