unit Supp;interfacetype
TTime = class
fDate : TDateTime;
function GetText : string;
constructor Create; overload;
constructor Create(y, m, d : Integer); overload; end;implementation
uses
SysUtils;function TTime.GetText : string;
begin
GetText := DateToStr(fDate);
end;constructor TTime.Create;
begin
fDate := Date;
end;constructor TTime.Create(y, m, d : Integer);
begin
fDate := EncodeDate(y, m, d);
end;end.
unit Supp;interfacetype
TTime = class
fDate : TDateTime;
function GetText : string;
constructor Create(y, m, d : Integer); overload; end;implementation
uses
SysUtils;function TTime.GetText : string;
begin
GetText := DateToStr(fDate);
end;constructor TTime.Create(y, m, d : Integer);
begin
fDate := EncodeDate(y, m, d);
end;end.以上两套代码如果没有 constructor Create; overload; 它们的分别和效果在哪里??
为什么一定要放 constructor Create; overload;??
解决方案 »
- Delphi问题
- 如何设置bitmap alpha 值 使其产生不同度的透明效果,用汇编的高手就别回答了,看汇编不好理解
- 怎么获取线程句柄获取线程id??
- 关于证书的打印
- 这是怎么回事?ACCESS数据库的问题。
- 存儲過程的高手請出招?
- 我使用了dxdbgrid,数据有4000多条,为什么排序、过滤和显示数据都很慢,就命啊!
- 我调用TWebBrower打开一个页面,并进行查找时出错了,哪位大侠遇到过,救命啊!
- 查询条件为时间设置时出现问题,
- 数据过滤为什么执行不返回结果 adoquery.filter:='sex='+'"'+'男'+'"';
- delphi中打印DBgrid里的记录有什么简单点的办法没?
- 这段C++怎么转成delphi???
1. 多态
2. 构造器
是不是也在学习vcl开发啊 还是搞本基础的书看看
本人就是看书看不明白 >.<;;
而在这里希望有个详细解析。。((这不是借口。))