正在阅读:基础实例:DELPHI8操作符重载基础实例:DELPHI8操作符重载

2004-03-05 14:49 出处:CSDN 作者:wr960204 责任编辑:linjixiong

  begin
  if Components <> nil then
  Components.Dispose();
  end;
  inherited Dispose(Disposing);
  end;

  constructor TWinForm.Create;
  begin
  inherited Create;
  //
  // Required for Windows Form Designer support
  //
  InitializeComponent;
  //
  // TODO: Add any constructor code after InitializeComponent call
  //
  end;

  procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
  var
  A,B,C:TClassTest;
  begin
  A.FA :=1;
  B.FA :=2;
  C:=A+B; //两个结构(或者类)用+操作,在DELHI8以前是不可想象的
  system.Windows.Forms.MessageBox.Show(System.Convert.ToString(C.FA) );
  end;

  { TClassTest }

  //重载“+”操作符的实现
  class operator TClassTest.add(A, B: TClassTest): TClassTest;
  begin
  Result.FA:=A.FA + B.FA;
  end;

  end.





察看评论详细内容 我要发表评论
作者笔名简短内容 发表时间
:
键盘也能翻页,试试“← →”键

相关文章

关注我们

最新资讯离线随时看 聊天吐槽赢奖品