我设计了一个类 如下
type TSQL = class  private  public
  gCon : TADOConnection;
  gQuery : TADOQuery;
  gDaSource : TDataSource;
   procedure SQLStart;
   procedure SQLDataSetCommandText(str: string);
   procedure SQLQueryOpenText(str: string);
   procedure SQLQueryExecText(str: string);
   procedure SQLFreeAll;
   function QueryOpen(str: string) : string;
   function SExist(AStuNum : string) : Boolean;
  end;
var
  gSQL : TSQL;
 声明过程之后写了声明函数的过程,但是编译时出现
[Pascal Error] SQLUnits.pas(17): E2065 Unsatisfied forward or external declaration: 'TSQL.SQLStart'
[Pascal Error] SQLUnits.pas(18): E2065 Unsatisfied forward or external declaration: 'TSQL.SQLDataSetCommandText'
[Pascal Error] SQLUnits.pas(19): E2065 Unsatisfied forward or external declaration: 'TSQL.SQLQueryOpenText'
[Pascal Error] SQLUnits.pas(20): E2065 Unsatisfied forward or external declaration: 'TSQL.SQLQueryExecText'
[Pascal Error] SQLUnits.pas(21): E2065 Unsatisfied forward or external declaration: 'TSQL.SQLFreeAll'
这是为啥啊