老友归来－－delphi2005试用手记1

Self.Button1.Location := System.Drawing.Point.Create(80, 160);

Self.Button1.Name := ''''Button1'''';

Self.Button1.Size := System.Drawing.Size.Create(136, 32);

Self.Button1.TabIndex := 1;

Self.Button1.Text := ''''Button1'''';

Include(Self.Button1.Click, Self.Button1_Click);

//

// TWinForm

//

Self.AutoScaleBaseSize := System.Drawing.Size.Create(6, 14);

Self.ClientSize := System.Drawing.Size.Create(292, 273);

Self.Controls.Add(Self.Button1);

Self.Controls.Add(Self.TextBox1);

Self.Name := ''''TWinForm'''';

Self.Text := ''''WinForm'''';

Self.ResumeLayout(False);

end;

{$ENDREGION}

procedure TWinForm.Dispose(Disposing: Boolean);

begin

if Disposing then

begin

if Components <> nil then

Components.Dispose();

end;

inherited Dispose(Disposing);

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