关于constructor构造函数的有关问题
关于constructor构造函数的问题
帮忙解释一下这两句的意思吧……
这个函数的主要功能就是在程序运行了以后提供给我一个标志位sgn，通过sgn来做角色划分的。
if sgn='' then
XXXXXXXXXXXXXXXXXX
else
XXXXXXXXXXXX;
ADOQUERY1.OPEN；......；
------解决方案--------------------
public
{ Public declarations }
sgn:String;
constructor Create1(Aowner: TComponent;sign:String);
end;
constructor Tfrm_ksjj.Create1(Aowner: TComponent;sign:String);
var
i:integer;
begin
inherited Create( AOwner );
sgn := sign;
end;
帮忙解释一下这两句的意思吧……
这个函数的主要功能就是在程序运行了以后提供给我一个标志位sgn，通过sgn来做角色划分的。
if sgn='' then
XXXXXXXXXXXXXXXXXX
else
XXXXXXXXXXXX;
ADOQUERY1.OPEN；......；
------解决方案--------------------
constructor Tfrm_ksjj.Create1(Aowner: TComponent;sign:String);
var i:integer;
begin
inherited Create( AOwner );//调用窗口的默认创建方法，这个时候如果Form的Create里面有事件会先执行，你可以单步调试试下
sgn := sign;
end;