基础实例:DELPHI8操作符重载

1 2 3 下一页

unit WinForm;

interface

uses
System.Drawing, System.Collections, System.ComponentModel,
System.Windows.Forms, System.Data;

type
TWinForm = class(System.Windows.Forms.Form)
{$REGION 'Designer Managed Code'}
strict private
///

/// Required designer variable.
///

Components: System.ComponentModel.Container;
Button1: System.Windows.Forms.Button;
///

/// Required method for Designer support - do not modify
/// the contents of this method with the code editor.
///

procedure InitializeComponent;
procedure Button1_Click(sender: System.Object; e: System.EventArgs);
{$ENDREGION}
strict protected
///

/// Clean up any resources being used.
///

procedure Dispose(Disposing: Boolean); override;
private
{ Private Declarations }
public
constructor Create;
end;

//写成类也可以,这里我用了记录。由于记录是值类型省去了创建实例的麻烦
TClassTest=record
public

上一篇： Delphi控件，我们也可以(2)
下一篇： Delphi的两个实用技巧(1)播放Flash

1 2 3 下一页

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!