作图，救命啊，急(10分)

本人用一个函数来画一个点：
procedure gj1(x,y:integer);
begin
form1.Image1.Canvas .pen.Width :=6;
form1.Image1.Canvas.MoveTo(x+y,x+y);
form1.Image1.Canvas.LineTo(x+y+1,x+y);
end;
但是，我在INTERFACE中声名，在implementation中定义了后
我调用函数GJ1（80，M），这里，M的取值来自一个EDIT的值，
为什么，我编译后，出错
[Error] Unit1.pas(43): Unsatisfied forward or external declaration: 'TForm1.gj1'
请各位高手指点

你在interface里把gj1定义成TForm1的方法了
而在implementation部分实现时却定义成普通函数了 改成
procedure TForm1.gj1(x, y: Integer);
begin
...
end;
就行了

接受答案了.