大侠救我！

Question

type
   outcome=record
     i:integer;
     j:integer;
   end;
type arrayoutcome=array of outcome;
type
  TForm1 = class(TForm)
    BitBtn1: TBitBtn;
    procedure BitBtn1Click(Sender: TObject);
    procedure outputresult( outputresult:arrayoutcome; );//此句报错
//********[Error] Unit1.pas(19): Unsatisfied forward or external declaration: 'TForm1.outputresult'*******//
  private
    { Private declarations }  public
    { Public declarations }
  end;
怎么回事？？？

Answer 1

procedure outputresult( outputresult:arrayoutcome; );//此句报错
多了一個分號