[The Shadow]

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

Код:

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), то ошибки нет. В чем ошибка?