跪求大神帮忙啊啊啊
我设计了一个类 如下
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'
这是为啥啊
[解决办法]
不应该啊，不过你把数据放在public段实在是一个不明智的选择。。。
