基础实例: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 下一页

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有