constructor的用法

Question

constructor TSGDJ.Create(fSysArgument: TSysArgument);
  //将型如HHNN格式的整形数转为HH/24+NN/1440
  function Convert(sArgName: String; iDefault: Integer): Integer;
  var iHour,iMinute: integer;
  begin
    iMinute := fSysArgument.ReadInteger(sArgName);
    if (iMinute<=0) or (iMinute>2359) or ((iMinute mod 100)>59) then iMinute := iDefault;
    iHour := iMinute div 100;
    iMinute := iMinute mod 100;
    result := iHour * 60 + iMinute ;
  end;
begin
  //要去除的时间由参数定义文件中的"工作开始时间"、"工作结束时间"、"午休开始时间"和"午休结束时间"
  fBeginTime_Day := Convert('工作开始时间', 800);
  fEndTime_Day := Convert('工作结束时间', 1800);
  fBeginTime_Noon := Convert('午休开始时间', 1200);
  fEndTime_Noon := Convert('午休结束时间', 1400);
end;请各位高手根据上面的代码，帮我分析一下constructor的用法！谢谢！

Answer 1

constructor是个"静态"function,返回值是本类的对象指针。它做的事情是在对象创建的时候做一些初始化工作。

Answer 2

constructor构造函数嘛，楼上的说法说得很对阿。有点类似class型的方法。
比如
 type 
 test =class
 class function ok():string;
 end;
 这时候你可以直接调用，比如test.ok;只不过刚才这个函数返回的时候string而constructor返回的是对象指针